CheckBox

Bonjour.

Private Sub CheckBox1_Click()
If Me.CheckBox1 = True Then
[F5] = "X"
Else
[F5] = ""
End If
End Sub

Cordialement.
Daniel
"pedro" <pedro@discussions.microsoft.com> a écrit dans le message de news:
351618B1-EA11-4E9E-84F7-CC6D790D4AB3@microsoft.com...

Bonjour à tous

dans une userform j'ai un CheckBox1 et j'aimerais quand je mais un vu que
ça
mette une croix dans la cellule F5 et quand j'enlève le vu ça enlève la
croix
dans la cellule

merci beaucoup

Bonjour,

Private Sub CheckBox1_Click()
[F5] = IIf(Me.CheckBox1, "x", "")
End Sub

JB


On 4 mar, 15:50, "Daniel.C" <dZZZcolarde...@free.fr> wrote:

Bonjour.

Private Sub CheckBox1_Click()
    If Me.CheckBox1 = True Then
        [F5] = "X"
    Else
        [F5] = ""
    End If
End Sub

Cordialement.
Daniel
"pedro" <pe...@discussions.microsoft.com> a écrit dans le message de new s:
351618B1-EA11-4E9E-84F7-CC6D790D4...@microsoft.com...

Bonjour à tous

dans une userform j'ai un CheckBox1 et j'aimerais quand je mais un vu qu e
ça
mette une croix dans la cellule F5 et quand j'enlève le vu ça enlè ve la
croix
dans la cellule

merci beaucoup- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -

Bonsour® pedro avec ferveur ;o))) vous nous disiez :

dans une userform j'ai un CheckBox1 et j'aimerais quand je mais un vu
que ça mette une croix dans la cellule F5 et quand j'enlève le vu ça
enlève la croix dans la cellule

pourquoi ne pas utiliser dans la fenetre proriété , la propriété : Control
Source du Checkbox

ex : ControlSource þuil1!F6
en F6 apparaitra alors VRAI ou FAUX selon le cas
en F5 on pourra écrire : =Si(F5;"X";"")


--
--
@+
;o)))