print out based on Name Box code

hi all,

I have a problem that maybe you can help, from a combobox userform
there are several options in the combobox,if we choose the color yellow ,print output based on the yellow area of namebox "yellow" (A1:D15)

thanks in advance
herukuncahyono

Then you also need to add the following code..

Please Login or Register  to view this content.

Following is the information about PrintOut event (from Excel help)...

Prints the object.

expression.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName)
expression Required. An expression that returns an object in the Applies To list.

From Optional Variant. The number of the page at which to start printing. If this argument is omitted, printing starts at the beginning.

To Optional Variant. The number of the last page to print. If this argument is omitted, printing ends with the last page.

Copies Optional Variant. The number of copies to print. If this argument is omitted, one copy is printed.

Preview Optional Variant. True to have Microsoft Excel invoke print preview before printing the object. False (or omitted) to print the object immediately.

ActivePrinter Optional Variant. Sets the name of the active printer.

PrintToFile Optional Variant. True to print to a file. If PrToFileName is not specified, Microsoft Excel prompts the user to enter the name of the output file.

Collate Optional Variant. True to collate multiple copies.

PrToFileName Optional Variant. If PrintToFile is set to True, this argument specifies the name of the file you want to print to.

Remarks
"Pages" in the descriptions of From and To refers to printed pages— not overall pages in the sheet or workbook.

Example
This example prints the active sheet.

ActiveSheet.PrintOut

thanks for reply, but when I use the code in command button only black area selected..
it seems the choice(combobox) is not working

regards
herukuncahyono

Seriously you are asking that???!!!

Ok here it goes...

Please Login or Register  to view this content.