Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Boucle sur message box

  • Initiateur de la discussion Initiateur de la discussion tactic6
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

tactic6

XLDnaute Impliqué
Bonjour le forum
Dans une macro j'ai intégré un contrôle de connection de disque dur externe
si le disque dur "H" n'est pas connecté la macro me previent et s'arrête
Code:
....
Dim Chemin As String
Chemin = "H:\"
If Dir(Chemin, vbDirectory) = "" Then
MsgBox "Le dossier dur  " & Chemin & " n'est pas connecté"
Else
...
Si je clic sur OK la macro est arretée et il faut que je la relance depuis le début

Comment modifier ce code pour que la msgbox reste et pour que la macro continue après avoir connecté mon HD et cliqué sur OK?

Merci pour votre aide


EDIT

J'ai contourné le problème en mettant le test de controle en début de macro mais une solution me serait très instructive
 
Dernière édition:
Re : Boucle sur message box

Bonjour tactic

pas sûr d'avoir bien compris ton problème... peut être ainsi :

Code:
Dim Chemin As String
Chemin = "H:\"
Do While Dir(Chemin, vbDirectory) = ""
MsgBox "Le dossier dur  " & Chemin & " n'est pas connecté"
Loop

bon après midi
@+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

A
Réponses
0
Affichages
875
Azuveus
A
B
Réponses
2
Affichages
1 K
bonjourdoc
B
A
Réponses
1
Affichages
3 K
adv0541
A
M
  • Question Question
Réponses
9
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…