knighttrader
New Member
- Joined
- Apr 3, 2010
- Messages
- 21
- Office Version
- 2021
- Platform
- MacOS
Hi
Using Excel on a Mac
I want to hide/unhide multiple columns that are not in a range using one button. e.g. Columns, A, E, S, T, Y
I want to hide/Unhide 45 columns in total. The following code works, but can anyone show me how to write the code better?
Many thanks
Using Excel on a Mac
I want to hide/unhide multiple columns that are not in a range using one button. e.g. Columns, A, E, S, T, Y
I want to hide/Unhide 45 columns in total. The following code works, but can anyone show me how to write the code better?
Many thanks
VBA Code:
Sub HideUnhideLayColumns()
Columns("A").EntireColumn.Select
If Selection.EntireColumn.Hidden = False Then
Selection.EntireColumn.Hidden = True
Else
Selection.EntireColumn.Hidden = False
End If
Columns("E").EntireColumn.Select
If Selection.EntireColumn.Hidden = False Then
Selection.EntireColumn.Hidden = True
Else
Selection.EntireColumn.Hidden = False
End If
End Sub