Discussion :

[olivier777]

Bonjour à tous,

Dans mon formulaire, j'ai 2 cases à cocher (une "oui" et une "non) qui sont indépendantes.

Mais lorsque l'on clique dessus, aucune action se produit.

En récupérant sur un autre formulaire, le code de case à cocher voici ce que j'ai trouvé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub optOui_Click()
Me.optNon.Value = False
End Sub
 
Private Sub optNon_Click()
Me.optOui.Value = False
End Sub

Mais ça ne fonctionne pas.
J'aimerai également qu'à l'impression, cela imprime uniquement la case cochée.

Merci pour votre aide
Olivier

[nico84]

Bonjour,

Pour que "ça marche" il faut que les cases à cocher s'appellent respectivement "optoui" et "optnon" et déclarer dans leurs propriétés un évennement "sur click".

Ensuite c'est le code d'impression qui devra tester leur valeur pour savoir ce qu'il doit imprimer...

[olivier777]

Merci pour ta réponse,

L'action est bien sur un Evenement "Click" dans une "procédure évenementielle"

[fgiambelluco]

Bonjour
Si ce sont bien des cases à cocher, sur l'événement clic, il faut tester l'état de la case, du genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub optOui_Click()
    If Me.optOui.Value = True Then
        Me.optNon.Value = False
    Else
        Me.optNon.Value = True
    End If
End Sub

[olivier777]

Merci fgiambelluco pour ta réponse,

Ce sont bien des cases à cocher indépendantes, et dans la table, j'ai bien déclaré le champs en Oui/Non. Je fais également pointer les 2 cases sur ce champs. J'ai également créer une procédure événementielle "Sur click" dans laquelle j'ai insérer ton code.

Je joins une copie d'écran de mes cases à cocher

[fgiambelluco]

Re

J'ai également créer une procédure événementielle "Sur click" dans laquelle j'ai insérer ton code.

ça fonctionne ?

[olivier777]

J'ai oublié de mettre dans mon précédent message, que j'avais essayer de mettre le code dans une procédure évenementielle qui donnait le résultat en copie d'écrans jointe.

c'est a dire, aucune possibilité de cocher une case ou l'autre...

Merci de l'aide que vous m'apporter
Olivier

[fgiambelluco]

Re
Le formulaire ne serait-il pas en Lecture Seule ?

sinon il faut essayer le même code sur l'événement Après MAJ des cases à cocher

[olivier777]

J'ai remis le code sur l'évenement Après MAJ mais effet zéro !

Par contre, comment voir si le formulaire est en lecture seule ?

Merci
Olivier

[fgiambelluco]

Re
Plusieurs choses permettent de mettre un formulaire en lecture seule.

Vérifier les propriétés du formulaire:
- modifications autorisées : OUI
- type de recordset : surtout pas instantané

Vérifier que la source associée au formulaire n'est pas en lecture seule :
- essayer de créer un nouvel enregistrement dans le formulaire.

[olivier777]

Effectivement, ça marche lorsque je créé un nouvel enregistrement !!

Bizarre quand meme !

Merci en tout cas pour ton aide

Olivier

[LedZeppII]

Ce sont bien des cases à cocher indépendantes, et dans la table, j'ai bien déclaré le champs en Oui/Non. Je fais également pointer les 2 cases sur ce champs.

C'est pas très clair

1 champ - 2 contrôles liés au même champ ?

Je mettrai plutôt un groupe d'option lié (Source contrôle) au champ Oui/Non.
Et dans ce groupe d'option deux case à cocher (ou deux cases d'option).
Une pour Oui (Valeur = -1) et une pour Non (Valeur = 0).
Ça devrait faire (si j'ai bien compris) ce que tu cherches, sans code.

Si j'ai mal compris, peux-tu préciser quel contrôle est lié (propriété source contrôle) à quel champ ?
optOui lié à ... champ xxxx ? Aucun ?
optNon lié à ... champ xxxx ? champ yyyy ? Aucun ?

A+

[olivier777]

Merci pour ta réponse LedZeppII.

Quand tu dis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Je mettrai plutôt un groupe d'option lié (Source contrôle) au champ Oui/Non

Cela veut dire que les cases à cocher auront la même source controle ? c'est possible ça ?

Si c'est ça, et dans ce cas là, optOui et optNon sont liés au même champ (xxxxx)

et à l'impression, ça peut donner quoi par rapport à deux cases à cocher indépendantes ?

Merci
Olivier

[LedZeppII]

ça peut donner quoi par rapport à deux cases à cocher indépendantes ?

Le groupe d'option est lié au champ xxxx de type Oui/Non.
Les valeurs possibles sont -1 ou 0.
optOui et optNon sont liées au groupe d'options (pas de propriété "Source contrôle").
Le groupe d'option, en fonction de la valeur du champ xxxx, coche la case qui correspond à la valeur du champ xxxx et décoche les autres.

Si xxxx = Oui , la valeur est -1. optOui (-1) est cochée et optNon (0) est non cochée.
Si xxxx = Non , la valeur est 0. optOui (-1) est non cochée et optNon (0) est cochée.

Pour que ça fonctionne, c'est à dire que le groupe d'option contrôle les cases à cocher,
il faut déposer un groupe d'options, puis déposer des cases à cocher dans le groupe d'options (la surface du groupe d'options se met en surbrillance).
Si tu fais glisser tes cases actuelles dans le groupe d'options, cela ne marche pas.

Concernant l'impression du formulaire, les deux cases seront visibles.

Si tu ne veux imprimer que Oui ou Non selon la valeur du champ xxxx, tu peux mettre une zone de liste modifiable dont le champ xxxx est la source.
Format d'affichage : Oui/Non
Afficher : à l'impression
Contenu : Oui;Non
Origine Source : Liste Valeurs

Pour le groupe d'options
Afficher : à l'écran

De cette manière, le groupe d'option est visible en affiche mais pas à l'impression.
Pour la zone de liste modifiable, c'est l'inverse.

A+