Print embedded charts from several sheets
I have 40 plus sheet with data and embedded charts. How do I quickly select
just the charts to print at the same time? I tried selecting all sheets and then clicking on the charts but this did not work. Any ideas? Steve |
Print embedded charts from several sheets
This requires a macro or more patience than you or I have, because the
charts have to be printed sequentially. Something like this: Sub PrintAllCharts() Dim ch As Chart Dim sh As Object Dim co As ChartObject ' get all chart sheets For Each ch In ActiveWorkbook.Charts ch.PrintOut Next ' get all charts (chart objects) in all sheets (worksheets and chart sheets) For Each sh In ActiveWorkbook.Sheets For Each co In sh.ChartObjects co.Chart.PrintOut Next Next End Sub - Jon ------- Jon Peltier, Microsoft Excel MVP Tutorials and Custom Solutions http://PeltierTech.com _______ "Steve" wrote in message ... I have 40 plus sheet with data and embedded charts. How do I quickly select just the charts to print at the same time? I tried selecting all sheets and then clicking on the charts but this did not work. Any ideas? Steve |
All times are GMT +1. The time now is 05:00 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com