Ok, ben j'avais vraiment pas compris lol
Il faut que tu utilises le controle progressbar, par contre, c toi qui gère l'état d'avancement.
Pour avoir ce composant:
projet, composant et tu selectionnes:
Microsoft Windows Common Controls 6.0(sp4) et tu valides.
Dans la boite d'outils apparaitra le composant progressbar

Tu prends une feuille, tu y place un progressbar, un bouton et un timer. ensuite tu copies et colle le code ci-dessous

'Voici un exemple
Private Sub Command1_Click()
Me.Timer1.Enabled = False
Me.Timer1.Interval = 100 '0.1 secondes
Me.Timer1.Enabled = True
Me.ProgressBar1.Min = 0
Me.ProgressBar1.Max = 100 '10 seconde de progression
Me.ProgressBar1.Value = 0 'valeur de départ à 0 (barre vierge)
End Sub

Private Sub Timer1_Timer()
Me.ProgressBar1.Value = Me.ProgressBar1.Value + 1
If Me.ProgressBar1.Value = Me.ProgressBar1.Max Then
'c fini, il faut arreter le timer pour eviter un débordement
Me.Timer1.Enabled = False
MsgBox "Fini"
End If
End Sub

voilà a+