MACRO PARA "GUARDAR COMO"

Muchas veces, cuando realizamos un trabajo en Excel, un pequeño programa o simplemente un informe, a veces resulta muy útil tener una macro que nos ayude a guardar un archivo concreto.

La macro que os propongo funciona de la siguiente forma, imaginad  que tenéis una hoja Excel “Pedido” y queréis exportarla pero creando una nueva hoja idéntica sin modificar la anterior.

Esta macro crea una nueva hoja, invoca el cuadro de diálogo de “Guardar Como” de Excel y permite guardar una copia de la hoja a exportar en el lugar que consideréis más oportuno y además la podéis renombrar. Cuando finaliza el guardado, cierra la nueva hoja y no solicita el mensaje de “Desea guardar los cambios efectuados en “Pedido”?.

Sub Exportar_Pedido()
Sheets("Pedido").Select
Sheets("Pedido").Copy
Application.Dialogs(xlDialogSaveAs).Show
Application.DisplayAlerts = False
ActiveWindow.Close
End Sub

Si en la propia página que vais a hacer la copia y el guardado, tenéis un botón donde estáis aplicando la macro, tendréis que hacer que cuando se ejecute, además de todo lo anterior, elimine el botón de la macro que se ha copiado en la hoja nueva. Para ello basta con que incorporéis la siguiente línea en el código:

ActiveSheet.Shapes("BUTTON 1").Select
Selection.Delete

Es decir, quedaría de la siguiente forma:

Sub Exportar_Pedido()
    Sheets("Pedido").Select
Sheets("Pedido").Copy
ActiveSheet.Shapes("BUTTON 1").Select
Selection.Delete

Application.Dialogs(xlDialogSaveAs).Show

    Application.DisplayAlerts = False
ActiveWindow.Close

End Sub

Descarga el archivo pulsando enGUARDAR COMO

Saludos

¿Te ha resultado de interés?, puedes apoyar a Excel Signum con una pequeña donación.


Donate Button with Credit Cards

¡¡Muchas gracias!!

Anuncios

¿Te ha gustado?. Deja un comentario

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s