bonjour,
voila j'essaye de faire un progressbar mais je commence a m'arracher les cheveux.
actuellement j'affiche ma progression via statusbar et ca marche
voici la fin du code dans le module1
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 Application.StatusBar = "test N° " & T & "  /  " & lignefin - 3 ' ca c'est OK
call Bar ' ca ca marche pas
Loop Until T = lignefin2 - 2
et voici le code dans l'userform
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Private Sub bcapa_Click()
Call Capabilité
End Sub
 
 
Public Sub Bar()
Application.ScreenUpdating = False
  With ProgressBar
    .Min = 0
    .Max = lignefin - 3
    .Value = N
    Label1 = N
    DoEvents
  End With
  Application.ScreenUpdating = True
End Sub
pour expliquer un peu ma macro dans le module1
elle realise des test "N" de capabilité. "N" s'incremente a chaque test.
lignefin-3 represente le nombre total de test.
le probleme si je ne me trompe pas c'est que je n'arrive pas a recuperer la valeur de "N" et "lignefin-3" dans mon userform, mais la je métrise pas du tout

merci d'avance