[VBA-E] vérification fichier existant

**MatMeuh** · 14/06/2006, 16h29

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 !!!

**jmfmarques** · 14/06/2006, 16h45

Encore cette question !
Il y a une foule de sujets identiques + la FAQ de ce forum

Fais des recherches (vraiment rapides) s'il te plait !

**MatMeuh** · 14/06/2006, 17h03

dsl... j'ai rapidement cherché et j'ai trouvé le "dir" qui ne me va pas (chemin absolu genre "c:/bidule/truc/fichier") alors que moi je veux une version "relative" (à partir de l'endroit où je lance la macro)

merci

je vais encore cherché mais...