Bonjour,

Je cherche désespérément comment garder la valeur d'une variable entre deux userform
Je me suis suis inspiré des précédentes discussion et je suis arrivé à cela (en simplifiant mon code)

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
 
Public NumG As Integer
 
Private Sub btnok_Click()
 
NumG = Range("D" & Rows.Count).End(xlUp).Row + 1
MsgBox (NumG)
 
 
UserForm1.Show
 
 
End Sub
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Private Sub UserForm_Initialize()
Dim x As Integer
 
NumL = Range("D" & Rows.Count).End(xlUp).Row
MsgBox ("numG" & NumG)
MsgBox ("numl" & NumL)
MsgBox ("x" & x)
For x = NumG To NumL
Next x
End Sub

Code 1 LIgne 8 : Msgbox = 46

Code 2 Ligne 6 : Msgbox = ""


Quelqu'un voit-il où est mon erreur ??


En vous remerciant

Bon week end