Guardar como

13/07/2006 - 17:50 por Fran | Informe spam

Tengo esta macro que pongo abajo para guardar como, pero cuando la
ejecuto se me abre la ventana de guardar como pero no me deja escoger
tipo de fichero (Yo necesitaría que fuese .xls) por ese motivo creo
que no me lo guarda. Alguien me podría dar una solución.

Sub GuardarComo()
Application.GetSaveAsFilename
End Sub

Siga el debate

1 respuesta

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 KL

13/07/2006 - 21:19 | Informe spam

Hola Fran,

... Application.GetSaveAsFilename

1. >... no me deja escoger

tipo de fichero (Yo necesitaría que fuese .xls)

para esto podrias añadir el filtro como argumento de la funcion
GetSaveAsFileName

2. > ... no me lo guarda> Sub GuardarComo()

No te lo guarda porque la ventana "Guardar Como" llamada mediante la funcion
GetSaveAsFileName no tiene el comando SaveAs asociado al boton Guardar. Esta
ventana solo recoge el nombre y la ruta a usar, pero es tu macro que tiene
que guardar el archivo. Prueba algo asi:

Sub test()
Archivo = Application.GetSaveAsFilename( _
fileFilter:="Excel Files (*.xls), *.xls")
If Archivo <> False Then ThisWorkbook.SaveAs Archivo
End Sub

Saludos,
KL

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida