Userform avec progressbar pendant exécution macro

  • Initiateur de la discussion Initiateur de la discussion davidp
  • 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 !

davidp

XLDnaute Occasionnel
Bonjour le forum,

je m'excuse de vous déranger à nouveau pour un nouveau sujet.
j'ai bien avancé sur un projet durant la journée mais là je n'y arrive pas malgrés l'historique du forum.

mon problème est le suivant:

j'ai une macro qui s'effectue pendant environ 25 secondes (fichier light en annexe) ,j'aimerai faire apparaitre un userform avec un progressbar pendant que la macro travaille pour permettre à l'utilisateur de patienter.

Si quelqu'un peux m'aider , cela me rendra un grand service ,ce n'est pas urgent (je n'ai pas mon patron derriere moi...)


Merci d'avance pour votre aide
Pascal
 

Pièces jointes

Re : Userform avec progressbar pendant exécution macro

Bonsoir

Pour afficher la progression il suffit d'utiliser un "ProgressBar"

Code:
Private Sub CommandButton1_Click()

ProgressBar1.Visible = True
 Sheets("base").Select
    Range("A1").Select
Dim c As Range
For Each c In Range("d6:d120")
ProgressBar1.Value = c.Row ' évolution de la progressbar
If c.Value = "" Then
    c.EntireRow.Hidden = True
End If
Next
Unload Me
End Sub


Private Sub UserForm_Initialize()

ProgressBar1.Max = 130
ProgressBar1.Visible = False
End Sub

A tester

Bon week end
JP
 
Re : Userform avec progressbar pendant exécution macro

Bonsoir à tous,

Juste une info complémentaire : Si ce contrôle ne figure pas dans la boite à outils il faut l'installer en suivant le manuel de mimi/Silkyroad/MichelXld.... :
Faites un clic droit dans la boite à outils Ensuite choisissez l'option "Controles supplémentaires"
Recherchez l'objet "Microsoft ProgresBar Control version 6.0" dans la liste
Cochez la ligne pour ajouter l'objet
Cliquez sur OK pour valider
Cordialement
 
Re : Userform avec progressbar pendant exécution macro

Un grand merci, c'est génial

ça fonctionne dans la configuration de mon projet.

J'espère que l'application servira à d'autres personnes du forum

Merci encore à tous et bonne soirée
Pascal
 
- 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

Discussions similaires

Retour