I have a recorded a macro to print graphs (from excel 2003 so its compatible) but its been requested that the graphs to be printed in colour.
The sheet is protected due to formulas, so was wondering if the below code can be changed to print out in colour? When I recorded opetions to print in colour, it was exactly the same.
Thanks
Sub PrintWTDTotal()
' WTDGraphPrintout Macro
Sheets("WTD Rewraps").Unprotect Password:=Sheets("Password").Range("K100").Value
Sheets("WTD Rewraps").Select
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.ChartArea.Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("WTD Rewraps").Protect Password:=Sheets("Password").Range("K100").Value
End Sub
Bookmarks