Buttons to HIDE / UNHIDE columns

[GregM]

Hello friends. I have put together the following by reading several similar threads. I am putting two buttons at the top of a spreadsheet, one to display the first group and hide the second and vice-versa. If possible, I guess it'd be better to use one button to toggle these changes. I figured out how to insert the code and attach it to the button, I just need help in writing this code EXACTLY as it should be to put it in a module.

Two buttons: 1) Select columns("O:U") .Hidden = False, Select columns("V:AK") .Hidden = True
2) Select columns("O:U") .Hidden = True, Select columns("V:AK") .Hidden = False

Thanks to all!

 

[Snakehips]

GregM,


Here is one way that will toggle.

Sub Toggle_Cols()
Range("O1:U1").EntireColumn.Hidden = Range("V1:AK1").EntireColumn.Hidden
Range("V1:AK1").EntireColumn.Hidden = Not Range("O1:U1").EntireColumn.Hidden
End Sub

Hope that helps.

 

[GregM]

Works like a charm -- thank you very much for your assistance.
Have a great day!

 

[Snakehips]

You are welcome. Thanks for the feedback.