Boutons USF

[Evelynetfrancois]

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

 

[Le Fnake]

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

 

[Evelyne]

merci beaucoup
là je ne peux pas , mais tout a l'heure je ferais les modifs
je te tiens au courant
bonne journée
Evelynetfrancois

 

[Evelynetfrancois]

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

 

[Le Fnake]

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

 

[Evelynetfrancois]

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

 

[@+Thierry]

=> 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