Comment ne pas voir une MsgBox, lors d'une exécution de macro
Résolu/Fermé
A voir également:
- Comment ne pas voir une MsgBox, lors d'une exécution de macro
- Voir match en direct gratuitement - Guide
- Comment voir qui regarde mon profil facebook - Guide
- Macro logiciel - Télécharger - Organisation
- Voir qui regarde mon profil instagram - Guide
- Lancer une macro dans une macro - Astuces et Solutions
2 réponses
f894009
Messages postés
16904
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
18 mars 2023
1 678
15 août 2017 à 08:52
15 août 2017 à 08:52
Bonjour,
PopUp au lieu de MSGBOX
exemple, a adapter:
PopUp au lieu de MSGBOX
exemple, a adapter:
Sub msgbox()
debut = Timer
'object.Popup(strText,[nSecondsToWait],[strTitle],[nType])
CreateObject("wscript.shell").popup "Terminé en " & Timer - debut & " secondes", 1, "durée"
End Sub
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 762
Modifié le 15 août 2017 à 10:03
Modifié le 15 août 2017 à 10:03
Bonjour,
« une cellule qui contiens une MsgBox lors de sa sélection »
Une cellule ne peut pas contenir de MsgBox, je suppose donc que c'est un évènement qui fait apparaître le MsgBox (probablement SelectionChange), si c'est le cas, tu peux inhiber les évènements pendant la copie, cela empêchera l'apparition du message :
Cordialement
Patrice
« une cellule qui contiens une MsgBox lors de sa sélection »
Une cellule ne peut pas contenir de MsgBox, je suppose donc que c'est un évènement qui fait apparaître le MsgBox (probablement SelectionChange), si c'est le cas, tu peux inhiber les évènements pendant la copie, cela empêchera l'apparition du message :
Application.EnableEvents = False 'ici tu fais ta copie de cellule Application.EnableEvents = True
Cordialement
Patrice