PrintObject Property Example
This example sets embedded chart one on Sheet1 to be printed with the worksheet.
Worksheets("Sheet1").ChartObjects(1).PrintObject = True