hide columns only when printing

[y481184]

Is there any way in excel to hide a column only when the report is being printed. In other words, I have a couply of columns that I would like to keep on my report, but I don't want them to print. Do I have to manually hide each of these columns when I go to print the document?

 

[LTunnicliffe]

Try:

<font face=Courier New><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> Workbook_BeforePrint(Cancel <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Boolean</SPAN>)
  
  Cancel = <SPAN style="color:#00007F">True</SPAN>
  Application.EnableEvents = <SPAN style="color:#00007F">False</SPAN>
    ActiveSheet.Columns(1).Hidden = <SPAN style="color:#00007F">True</SPAN>
    ActiveSheet.PrintOut
    ActiveSheet.Columns(1).Hidden = <SPAN style="color:#00007F">False</SPAN>
  Application.EnableEvents = <SPAN style="color:#00007F">True</SPAN>
  
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>

Specify the columns you want hidden where I have the Columns(1) line. Put this in the ThisWorkbook module of the VBE (ALT+F11). Let me know if you have problems.