Executer un code avec userform ouvert
Résolu
siamens_duj
Messages postés
212
Statut
Membre
-
siamens_duj -
siamens_duj -
Bonjour,
je viens vers vous car malgré toute les recherches que j'ai faites, je n'arrive pas à répondre
à ma question.
J'ai une macro qui appel plusieurs macros ( call toto, call tata ... ).
Pendant que ces macro s'exécute j'aimerais savoir où j'en suis, c'est pour cela que j'ai créé un userform
"pop" où est écrit "Veuillez patienter" et où se trouve également un label que je "colorie" au fur et à mesure que mes macros
se soit exécuté.
Pour être plus claire :
Mon problème est que je dois fermer le userform pour que la partie où il y a mon code s'exécute.
J'aimerais que le userform reste ouvert sans jamais se fermer et que le label se colorie au fur et à mesure
de l'exécution des macros.
Quelqu'un pourrait m'aider svp ??
je viens vers vous car malgré toute les recherches que j'ai faites, je n'arrive pas à répondre
à ma question.
J'ai une macro qui appel plusieurs macros ( call toto, call tata ... ).
Pendant que ces macro s'exécute j'aimerais savoir où j'en suis, c'est pour cela que j'ai créé un userform
"pop" où est écrit "Veuillez patienter" et où se trouve également un label que je "colorie" au fur et à mesure que mes macros
se soit exécuté.
Pour être plus claire :
sub toto
'Ici la barre, semblable à une ProgressBar n'est pas colorié car l'exécution de la première macro commence
pop.show
With pop
.LabelPROGBAR.Width = .LabelPROGBAR.Width / 20 'Dimenssion de la barre
.LabelPROGBAR.BackColor = RGB(16, 78, 139) 'Couleur de la barre
End With
'mon code
'Ici la barre est un peu colorié en bleu car c'est la fin de l'éxécution de la première macro.
pop.show
With pop
.LabelPROGBAR.Width = .LabelPROGBAR.Width / 10 'Dimension de la barre
.LabelPROGBAR.BackColor = RGB(16, 78, 139) 'Couleur de la barre
End With
end sub
sub titi
'Je reprend la dimension de le dernier "résultat" de la barre
pop.show
With pop
.LabelPROGBAR.Width = .LabelPROGBAR.Width / 10 'Dimension de la barre
.LabelPROGBAR.BackColor = RGB(16, 78, 139) 'Couleur de la barre
End With
'mon code
'la barre est un peu colorié en bleu car c'est la fin de l'exécution de la deuxième macro.
pop.show
With pop
.LabelPROGBAR.Width = .LabelPROGBAR.Width / 8 'Dimension de la barre
.LabelPROGBAR.BackColor = RGB(16, 78, 139) 'Couleur de la barre
End With
end sub
etc ...
Mon problème est que je dois fermer le userform pour que la partie où il y a mon code s'exécute.
J'aimerais que le userform reste ouvert sans jamais se fermer et que le label se colorie au fur et à mesure
de l'exécution des macros.
Quelqu'un pourrait m'aider svp ??
A voir également:
- Executer un code avec userform ouvert
- Code ascii - Guide
- Comment déverrouiller un téléphone quand on a oublié le code - Guide
- Code puk bloqué - Guide
- Cette action ne peut pas être réalisée car le fichier est ouvert dans system - Guide
- Code activation windows 10 - Guide
1 réponse
Bonjour,
J'ai une macro qui appel plusieurs macros ( call toto, call tata ...).
Cette macro doit etre appelee dans l'userform ex ici:
https://docs.microsoft.com/en-us/previous-versions/office/troubleshoot/office-developer/display-progress-bar-with-user-form-in-excel
J'ai une macro qui appel plusieurs macros ( call toto, call tata ...).
Cette macro doit etre appelee dans l'userform ex ici:
https://docs.microsoft.com/en-us/previous-versions/office/troubleshoot/office-developer/display-progress-bar-with-user-form-in-excel
l'userform ne s'ouvre pas alors que j'ai fais comme indiqué et lorsque j'appel ShowUserForm avec le reste de mes macros il me dit que la fenêtre est déjà ouverte !
Ma macro qui appelle les autre macros en appel 5, 6 avec le ShowUserForm mais je ne pense pas que le problème pourrait venir de là .. ?
Merci quand même.
Dans vos macros, enlevez les pop.show !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Sauf celle qui lance au debut........
J'ai donc modifié la macro, j'ai retiré le Main() et j'ai repris quelques éléments pour mettre à jour ma ProgressBar à chaque fin de macro mais maintenant il m'affiche mon userform vide, pas même le label n'est visible.
Pour avoir un affichage du label, c'est une multiplication pas une division !!!!!!
A la fin de ma première macro
A la fin de ma deuxième macro
et ainsi de suite
et dans allMacros