Macro to print all chart objects on a specific worksheet

[Briscoe]

I have a workbook with the first worksheet as a homepage. Then I have about 10 other worksheets that have 3-4 charts on each of them. I am trying to create a macro that will allow me to click on a button on the "Home Page" and have it print all of the charts on a specific worksheet in one print job.

Any help would be appreciated!

Thank you,
Briscoe

 

[PHV]

A starting point:
Sheets(Array("Sheet4", "Sheet5")).PrintOut

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[Briscoe]

This will print out the sheets, but the charts print out differently. If you want to print a chart as 1 per page, you have to activate the chart first. This will allow the chart to print on one page. If I have 3 charts on one workbook, I would like to have each one print up as its own page.

 

[PHV]

Have you tried the macrorecorder when doing what you want manually ?

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[Briscoe]

Yeah, the problem is that when you run the recorder and activate all of the charts on the page and the select print, it prints the worksheet as it normally would without any charts activated.