Remplissage champ formulaire selon teste en VBA depuis une table

Bonjour tout le monde,

J'ai un petit problème de compilation de mon code VBA.

J'ai une table "Produit" qui contient deux champs (un taux pour les nouvelles affaires et un taux pour les autres cas). Je souhaite remplir automatique mon champ "TauxRemuneration" en fonction de ma précédente sélection "nouvelle affaire ou pas".

Est-ce que quelqu'un pourrais me donner un lien ou la solution à mon problème ? Merci d'avance pour votre précieux temps. J'ai essaye de cherche sur votre super site, mais je trouve pas mon information.

Voici ce que j'ai écris :

Code:

---

1 2 3 4 5 6 7

Private Sub Produit_AfterUpdate() If Me.TypeAffaire = "Nouvelle" Then Me.TauxRemuneration = Produit.TauxNouvelle Else Me.TauxRemuneration = Produit.TauxRenouvellement End If End Sub

---

Bonsoir,

Les informations que tu donnes sont insuffisantes pour donner une réponse précise.

A priori, tu as aussi un champ IdProduit dans ta table Produit et tes taux(Nouvelle et renouvellement) sont différents pour chaque produit.
Ce qui devrait te permettre d'utiliser une fonction de domaine DLookUp pour trouver cette valeur avec :

Code:

---

1 2 3 4 5 6 7

Private Sub Produit_AfterUpdate() If Me.TypeAffaire = "Nouvelle" Then Me.TauxRemuneration = DLookUp("[TauxNouvelle]","[Produit]", "[IdProduit]=" & Me.Produit) Else Me.TauxRemuneration = DLookUp("[TauxRenouvellement]","[Produit]", "[IdProduit]=" & Me.Produit) End If End Sub

---

Cordialement.

PS : Pour faciliter la lecture des codes postés, ne pas oublier d'utiliser les balises codes : Sélectionner le code et appuyer sur # en haut.

EDIT : Code modifié suite erreur

Pièce jointe 220867Pièce jointe 220868Pièce jointe 220869

Bonsoir,

voici les éléments de mon application access.

quand je selectionne le produit par exemple "HIO ménage" voir image ci-dessus. Je souhaite que le taux du produit se mette automatiquement dans mon champ de formulaire "Taux".

Actuellement, j'ai un message d'erreur lorsque je teste l'application.

Oups, erreur d'inattention dans le code. J'ai corrigé (édité).

un grand merci tout fonctionne

Bonsoir,

Content de t'avoir aidé ! T'as plus qu'à mettre le sujet en résolu.

Cordialement.