Print Macro for specific Ranges in a worksheet

**chrisjack** · 11-15-2012, 01:22 PM

I have a worksheet with column headings and data that I want to add a print button for users to be able to print their report displayed on the screen to the printer that is set as their default. This worksheet expands all the way to column CD but I just want the print to focus on a specific range Columns A : S. Some reports will be long some will be short but I want the pages printed to depend on the length of the report. The last row of data in column H can be used to determine the length of the report. What vba code can I use for this task so I can assign a Print command button to it. Thanks in advance. The report should have the following specifications.
Landscape
Print 1 Page Wide
Header=0.3
Footer=0.3
Top=0.6
Bottom=0.6
Left=0.6
Right=0.6
Gridlines should be checked

**davesexcel** · 11-15-2012, 02:45 PM

You can use your macro recorder to set up the printer specs.
this code will set your print area

Please Login or Register  to view this content.

**chrisjack** · 11-15-2012, 04:53 PM

Hi Dave my print code is just printing the 1st page even when some reports are more than 1 page. I incorporated your code with my macro but Im sure I am missing something or coded wrong. Can you please look at my code and tell me what Im doing wrong to fix that problem. Thanks for your help

Please Login or Register  to view this content.

**davesexcel** · 11-16-2012, 08:51 AM

Maybe this

Please Login or Register  to view this content.

**chrisjack** · 11-16-2012, 03:59 PM

Hi Dave I fixed the problem. I had toincrease my number of pages in this code
ExecuteExcel4Macro "PRINT(2,1,1,1,,,,,,,,2,,,TRUE,,FALSE)

to

ExecuteExcel4Macro "PRINT(2,1,30,1,,,,,,,,2,,,TRUE,,FALSE)