Do not want a Column to be printed out

Hello all, this is my first post here in this forum. I will start off by describing my spreadsheet then post my question.

My spreadsheet is a dual purpose spreadsheet, it is my printable catalog of product offerings as well as my worksheet for my cost and my cost markup. I have apx 2500 rows of product offerings.

My question…I would like to be able to print my catalog without my cost markup columns being printed. It is not practical for me to hide the column, then print, then unhide the column again every time I want to print out my catalog. I would like the columns to always be visible, but just not print.

TIA
Erimon

This looks beyond me. Is that VB code for the backend? I'm willing to give it a go though.

Originally Posted by john55

one way

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'http://www.rondebruin.nl/print.htm
With ActiveSheet
            .Range("B1,D1").EntireColumn.Hidden = True
            .PrintOut
            .Range("B1,D1").EntireColumn.Hidden = False
        End With

End Sub

Have you tried to select what you want to print then on the Page Layout tab click on Print Area, Set Print Area? This should only print what has been selected and the selection should stay until you change it.