Una macro de excel para determinar si existe un libro

Video: Curso Excel 2010. Fórmulas: Referencias a otras Hojas y otros Libros. Vídeo 1 de 1. David Asurmendi

Esta macro de Excel le permite pasar una ruta de archivo para evaluar si el archivo está allí. Por ejemplo, es posible que tenga un proceso que manipula un archivo en algún lugar de su PC. Por ejemplo, puede que tenga que abrir un libro existente para agregar datos a él sobre una base diaria. En este caso, puede que tenga que probar para ver si el archivo que necesita para manipular existe.

Cómo funciona la macro

La primera cosa a notar acerca de esta macro es que es una función, no un procedimiento Sub. Haciendo de esta una función macro le permite pasar cualquier ruta del archivo a la misma.

En esta macro, se utiliza la función Dir, que devuelve una cadena que representa el nombre del archivo que coincida con lo que pasa a ella. Esta función se puede utilizar de muchas maneras, pero aquí, que lo utilizan para comprobar si la ruta del archivo se pasa a ella existe:

FileExists de función (FPATH como secuencia) como Boolean`Step 1: Declarar su variablesDim FName Como String`Step 2: Utilice la función Dir para obtener la filenameFName = Dir (FPATH) `Paso 3: Si el archivo existe, regresan cierto- demás FalseIf FName lt; gt; " Luego FileExists = True _Else: FileExists = Función FalseEnd

Paso 1 declara una variable de cadena que tiene el nombre de archivo que regresa de la función Dir. FName es el nombre de la variable de cadena.

Video: Macro en Excel para buscar cualquier hoja

En el paso 2, se intenta establecer la variable FName. Esto se hace pasando la variable FPATH a la función Dir. Esta variable fpath se pasa a través de las declaraciones de función (ver la primera línea del código). Esta estructura le impide tener que codificar una ruta de archivo, que pasa como una variable en su lugar.

Si la variable FName no se puede ajustar, el camino que ha pasado no existe. Por lo tanto, la variable FName está vacía. Paso 3 simplemente se traduce ese resultado a una expresión de verdadero o falso.

Una vez más, esta función se puede utilizar para evaluar cualquier ruta del archivo se pasa a ella. Esta es la belleza de escribir la macro como una función.

La macro siguiente muestra cómo utilizar esta función:

Sub Macro1 () Si FileExists ("C: TempMyNewBook.xlsx") = True ThenMsgBox "El archivo existe."ElseMsgBox "El archivo no existe."End Sub IfEnd

Cómo utilizar la macro

Para implementar esta macro, puede copiar y pegar las dos piezas de código en un módulo estándar:

1. Activar el Editor de Visual Basic presionando ALT + F11.

2. derecha, haga clic en el nombre del proyecto / libro en la ventana del proyecto.

   Video: Crear Libro de macros personal en Excel PERSONAL.XLSB

3. Seleccione Insertar → Módulo.

   Video: Como saber si existe fichero en Excel - Capítulo 233

4. Escribir o pegar el código en el módulo recién creado.