VBA Button Keeps Disappearing

[The Animal]

Hi
I have just created my first VBA to Hide and Un-hide columns as below in 2010

Sub ToggleExpandContract()
Range("A:C,F:F,H:J,X:X,Y:Y,AH:AJ").Columns.Hidden = Not Range("A:C,F:F,H:J,X:X,Y:Y,AH:AJ").Columns.Hidden
End Sub

Then I created a button and added it to my Quick Access Toolbar but the button keeps disappearing when I close the file and re-open the file so I have to keep re-creating the button.
What am I doing wrong?
Thanks

 

[kpark91]

Are you sure you're saving your file as .xlsm?

 

[The Animal]

Thanks for reply
Yep Macro Enabled