Comprobar si existe una ruta de carpeta en su PC usando Excel VBA

¿Necesita verificar si existe una ruta de carpeta en su computadora usando Excel? Esta guía explica cómo usar una función VBA personalizada para comprobar rutas de carpetas y devolver VERDADERO o FALSO según su validez.

Comprobar si existe una ruta de carpeta en Excel con una función definida por el usuario

Comprobar si existe una ruta de carpeta en Excel con código VBA

Puede hacer lo siguiente para verificar si una ruta de carpeta es accesible en el sistema de archivos local.

1. Presione simultáneamente las teclas "Alt" + "F11" para abrir la ventana "Microsoft Visual Basic para Aplicaciones".

2. En la ventana "Microsoft Visual Basic para Aplicaciones", haga clic en "Insertar" > "Módulo". Luego, copie y pegue el siguiente código VBA en la ventana de Código.

Código VBA: Comprobar si existe una ruta

Public Function CheckDir(Directory As String) As Boolean
    On Error GoTo ErrNotExist
    Call ChDir(Directory)
    CheckDir = True
    Exit Function
ErrNotExist:
    CheckDir = False
End Function

3. Presione simultáneamente las teclas "Alt" + "Q" para cerrar la ventana "Microsoft Visual Basic para Aplicaciones".

4. Seleccione una celda en blanco, ingrese esta fórmula en la Barra de fórmulas y luego presione la tecla "Enter".

=CheckDir(A2)

Nota: A2 es la celda que contiene la ruta de la carpeta que desea verificar.

Si el directorio especificado es accesible en el sistema de archivos local de la computadora donde se está ejecutando Excel, obtendrá un resultado "VERDADERO". De lo contrario, mostrará el resultado "FALSO".