Bonjour,
Dans un USF, j'ai une série de CheckBox. Lorsque je clique sur une checkBox, cela rend visible un Textbox.
J'ai donc fait :
A tout hasard, n'y aurait-il pas une "écriture plus "fluide"....c'est à dire une boucle style
....car là, j'ai simplifié et en fait lorsque le checkbox passe à true, il y a plusieurs textboxs, DtPicker qui deviennent visibles....
En vous remerciant pour votre aide et/ou conseils....
Dans un USF, j'ai une série de CheckBox. Lorsque je clique sur une checkBox, cela rend visible un Textbox.
J'ai donc fait :
Code:
Private Sub CB1_change()
AN1.Visible = True
End Sub
Private Sub CB2_change()
AN2.Visible = True
End Sub
Private Sub CB3_change()
AN3.Visible = True
End Sub
Private Sub CB4_change()
AN4.Visible = True
End Sub
Private Sub CB5_change()
AN5.Visible = True
End Sub
Private Sub CB6_change()
AN6.Visible = True
End Sub
Private Sub CB7_change()
AN7.Visible = True
End Sub
Private Sub CB8_change()
AN8.Visible = True
End Sub
Private Sub CB9_change()
AN9.Visible = True
End Sub
Private Sub CB10_change()
AN10.Visible = True
End Sub
Private Sub CB11_change()
AN11.Visible = True
End Sub
Private Sub CB12_change()
AN12.Visible = True
End Sub
Private Sub CB13_change()
AN13.Visible = True
End Sub
Private Sub CB14_change()
AN14.Visible = True
End Sub
Private Sub CB15_change()
AN15.Visible = True
End Sub
Code:
For i = 1 to 15
Me.controls("CB" & i)
En vous remerciant pour votre aide et/ou conseils....