verifica directory presente

Hai un problema con Excel?

Nuova discussione

verifica directory presente
di robybarc data: 31/08/2015 11:14:44
Ciao a tutti,
spesso lavorando su un mio progetto devo andare alla ricerca di alcuni dati su un supporto esterno ( pen-drive ) che per default metto sempre in D:AB
ma a volte mi capita di dimenticare di inserire la pen-drive e mi blocca la macro.
Ho provato diverse soluzioni di controllo ma non ho trovato quella giusta.
Il codice che usavo con le vecchie macro 4.0 è quello sotto, ma non riesco a stilarlo in VBA.
Grazie
Roberto
=ERRORE(FALSO) =DIRECTORY("D:AB") =SE(DIRECTORY("D:AB")=VERO) =CARTELLA.DI.LAVORO.SELEZIONA("AA") =AVVISO("ATTENZIONE - INSERIRE LA PENDRIVE PER CONTINUARE";3) =FERMA() =FINE.SE()

di patel data: 31/08/2015 12:32:14
prova questa

Sub folderExist()
If Not Dir("E:prova", vbDirectory) = vbNullString Then
  MsgBox "E:prova" & " esiste"
Else
  MsgBox "E:prova" & " non esiste"
End If
End Sub

di robybarc data: 31/08/2015 14:27:49
Grazie
avevo trovato un altro codice ma era più complesso, il tuo va benissimo,

ciao
Roberto

Vuoi Approfondire?