Fonction Select case

Bonjour,j'ai crée un formulaire dans Access et je veux qu'un champ du formulaire affiche une valeur numérique qui dépend du choix du client dans un autre champ "liste de choix". j'ai utiliser la fonction Select case mais ça n'a pas marcher.quelqu'un peut m'aider SVP

bonjour,

Citation:

---

j'ai utiliser la fonction Select case mais ça n'a pas marcher.quelqu'un peut m'aider SVP

---

si seulement on pouvait voir le code ...

Citation:

---

Envoyé par tee_grandbois

bonjour,
si seulement on pouvait voir le code ...

---

Tu peux essayer ainsi :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Private Sub Essai()   Dim monChoix As Integer Dim maValNum As Integer   monChoix = Me.Liste_de_Choix 'si le champ se nomme "Liste de Choix" par exemple   Select Case monChoix Case 1 'si la valeur sélectionnée dans le champ "Liste de choix" est "1" par exemple maValNum = 125 'exemple Case 2 'si la valeur sélectionnée dans le champ "Liste de choix" est "2" par exemple maValNum = 145 'exemple Case 3 'etc maValNum = 274 'exemple End Select   Me.valNum = maValNum 'si le 2è champ se nomme par exemple "valNum"   End Sub

---

Cordialement

Bonjour
Voila mon code VBA:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Private Sub Tab_AfterUpdate() Select Case Tab Case "S 01" conf = 2 Case "S 02" conf = 1.5 Case "S 03" conf = 1 Case "S 04" conf = 0.5 Case Else conf = 0 End Select End Sub

---

"Tab" c'est le champ de type "Liste de choix"
Conf c'est le champ numérique

bonjour,
1) conf est-il le nom d'une zone de texte indépendante dans le formulaire (c'est à dire sans contrôle source) ?
Si oui, il est préférable de mettre Me. devant et de rafraichir la donnée à la fin du Select Case:

Code:

---

1 2 3 4 5

'.... Me.conf = 2 '... End Select Me.conf.Requery

---

2) est-ce que "S 01" (par exemple) est bien la valeur de la première colonne (colonne 0) de la liste de choix ?