Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.
  • Initiateur de la discussion Initiateur de la discussion Evelynetfrancois
  • 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 !

E

Evelynetfrancois

Guest
Bonjour le Forum
voici ma Q

Sur un USF j'ai un bouton "OK"
peut-on le faire devenir "patienter"
pendand l'éxecution de la macro

Bonne journée à toutes et tous !

Evelynetfrancois
 
bonjour Evelynetfrancois

il suffit de mettre au debut de la macro associée au bouton :

NomduboutonOk.caption="Patientez SVP"

Puis à la fin remettre le OK avec le meme principe (sinon, le patientez SVP reapparaitra a la prochaine utilisation de l'USF).

Le Fnake
 
et bien voilà

j'ai mis
Private Sub UserForm_Initialize()
CommandButton1.Caption = "ok."
etdans
Private Sub CommandButton1_Click()
CommandButton1.Caption = " Patientez svp...."

tout fonctionne à merveille avec la touche F8
mais si je lance reellement la macro (F5)
là, CommandButton1.Caption = " Patientez svp...."ne passe pas ???
avez vs une idée ou deux
merci d'avance !!
Evelynetfrancois
 
Ben euh... moi ca marche... je vois pas trop. C'est ptet Excel qui bug, ca peut arriver. Ferme Excel et réessaye. Ou alors un problème de version, moi je suis sous 2000.

Le Fnake
 
pour infos
ça y est j'ai la soluce :
DoEvents

suite à un passage dans l'aide VBA.
DoEvents Cède le contrôle au système d'exploitation.
DoEvents passe la main au système d'exploitation jusqu'à ce que ce dernier ait terminé de traiter les événements .

moi aussi dans un projet ou il n'y avez que le probleme bouton ça marcher ,mais une fois implanter dans la macro (enorme)ca ne passait plus il fallait redonner la main un cour instant au systeme d'exploitation
merci pour tout
bonne journée


Evelynetfrancois
 
=> DEMO Userform Update Affichage Pendant Macro Avec => DoEvents

Bonjour Evelyne et François et Le Fnake

Bon ben l'aide a été plus rapide que moi.... Mais merci de faire partager vos solutions sur le Forum !

Ci-joint une démo un peu en retard !!! Mais çà pourra ptet donner des idées à d'autres....


Bon Aprèm
@+Thierry
 

Pièces jointes

- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
18
Affichages
421
Réponses
3
Affichages
156
Réponses
32
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…