How to print the charts in my sheet through vba

A

amrezzat

heloo
i want to print all charts in my sheet
and i want to se the margins of the sheet to all equal to =2 cm
and no footer no header

how through vba?
by the way i use a sub to print a sheet and specifiy the printarea for
it
and when i use that
ActiveSheet.ChartObjects.PrintOut preview:=True
an error appears
how can i fix that??
 
D

Don Guillett

try this idea instead
Sub printcharts()
Dim Ch As ChartObject
For Each Ch In ActiveSheet.ChartObjects
Ch.Chart.PrintPreview
Next
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Page numbering with Merged Document and IF statements 1
Need Help with a VBA subroutine 0
Drop down list control value in vba 2
Project Professional 2016 - Headers and footers not showing up in print preview & printed document 2
VBA Coding Help for Beginner 0
Loop through pages and insert header image 0
VBA word change keys 0
Need VBA Macro to Loop through pages and print counter in footer of each page 9

Top