¿Cómo utilizar una macro en worksheets?

Hola, Espero me ayuden. Necesito que una macro se ejecute al salir de una determinada hoja. En este caso hoja("ADMINISTRACIÓN"). Tengo la macro mostrar filas ocultas en esta hoja:

Sub MostrarTODAS() '
Application.ScreenUpdating = False 'oculta el procedimiento
Range("4:162").Select
Selection.EntireRow.Hidden = False
Range("c4").Select
Application.ScreenUpdating = True 'muestra el procedimiento
End Sub

funciona perfectamente al ejecutarla con un boton. Pero necesito que al salir de ella quede tal cual como estaba mostrando todas las filas que se ocultaron con anterioridad. He leido que quizas que con worksheets, pero no sé donde colocar el código. Si en la misma hoja o en un modulo. Agradeceria si me dieran el código de como debiera ser..