como hago para que GetSaveAsFilename pregunte si desea sobreescribir??

06/10/2006 - 17:40 por Ivens Zambrano | Informe spam
Hola!

Estoy usando Excel 2003, con SP1 en Windows XP

En una macro que escribí, necesito solicitar al usuario un nombre de
archivo. Para eso, utilicé el método Application.GetSaveAsFilename,
el cual le abre al usuario un cuadro de diálogo tipo Guardar Como y
luego me retorna el nombre del archivo seleccionado por el usuario.

El problema es que si en dicho diálogo, selecciono un archivo
existente, no me aparece la advertencia "El archivo ya existe ¿Desea
sobreescribirlo?" como uno se espera en este tipo de diálogos.

Mi pregunta es ¿Existe alguna forma de que el diálogo abierto en
Excel de Guardar Como, le muestre una advertencia al usuario en caso de
que seleccione un nombre de archivo existente?

Gracias.
Ivens.
 

Leer las respuestas

#1 Héctor Miguel
06/10/2006 - 18:34 | Informe spam
hola, Ivens !


... necesito solicitar al usuario un nombre de archivo... utilice el metodo Application.GetSaveAsFilename
... problema... si en dicho dialogo, selecciono un archivo existente
no me aparece la advertencia "El archivo ya existe Desea sobreescribirlo?" ...
... alguna forma de que el dialogo abierto... de Guardar Como
... muestre una advertencia al usuario en caso de que seleccione un nombre de archivo existente?



prueba con algo +/- como lo siguiente:

Dim GuardarComo
Inicio:
GuardarComo = Application.GetSaveAsFilename
If GuardarComo = False Then
MsgBox "operacion cancelada por el usuario..."
Exit Sub
End If
If Dir(GuardarComo) <> "" Then
MsgBox "El nombre seleccionado ya existe..."
GoTo Inicio
End If

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Preguntas similares