Uno de las situaciones más frecuentes en la que nos podemos encontrar al emplear las macros, es tener que emplear la venta de diálogo estándar del sistema operativo con la finalidad de identificar el nombre con el cual se realizará la grabación de un archivo, sin embargo, cabe precisar que la operación en si de obtener el nombre es separada de la operación de correspondiente al grabado de un archivo.
Un ejemplo de código en vba correspondiente a esta macro correspondería a:
1ro. Crear variable, en este caso, se llama "sfilename" y se define como cadena "String"
2do. Igualar la variable al código "Application.GetSaveAsFilename"
3er. Usar un condicional que cierra el archivo si es que la variable es falsa. Caso contrario, se abre el cuadro de diálogo "Abrir" donde se elige un archivo.
Pruebe el caso mostrado en el siguiente código.
Elaborado por: Lucero Jaque
23/04/2014 a las 2:14 pm
Hola Fernando,
Muy útil el ejemplo! Muchas gracias.
Te hago una consulta. Como sería si quisiera abrir 3 de libros de excel y que si el usuario presiona cancelar la macro se termine?
intenté con esto, pero no funciona
For i = 1 To 3
FileToOpen = Application.GetOpenFilename(Title:="Open file")
Workbooks.Open Filename:=FileToOpen
If FileToOpen = False Then Exit Sub
Next i
25/11/2017 a las 10:05 pm
Gracias, mis respetos hacia ti, me fue muy util este tip
gracias por compartir tu conocimiento con la red.
saludos.
14/06/2020 a las 1:02 pm
Cordial saludo :
Requiero abril un archivo que esta con extencion TXT y requiero que me abra Pero antes de abril en excel tener la posibilidad de separa su columnas y los datos numericos queden en valores.??
Lo anterior es posible porque con la instrucción abre el archivo en textos sin dar la posibilidad de acondicionarlo
Como puedo realizar esta actividad con la aplicación GetOpenFilename ???