How do I auto expand hidden rows or columns?
 

I am creating a presentation and I am including 3 topics. I want to allow
the user to expand the hidden columns with a single click and hide them again
when they are done viewing that portion. How do I do this?

Thank you for your time!

How do I auto expand hidden rows or columns?
 

Sub togglehideunhidecolumns()
Columns("b:d").Hidden = True = Not Columns("b:d").Hidden
End Sub

--
Don Guillett
SalesAid Software

"iamjbunni" wrote in message
...
I am creating a presentation and I am including 3 topics. I want to allow
the user to expand the hidden columns with a single click and hide them
again
when they are done viewing that portion. How do I do this?

Thank you for your time!

How do I auto expand hidden rows or columns?
 

or shorten to
Columns("b:d").Hidden = Not Columns("b:d").Hidden


--
Don Guillett
SalesAid Software

"Don Guillett" wrote in message
...
Sub togglehideunhidecolumns()
Columns("b:d").Hidden = True = Not Columns("b:d").Hidden
End Sub

--
Don Guillett
SalesAid Software

"iamjbunni" wrote in message
...
I am creating a presentation and I am including 3 topics. I want to allow
the user to expand the hidden columns with a single click and hide them
again
when they are done viewing that portion. How do I do this?

Thank you for your time!