Comprobar si un fichero existe

19/07/2006 - 18:28 por TICA | Informe spam
Hola,
necesitaria saber si se puede detectar si un path existe, o no.
Me explico, en una columna tengo creados una serie de paths a mi c:\, y
necesito saber si son reales, o no.
Es decir... yo tengo el fichero XX.jpg en mi c:\ y en la columna A tengo
creado en la primera línea c:\xx.jpg, y en la segunda c:\yy.jpg.
Necesito poner en la columna B una función que me devuelva un 1/0... o un
verdadero/falso... o un si/no en función de si ese path existe, o no.
En el ejemplo, en la primera línea me devolvería un 1 (verdadero) y en la
segunda un 0 (falso)

Si esto no és posible... quizá alguien me pueda decir cómo capturar el path
correcto... pero pensar que estoy hablando de mas de doce mil ficheros!!! por
lo que hacerlo manual no me lo planteo ;)

gracias,
Tica
 

Leer las respuestas

#1 Francisco Mty
19/07/2006 - 18:52 | Informe spam
Post de Fernando Arroyo:

Function HayFoto(rArtículo As Range) As String
If Dir("C:\prueba\" & rArtículo.Value & ".jpg") <> "" Then HayFoto =
rArtículo.Value & ".jpg" Else HayFoto = ""
End Function

Modifica este codigo segun tus necesidades
Saludos

Preguntas similares