Sigue las Instrucciones para un botón y ejecutar la macro
1. Abre tu libro de Excel
2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
3. En el menú elige Insertar / Módulo
4. En el panel del lado derecho copia la macro
5. Ahora para crear un botón, puedes hacer lo siguiente:
6. Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
7. Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
8. Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona Asignar macro / Selecciona: guardahoja
9. Aceptar.
10. Para ejecutarla dale click a la imagen.
Sub guardahoja()
'Por.DAM
ruta = "C:\trabajo\"
ActiveSheet.Copy
fec = Format(Date, "dd-mm-yyyy")
hora = Format(Time, "hh-mm-ss")
arch = "hoja " & fec & " " & hora
ActiveWorkbook.SaveAs ruta & arch
ActiveWorkbook.Close
End Sub
La hoja queda guardada con la palabra "hoja ", la fecha y la hora, ejemplo:
Hoja 03-08-2013 12-57-18.xls
Saludos. DAM
No olvides finalizar la pregunta.