Bonsoir à tous du forum,
j'ai une check box dans userform, dont je voudrais
si on clique dessus, que autre userform "info" n'est plus affiché
et mis valeur 5 sous Range("A1").
Si on clique par après une autre fois dessus ou lorsqu'on a fermé le fichier et ouvert de nouveau, qu'on clique dessus sur la checkbox, que userform "info" est visible et ne met pas de valeur sous Range("A1"),
mais ceci ne fonctionne pas. Dès qu'on a cliqué dessus est toujours
la valeur 5 sous Range ("A1").
L'expression que j'utilise:
Private Sub CheckBox1_Click()
On Error Resume Next
If CheckBox1 = True Then
Range("A1").Value = 5
info.Show
Unload info
MsgBox "verify"
Else
Range("A1").Value = ""
End If
End Sub
peut-être USF n'est pas bien utilisé ou comment je dois modifier ?,
bonne soirée encore,
j'ai une check box dans userform, dont je voudrais
si on clique dessus, que autre userform "info" n'est plus affiché
et mis valeur 5 sous Range("A1").
Si on clique par après une autre fois dessus ou lorsqu'on a fermé le fichier et ouvert de nouveau, qu'on clique dessus sur la checkbox, que userform "info" est visible et ne met pas de valeur sous Range("A1"),
mais ceci ne fonctionne pas. Dès qu'on a cliqué dessus est toujours
la valeur 5 sous Range ("A1").
L'expression que j'utilise:
Private Sub CheckBox1_Click()
On Error Resume Next
If CheckBox1 = True Then
Range("A1").Value = 5
info.Show
Unload info
MsgBox "verify"
Else
Range("A1").Value = ""
End If
End Sub
peut-être USF n'est pas bien utilisé ou comment je dois modifier ?,
bonne soirée encore,
Pièces jointes
Dernière édition: