Como activar una macro limpiar celdas al salir?

De hecho tienes 4 formas de que la hoja se limpie automáticamente sin necesidad de la intervención del usuario, 2 por eventos beforeclose y Open y 2 por eventos del formulario, uno es asignando la activación del botón limpiar al botón de salida o bien al botón que trae por default el formulario (Terminate), te dejo ejemplos, por cierto no se puede mandar llamar desde los eventos de hoja el botón del formulario para limpiar, tienes que copiar el código del botón a dichos eventos,

Private Sub Workbook_BeforeClose(Cancel As Boolean)
activesheet.usedrange.clear
End Sub
'
o tambien al abrir la hoja
'
Private Sub Workbook_Open()
activesheet.usedrange.clear 'Borra todo incluyendo fornatos
activesheet.usedrange.clearcontents 'Borra todo solo deja el formato
end sub
' 
o bien en el formulario cuando si lo cierra en el boton salir
Private Sub cmdsalir_Click()
CommandButton1_Click
End Sub
'
o si lo cierra desde la X de la esquina superior derecha
Private Sub UserForm_Terminate()
CommandButton1_Click
End Sub

El botón se llama "LimpiarCeldas", su función es borrar celdas especificas y no toda la hoja.

Tengo que activarlo al salir o entrar para no arriesgar borrar el formato del formulario.

Oye! Muchísimas gracias, estoy probando pero aun no lo tengo.