Checkbox

Résolu
ordinateur! -  
 ordinateur! -
Bonjour,

J'ai crée 3 checbox le probleme il ne marche pas bien

CheckBox1
CheckBox2
CheckBox3
dans chaque checkbox j'ai mis ce code

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then

Range("A47").Select
ActiveCell.FormulaR1C1 = "ste"
End If

If CheckBox1.Value = False Then

Range("A47").Select
ActiveCell.FormulaR1C1 = " "
End If

End Sub


merci pour votre aide




EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici : ICI

Merci d'y penser dans tes prochains messages.

1 réponse

ordinateur!
 
problème regle
0