Affichage d'un userform devant un excel

Bonjour,

je lance une macro à l'aide d'un bouton situé sur une feuille. Afin de suivre l'état d'avancement de ma macro, j'ai insérer un userform sur lequel j'ai placé 1 progressbar. Cependant, celui-ci m'affiche un fond tout blanc sans progressbar. (vous trouverez en PJ les imprim écran de mon écran en mode création et de celui pendant ma macro)

Code dans ma macro lors de l'ouverture du UserForm1 :

Code:

---

UserForm1.Show

---

J'ai pourtant réglé le ShowModal sur False.

Avez-vous une réponse à ce problème???

Merci d'avance pour vos réponses

AD

Bonjour

Il faut placer DoEvents au début de la procédure, voire juste avant la ligne de rafraîchissement de la progressbar.

Un peu plus de code serait bienvenu

En effet, le DoEvents permet de s'affranchir du fond blanc, merci. Je vois ma progressbar. Cependant, celle-ci ne se met pas à jour, elle reste vierge :

Code:

---

1 2 3 4 5 6 7 8 9 10

UserForm1.Show 'avec le ShowModal sur False   While Range("D" & i) <> "" DoEvents ProgressBar1 = (i - 41) * 100 / NbReferencesATraiter '[CODE ASSEZ LONG A TRAITER] '[...] Wend

---

Ce code est stocké dans un module.

Auparavant, je l'avais stocké sous un bouton du UserForm dans lequel est ma progressbar, je voyais bien mes bars avancer, mais là : rien!