Validar si una carpeta existe en excel
estoy creando una macro la cual crea una carpeta, necesito validar antes si dicha carpeta existe, para ello estoy usando el siguiente código:
If Dir(Range("C_rutaCarpeta").Value, vbDirectory) <> "" Then
sin embargo si un archivo tiene el mismo nombre de la carpeta el código falla pues las condiciones se cumplen. Que opción tengo para validar solo la carpeta.y no solo el nombre.
1 respuesta
No es posible que Excel confunda una carpeta con un archivo.
Ej:
Sub ExisteDir()
Dim miDire
'la variable guarda la ruta o directorio de la carpeta que buscamos
miDire = "D:\carpetas Datos\descargas\TRABAJOS"
'si la carpeta existe enviará mensaje
If Dir(miDire, vbDirectory) <> "" Then MsgBox "Existe"
End Sub
Si TRABAJOS fuese un archivo tendría extensión... y ya no se cumpliría la condición.
Si el problema persiste aclarame el contenido del range.
