[Toutes versions] Groupe d' option [Résolu]

[Aladin_23]

Bonsoir le forum.
Je reviens vers vous car j' ai cloturé un post de groupe d' option à tort. J' ai essayé de suivre les conseils de loufab pour la création mais je nem' en sors pas. Je suis en train de faire un groupe d' option avec bouton option.
avec des valeurs 1, 2,3 et moi je veux remplacer ces valeurs par J, M et S.
Ce sont ces valeurs qui doivent s' inserer dans le champ de la table.
J' essaye de la faire avec un ISERT INTO mais j' ai des soucis avec

Voila mon code

Code :

1
2
3
4
5
6
7
8
9
10
11
Private Sub Abscences_AfterUpdate()
If Abscences = 1 Then
  DoCmd.RunSQL ("INSERT INTO Congés(Soir ou Matin) VALUES ("J");"
End If
If Abscences = 2 Then
  DoCmd.RunSQL "INSERT INTO Congés (Soir ou Matin) VALUES ("M");"
End If
If Abscences = 3 Then
  DoCmd.RunSQL "INSERT INTO Congés (Soir ou Matin) VALUES ("S");"
End If
End Sub

Merci d' avance pour toute aide sur la conception du code
Aladin





'

[vodiem]

salut Aladin_23,

ce serait plus correct ainsi:

Code :

DoCmd.RunSQL "INSERT INTO Congés ([Soir ou Matin]) VALUES ("S");"

[Aladin_23]

bonsoir vodiem et le forum
Merci d' avoir répondu. J' ai modifié mon INSERT INTO voici le code

Code :

 DoCmd.RunSQL "INSERT INTO Congés ([Soir ou Matin]) VALUES ('J');"

Le INSERT INTO fonctionne mais j' ai deux pb
D' abord il m' averti que j' ajouterai une ligne si j' active un des trois choix et dexièmement me met la valeur numérique dans le champ. Moi je ne veux que la valeur texte.
Aladin

[vodiem]

Envoyé par Aladin_23

il m' averti que j' ajouterai une ligne

Code :

DoCmd.SetWarnings False

Envoyé par Aladin_23

me met la valeur numérique dans le champ

la valeur enregistrée est celui de VALUES donc texte, si tu vois numérique c'est qu'il y a une association avec une liste.

[Aladin_23]

Bonjour le forum
Non il n' y a pasd' association avec aucune liste. C' est simplement remplace les valeurs du groupe d' option et par mon texte. Et faire en sorte qu' il ne me rajoute pas de ligne car c' est un controle aussi
Aladin

[vodiem]

Envoyé par Aladin_23

valeur numérique dans le champ

Envoyé par Aladin_23

valeurs du groupe d' option

il s'agit de remplacer quoi? les valeurs d'option du groupe ou du champ?

Envoyé par Aladin_23

faire en sorte qu' il ne me rajoute pas de ligne

pas rajouter de ligne... avec un INSERT INTO ca va être difficile...

Envoyé par Aladin_23

car c' est un controle aussi

c'est quoi qui est aussi un controle ???

6h du mat... tu pourrais rédiger ca quand t'auras fini ton cauchemard ? parce là, j'y comprends rien.

tu chercherais pas à affecter à un champ le choix d'un groupe d'option ?

[Aladin_23]

Bonjour le forum
C' est exact je veux affecter a un champ le choix d' un groupe d' option. En remplacent les valeurs par default par mes propes valeurs.
Aladin

[vodiem]

Code :

1
2
3
4
5
6
7
8
Private Sub Abscences_AfterUpdate()
Select Case Abscences
    Case 1: [Soir ou Matin] = "J"
    Case 2: [Soir ou Matin] = "M"
    Case 3: [Soir ou Matin] = "S"
End Select
Form.Refresh    'éventuellement : actualiser
End Sub

c'est ca que tu recherches?

[caramel88]

Bonjour,
Je débute sur access et dois réaliser un formulaire avec plusieurs groupes d'option. Pour créer mes groupes d'option, les valeurs textes sont remplacées par des valeurs numériques (ex: homme = 1 et femme = 2). Du coup, ce sont les valeurs numériques qui s'affiche dans la table et non le texte. Existe-il une autre manière de résoudre ce cas sans passer par la macro (inutile de préciser que je suis une quiche en macro^^)

[Aladin_23]

Bonsoir le forum
vodiem ce code je l' ai déja éssayé mais j' ai toujours les valeurs1, 2, ou 3 qui sont stocké dans mon champ à la place des lettres J, M ou S. mais c' est dans ce style de code.
Aladin

[vodiem]

@Aladin_23,
si tu n'as pas de message d'erreur, ce sont forcement ces valeurs "J","M","S" qui sont inscrite dans le champ. il faut éventuellement actualiser l'affichage et vérifier directement dans la table.
cela dit ce n'est pas l'idéal car en procédant ainsi, à la lecture il n'y a pas d'association automatique entre la valeur du champ et le groupe d'option.

@caramel88,
il faut effectivement ouvrir une nouvelle discussion. LedZeppII t'a fourni un élément de réponse, je ne poursuivrait donc pas ici la discussion.

[Aladin_23]

Bonsoir Vodiem et le forum
J' ai fait des test cela fonctionne mais mal car effectivement il n'y a pas d'association automatique entre la valeur du champ et le groupe d'option.
Peux t on proceder d' une maniere differente afin que cela ait l' aspect de groupe d' option car cela fait plus esthetique
Aladin

[vodiem]

he bien soit tu te pli au contrainte et tu associe "J","M","S" au valeur 1,2,3 dans le champ auquel cas l'association se fera automatiquement dans le groupe d'option.

soit tu veux faire l'anticonformiste et tu continu à coder... tu ajoutes l'affectation de la valeur du champ au groupe d'option à l'événement current du formulaire mais cela ne marchera pas correctement en visualisation formulaire continu. dans ce dernier cas il serait éventuellement possible de faire une requete d'association entre "J","M","S" et 1,2,3 mais coder le problème de l'affectation du champ 1,2,3 en "J","M","S"...
bref, y aurait bien des solus, mais mon avis tu voudrais pas t'y lancer...

[Aladin_23]

Bonsoir le forum
Merci à toi vodiem pour cet eclaircissement sur les groupes d'Options mais comme tu le dis "coder le problème de l'affectation du champ 1,2,3 en "J","M","S"...bref, y aurait bien des solus .mais mon avis tu voudrais pas t'y lancer..."
Effectivement je ne m' y lancerai pas car je ne saurai pas comment le faire, ni par quoi commence, je suis un utilisateur lambda de vba.
Aladin