Menu

A l'ouverture d'excel vérifier sur le disque dur si fichier X ex [Résolu/Fermé]

viret1290 109 Messages postés samedi 17 août 2013Date d'inscription 14 juin 2017 Dernière intervention - 14 juin 2017 à 18:57 - Dernière réponse : viret1290 109 Messages postés samedi 17 août 2013Date d'inscription 14 juin 2017 Dernière intervention
- 14 juin 2017 à 19:37
Bonjour,

J'aimerai faire que quand j'ouvre mon fichier Excel, il vérifie si le fichier X.text existe sur le disque C, si oui il s'ouvre autrement il se referme sans enregistrer.

merci de votre aide
Afficher la suite 

2 réponses

Patrice33740 6957 Messages postés dimanche 13 juin 2010Date d'inscription 15 juin 2018 Dernière intervention - 14 juin 2017 à 19:16
0
Merci
On peut faire ça avec une macro VBA mais ça ne fonctionnera que si les macros sont activées !
Il suffira de désactiver les macro pour l'ouvrir sans qu'il se referme.
viret1290 109 Messages postés samedi 17 août 2013Date d'inscription 14 juin 2017 Dernière intervention - 14 juin 2017 à 19:37
0
Merci
J'ai trouvé la solution pour moi.

la voici

Private Sub Workbook_Open()

Dim chemin As String

If Cells(1, 6) <> "" Then
chemin = Cells(1, 6)
If Dir(chemin) = "" Then
If MsgBox("Il faut utiliser l'ordinateur de l'entretien Extérieur.", vbOKOnly) Then
ThisWorkbook.Close
End If
Else

End If
End If
End Sub

merci de votre aide