Bonsoir,
voilà je souhaiterais modifier le chemin de recherche de fichiers.
Actuellement la macro ci-dessous cherche les fichiers 1 2 et3 dans le dossier ou se trouve le fichier.
Je souhaiterais que le chemin soit unique dans le dossier c:\alpha\
comment modifier la macro svp? Merci
Sub VerifDossier()
If ExisteClassseur(ThisWorkbook.Path & "\fichier1.xls") = False Then Err.Raise vbObjectError + 1, "fichier1.xls"
If ExisteClassseur(ThisWorkbook.Path & "\fichier2.xls") = False Then Err.Raise vbObjectError + 1, "fichier2.xls"
End Sub
voilà je souhaiterais modifier le chemin de recherche de fichiers.
Actuellement la macro ci-dessous cherche les fichiers 1 2 et3 dans le dossier ou se trouve le fichier.
Je souhaiterais que le chemin soit unique dans le dossier c:\alpha\
comment modifier la macro svp? Merci
Sub VerifDossier()
If ExisteClassseur(ThisWorkbook.Path & "\fichier1.xls") = False Then Err.Raise vbObjectError + 1, "fichier1.xls"
If ExisteClassseur(ThisWorkbook.Path & "\fichier2.xls") = False Then Err.Raise vbObjectError + 1, "fichier2.xls"
End Sub