Toggle Hide Unhide Columns

[ExcelRoy]

Hi all,

Could I please ask if it may be possible to have a button to toggle between the following hide/unhide columns

Hide J:M Unhide O:AB
Then if pressed again
Unhide J:M Hide O:AB
Then if pressed again revert back to the start

many thanks for any help

 

[VBA Geek]

Dim B As Boolean
Sub uhideuhide()
Range("J:M").EntireColumn.Hidden = Not B
Range("O:AB").EntireColumn.Hidden = B
B = Not B
End Sub

 

[Rick Rothstein]

Hi all,

Could I please ask if it may be possible to have a button to toggle between the following hide/unhide columns

Hide J:M Unhide O:AB
Then if pressed again
Unhide J:M Hide O:AB
Then if pressed again revert back to the start

Assuming one set of columns is already hidden and the other is not, use this code in your button's click event to produce the toggling effect you want...

  Columns("J:M").Hidden = Not Columns("J:M").Hidden
  Columns("O:AB").Hidden = Not Columns("O:AB").Hidden

 

[ExcelRoy]

Great many thanks