Startus
XLDnaute Occasionnel
Bonsoir à tous ...
Par soucis de raccoucir mes code j'aimerai modifier une chose dans code, mais jusqu'ici sans succès:
Je le modifie comme cela :
Je ne sais pourquoi, je n'arrive pas a affecter une variable a une TextBox ???
Par soucis de raccoucir mes code j'aimerai modifier une chose dans code, mais jusqu'ici sans succès:
Code:
Private Sub UserForm_Initialize()
' Initialise la boite
TextBox1 = Format(ActiveCell.Offset(0, 0), 'dd/mm')
TextBox2 = ActiveCell.Offset(0, 1)
TextBox3 = ActiveCell.Offset(0, 2)
TextBox4 = ActiveCell.Offset(0, 3)
TextBox5 = ActiveCell.Offset(0, 4)
End Sub
Je le modifie comme cela :
Code:
Private Sub UserForm_Initialize()
' Initialise la boite
TextBox1 = Format(ActiveCell.Offset(0, 0), 'dd/mm')
For i = 2 To 5
textbox & i =ActiveCell.Offset(0,i+1)
Next i
End Sub
Je ne sais pourquoi, je n'arrive pas a affecter une variable a une TextBox ???