Progressbar Résolu/Fermé

Question

bonjour le forum, voilà créer dans une feuilles de calcul avec un bouton qui m'ouvre un userForm avec la progressBar 'Microsoft ProgressBar control.V6'. Je connais pas le code qu'il faudrais mettre, Si quelqu'un peut m'aidé merci.

Quand je clic sur le bouton de la feuille je voudrais qu'a partir de là, la progressbar fontionne et enregistre toute mes données sur un temps donner et ferme le classeur active. Merci à ceux qu'il veulent bien m'aidés.

A+

Excel 2007

jh50160 · Answer

bonjour le forum
Voici le code que j'ai fait, il fonctionne mais il enregistre 2 fois ' la progressbar fait 2 fois sont role' pourquoi?

Private Sub UserForm_Activate()
Dim Boucle As Integer, Temps As Single
Label1 = "Veuillez Patienter"
For Boucle = 1 To 100
ProgressBar1.Value = Boucle
Temps = Timer + 0.1
Do While Timer < Temps
DoEvents
Loop
Pct.Caption = Boucle & "%"
Next Boucle
ActiveWorkbook.Save 'Sauvegarde le classeur'
Unload Me
Application.Quit
End Sub

Progressbar

1 réponse

Discussions similaires