Barre de progression d'une macro qui n'est pas dans un module
Bonjour à tous,
En faisaint une recherche sur ce forum, j'ai pu comprendre comment installer une barre de progression à l'aide d'un controle frame et label dans un userform. Dans ce userform, la méthode Userform_Initialize appelle alors la macro dont on veut suivre la progression. Cependant, cette macro se doit d'être dans un module.
J'ai essayé d'appelé une routine qui se trouve dans une feuille mais sans succès. Et comme c'est ma macro principal (elle est énorme!) et qu'elle fait appel a des listbox qui sont dans cete feuille et qui ne sont pas accesible dans les modules, j'aimerai la laisser où elle est....:D
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
Private Sub UserForm_Activate()
Call DWOS
UserForm_Initialize
End Sub
Private Sub UserForm_Initialize()
Me.Height = 76.5
Me.Width = 205
Me.Caption = "Traitement en cours..."
Frame1.Caption = "0%"
Frame1.Top = 19.5
Frame1.Height = 28
Frame1.Width = 195
Frame1.Left = 3
Label1.Caption = ""
Label1.BackColor = &HFF&
Label1.Height = 13
Label1.Width = 20
Label1.Top = 5
End Sub |
DWOS est une macro qu ise trouve dans un module, j'aimerai faire la meme chose avec une macro qui se trouve dans une feuille.
