Code to make header visible

[dpaton05]

I have a spreadsheet that makes a hidden worksheet visible upon clicking a button. How do I make the position of the page be scrolled all the way to the top so you can see the header using vba?

 

[Michael M]

You could add this line to your button code

Application.Goto Reference:=Range("a1"), Scroll:=True

 

[dpaton05]

Thanks Michael but I already found out how to do it using the macro recorder. I used this bit of code

ActiveWindow.SmallScroll Down:=-24

 

[Michael M]

Thas fine but it won't get you back to the top of the page if you are more than 24 rows down the page !