S
samdev
I have two workbooks/files - both workbooks have the macro below that
hides every column starting with Column B.
Sub hidecol()
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
For i = 2 To 255 Step 2
If Columns(i).Hidden = False Then
Columns(i).Hidden = True
Else
Columns(i).Hidden = False
End If
Next i
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub
In workbook 1 it works just fine but in Workbook 2, it stops at the
following line: Columns(i).Hidden = True
The only difference (that I can detect) between the 2 workbooks is in
Workbook 2 there are more columns that contain data than in workbook
1.
Any ideas??
Thx!
hides every column starting with Column B.
Sub hidecol()
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
For i = 2 To 255 Step 2
If Columns(i).Hidden = False Then
Columns(i).Hidden = True
Else
Columns(i).Hidden = False
End If
Next i
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub
In workbook 1 it works just fine but in Workbook 2, it stops at the
following line: Columns(i).Hidden = True
The only difference (that I can detect) between the 2 workbooks is in
Workbook 2 there are more columns that contain data than in workbook
1.
Any ideas??
Thx!