F
François
Guest
Bonjour le forum,
J'ai un Userform dans lequel j'ai 2 ListBox. J'aimerais que dans ceux-ci apparaisse la valeur de 2 cellules. J'ai essayé cela :
Private Sub CmdValider_Click()
Dim L As Integer
Me.LB1.RowSource = Worksheets('Inventaire').Range('h65536').End(xlUp).Offset(0, 0).Address
Me.LB2.RowSource = Worksheets('Inventaire').Range('k65536').End(xlUp).Offset(0, 0).Address
mavar = TextBox1.Value + TextBox2.Value + TextBox3.Value
TextBox1:
If TextBox1.Value = '' Then
...
mais sans succès.
Quelqu'un aurait la réponse.
Merci
J'ai un Userform dans lequel j'ai 2 ListBox. J'aimerais que dans ceux-ci apparaisse la valeur de 2 cellules. J'ai essayé cela :
Private Sub CmdValider_Click()
Dim L As Integer
Me.LB1.RowSource = Worksheets('Inventaire').Range('h65536').End(xlUp).Offset(0, 0).Address
Me.LB2.RowSource = Worksheets('Inventaire').Range('k65536').End(xlUp).Offset(0, 0).Address
mavar = TextBox1.Value + TextBox2.Value + TextBox3.Value
TextBox1:
If TextBox1.Value = '' Then
...
mais sans succès.
Quelqu'un aurait la réponse.
Merci