Bonjour,
Comment peut-on initializer la page 1 d'un multipage à la maniere d'un userform.
Voila le code d'initialisation :
Merci d'avance
Comment peut-on initializer la page 1 d'un multipage à la maniere d'un userform.
Voila le code d'initialisation :
Code:
i = 1
Do
i = i + 1
Loop While Sheets("MAT").Cells(i, 2).Value <> 0
TIME = i
For J = 1 To 6
If Sheets("MAT").Cells(i, J + 6).Value <> "" Then
Me.Controls("checkbox" & J).Visible = True
Me.Controls("checkbox" & J).Caption = Sheets("MAT").Cells(i, J + 6).Value
End If
Next J