Print Macros

T

tratliff

I have a workbook with @40 tabs.

Each tab is 4 pages with each page representating a quarter. I want t
be able to print a specific quarter of each tab.

For example, if it is Q2 then I want to be able to click a button an
Q2 for each tab to print.

Any suggestions??
 
T

Tom Ogilvy

Assume Q2 is in M1:Z50 on each page

for each sh in Workbooks.worksheets
sh.Range("M1:Z50").Printout
Next
 
T

tratliff

I tried the for each but got a Compile Error:

Method or data member not found.

Please help!!!
 
T

Tom Ogilvy

Dim sh as Worksheet
for each sh in Workbooks("Myworkbook.xls").worksheets
sh.Range("M1:Z50").Printout
Next

my typo, sorry. Change Myworkbook.xls to reflect the name of the workbook
with the quarterly data.
 
Top