Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Mostrar cuadro de dialogo "Abrir" donde se elige un archivo

| 3 comentarios

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.

tarea 22 1 300x135 Mostrar cuadro de dialogo "Abrir" donde se elige un archivo

Elaborado por: Lucero Jaque

3 comentarios

  1. 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

  2. Gracias, mis respetos hacia ti, me fue muy util este tip
    gracias por compartir tu conocimiento con la red.
    saludos.

  3. 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 ???

Deja una respuesta

Los campos requeridos estan marcados con *.