Macro is not generating expected results.

I have created this macro (below) in a standalone spreadsheet and the expected results are that Columns A,B,C,D,G,H will be displayed after I run the macro. But when I use the same macro in my production worksheet (columns and ranges adjusted accordingly) this macro creates the following results: Column A is displayed and all the rest are hidden (B,C,D,E,F,G,H). I am stumped as to why this occurs. can you advice me? Thanks.

Sub printestimate()
'
' printestimate Macro
' Macro recorded 10/06/2009 by Pieter
'

'
Columns("E:F").Select
Selection.EntireColumn.Hidden = True
Range("A1:I35").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$H$111"
End Sub