A Alex Guest 25 Avril 2003 #1 Merci pour votre aide. Encore un problème: si je ne coche pas la case, il y a 'false'. je voudrais que ça n'écrive rien.
Merci pour votre aide. Encore un problème: si je ne coche pas la case, il y a 'false'. je voudrais que ça n'écrive rien.
E eric Guest 25 Avril 2003 #2 bonjour Private Sub CommandButton2_Click() if checkbox1=false then exit sub Range("A1") = CheckBox1.Caption End Sub Bon WE Vote positif 0 Vote négatif
bonjour Private Sub CommandButton2_Click() if checkbox1=false then exit sub Range("A1") = CheckBox1.Caption End Sub Bon WE
@ @Christophe@ Guest 25 Avril 2003 #3 Re Alex, je t'avais donné la solution dans l'autre fil, la revoila: If CheckBox1.Value = True Then Range("A1").Value = CheckBox1.Caption Else Range("A1").Value = "" End If @Christophe@ Vote positif 0 Vote négatif
Re Alex, je t'avais donné la solution dans l'autre fil, la revoila: If CheckBox1.Value = True Then Range("A1").Value = CheckBox1.Caption Else Range("A1").Value = "" End If @Christophe@