M
Mary Contrary
How to insert button on spreadsheet to quickly hide & unhide a group of columns
D
Don Guillett
Sub togglehidecols()
Columns(2).Resize(, 4).Hidden = _
Not Columns(2).Resize(, 4).Hidden
End Sub
Columns(2).Resize(, 4).Hidden = _
Not Columns(2).Resize(, 4).Hidden
End Sub
G
Gord Dibben
Add a button from the Forms Toolbar and assign this macro.
Sub toggle_columns()
Dim rng As Range
Set rng = Columns("D:I")
If rng.Hidden = True Then
rng.Hidden = False
Else
rng.Hidden = True
End If
End Sub
Note: Excel also has the "Custom Views" feature which requires no macro.
Simply switch from one View to the other.
Gord Dibben MS Excel MVP
On Fri, 22 Jan 2010 13:07:01 -0800, Mary Contrary <Mary
Sub toggle_columns()
Dim rng As Range
Set rng = Columns("D:I")
If rng.Hidden = True Then
rng.Hidden = False
Else
rng.Hidden = True
End If
End Sub
Note: Excel also has the "Custom Views" feature which requires no macro.
Simply switch from one View to the other.
Gord Dibben MS Excel MVP
On Fri, 22 Jan 2010 13:07:01 -0800, Mary Contrary <Mary
G
Gord Dibben
Oh, darn<>
Gord
Gord
D
Don Guillett
There are lots of things I have learned from your posts.
C
CellShocked
Is that a special application assistant's function? 
darn<> dang<> dagnabbit<> crikey<> beatmetoit<>
darn<> dang<> dagnabbit<> crikey<> beatmetoit<>
G
Gord Dibben
Was supposed to be Oh, darn<g>
meaning.............why didn't I think of that?
Gord
meaning.............why didn't I think of that?
Gord
C