ouvrir un fichier Excel, mais pas de plantage s'il n'existe pas

Le
Sunburn
Bonjour,
comment par macro demander l'ouverture d'un fichier Excel précis, mais si
celui-ci n'existe pas, alors pas de plantage, mais plutot un message : "pas
possible".
j'ai réussi à faire ça, mais ça me convient pas.
-
Sub Maj()
rep = MsgBox("Voulez-vous mettre à jour votre classeur ?" & vbLf & vbLf & _
"IMPORTANT : vous devez être en TSE", vbYesNo)
If rep = vbYes Then
On Error Resume Next
Workbooks.Open Filename:="G:BIBLIOEXPERTMAJMaj-R.xls"
Else
Exit Sub
End Sub
-
MERCI.
YANN
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
FFO
Le #18462111
Bonjour à toi

Essaies ceci :

If Dir("G:BIBLIOEXPERTMAJMaj-R.xls", vbDirectory) <> "" Then
Workbooks.Open "G:BIBLIOEXPERTMAJMaj-R.xls"
Else
MsgBox ("Pas possible")
End If

Celà devrait convenir
Dis moi !!!!
Sunburn
Publicité
Poster une réponse
Anonyme