[VBA-E] vérification fichier existant
Bonjour
Je fais une macro à base de 3 fichiers
- le fichier principal
- le fichier1 d'où j'extrais une feuille1 que je mets das le principal
- le fichier2 d'où j'extrais une feuille2 que je mets das le principal
tout marche bioen hormis dans les cas à la c*** :?
en effet, si un des 2 fichiers "fichier1" ou "fichier2" est absent il y a en toute logique plantage... mais comment détecter ce phénomème avant de faire planter l'appli et en sortir proprement avec un gentil message (genre comme les IOexception de java) ?
j'ai tenté avec dir... mais ca foire, j'ai pas le chemin absolu, me faut le chemin relatif
pour l'existence de la feuille dans le fichier, j'ai trouvé, c'est ok
avec
Code:
1
2
3
4
5
6
7
8
| Function FeuilleExiste(NomFeuille) As Boolean
On Error GoTo err
Debug.Print Sheets(NomFeuille).Name
FeuilleExiste = True
Exit Function
err:
FeuilleExiste = False
End Function |
merci d'avance !!!
