checkbox valeur 1 au lieu de vrai

Pierrot93

XLDnaute Barbatruc

• 19 Janvier 2013

• #2

Re : checkbox valeur 1 au lieu de vrai

Bonjour,

regarde peut être ceci :

Code:

MsgBox CInt(CheckBox2) * -1

bonne journée
@+

 

Vote positif 0 Vote négatif

A

anneh

Guest

• 19 Janvier 2013

• #3

Re : checkbox valeur 1 au lieu de vrai

j'ai trouvé la solution si ça peut aider quelqu'un

Private Sub CommandButton1_Click()
If CheckBox1.Value = True Then
Range("a1").Value = "1"
Else
Range("a1").Value = "0"
End If

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 19 Janvier 2013

• #4

Re : checkbox valeur 1 au lieu de vrai

Re,

en adaptant ce que j'avais proposé....

Code:

Private Sub CommandButton1_Click()
Range("a1").Value = CInt(CheckBox1) * -1
End Sub

 

Vote positif 0 Vote négatif

A

anneh

Guest

• 19 Janvier 2013

• #5

Re : checkbox valeur 1 au lieu de vrai

merci c encore mieux!

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 19 Janvier 2013

• #6

Re : checkbox valeur 1 au lieu de vrai

salut

et ainSi... ?

Code:

Private Sub CommandButton1_Click()
  [A1] = -CheckBox1
End Sub

 

Vote positif 0 Vote négatif