Having trouble with Hide/Show Macro Button

[excelgirl0610]

Hi there,

I am creating a simple grocery worksheet that has some instructions on it that I'd like to give users the options to hide/show. I made a button, created the macro, inserted it onto a module specifically for that button, and then tested it to see if it works. The first time I clicked it, the button did exactly like it was supposed to. The second time I tried, it won't do it. Now instead, a duplicate button pops up for a brief moment when I click the button, but nothing else happens. What am I doing wrong? I am using Excel 2016 btw. Here is what the code currently looks like:

Private Sub HideInstructions_Click ()
'
' HideColumn Macro
'

'
Columns ("A:I") .Select
Selection.EntireColumn.Hidden = True
End Sub

Am I doing something wrong here? Workbook was protected beforehand, but I disabled those functions. Also, VBA is not password protected in any way.

I'm sorry if this sounds really silly, but I am re-learning how to use Macros (and I actually never learned VBA!) so just hoping someone here can guide me. Thank you!

 

[RedBeard]

Do you want your button to toggle the visibility of the columns?

 

[excelgirl0610]

Do you want your button to toggle the visibility of the columns?

Exactly

 

[RedBeard]

Have a read here: http://www.mrexcel.com/forum/excel-...cations-hide-unhide-columns-click-button.html

 

[excelgirl0610]

Wonderful! Thanks, off to read

 

[Michael M]

How are you Unhiding the columns ??
AND
you don't need to Select the columns to hide them !!

Private Sub HideInstructions_Click ()
Columns("A:I").EntireColumn.Hidden = True
End Sub

Also, the button doesn't reside within columns A:I does it ......so it 's getting hidden with the columns ???

 

[mikerickson]

To Toggle the visibility, you could use code like

With Range("A:I").EntireColumn
    .Hidden = Not (.Hidden)
End With

 

[excelgirl0610]

How are you Unhiding the columns ??
AND
you don't need to Select the columns to hide them !!

Private Sub HideInstructions_Click ()
Columns("A:I").EntireColumn.Hidden = True
End Sub

Also, the button doesn't reside within columns A:I does it ......so it 's getting hidden with the columns ???

I see...Didn't know that about the selection part. But no, the button isn't being hidden. I was going to use a separate button to unhide, but hadn't gotten that far yet because I couldn't get the first button to work yet.

 

[excelgirl0610]

Mikerickson! This was perfect! Thank you!