Save time with a macro for printing embedded charts in an Excel workbook

To print an embedded Excel chart on a single sheet without the rest of the worksheet data, you need to complete a four-step process: Select the chart, go to File | Print, click Selection, and then click OK. If you need to print a number of charts on a sheet, you must repeat this process for each chart. Fortunately, you can create a toolbar button that will allow you to print them all with a single click of the mouse. Follow these steps:

1. Press [Alt][F8].
2. Enter PrintEmbeddedCharts.
3. Click Create.
4. Enter the following code at the prompt:
   

   Sub PrintEmbeddedCharts()
    Dim ChtObj As ChartObject
    For Each ChtObj In ActiveSheet.ChartObjects
    ChtObj.Chart.PrintOut
    Next ChtObj
    End Sub

5. Press [Alt]Q.
6. Go to Tools | Customize.
7. Click the Commands tab.
8. Under Categories, click Macros.
9. Drag the Custom button onto any toolbar.
10. Right-click the Custom button and select Assign Macro.
11. Select PrintEmbeddedCharts and click OK.
12. Right-click the Custom button and select Edit Button or Change Button if you wish to change the default button image.

Miss a tip?

Check out the Microsoft Excel archive, and catch up on our most recent Excel tips.

Help users increase productivity by automatically signing up for TechRepublic's free Microsoft Office Suite newsletter, featuring Word, Excel, and Access tips, delivered each Wednesday.