Microsoft Office Excel Macro
Print all Embedded Charts in the Entire Workbook
This macro will print every embedded chart in the active workbook. If you have an embedded chart in any worksheet within the workbook, it will be printed. This macro will print the charts on separate pages so that each chart will be on its own page.
Macro Installation Location: Module
Keywords: sort data sorting excel one column next subset adjacent data set table advanced
Print all Embedded Charts in the Workbook
Sub PrintEmbeddedChartsinWORKBOOK()
'This macro will print all embedded charts in the active workbook
'
Application.ScreenUpdating = False
Dim Sht As Object
Dim Cht As ChartObject
For Each Sht In ActiveWorkbook.Sheets
For Each Cht In Sht.ChartObjects
Cht.Activate
ActiveChart.ChartArea.Select
ActiveWindow.SelectedSheets.PrintOut
Next
Next
End Sub
