[vba] intégrer valeur formulaire dans requete
Lolymeuh
-
Lolymeuhhh -
Lolymeuhhh -
Bonjour.
Je code actuellement en programme en Access /VBA et la est mon probleme:
un des champs de mon formulaire doit etre rempli automatiquement en fonction de deux autres champs.
Comme ce champ "pin_signal_name" est une zone de texte, je ne peux pas mettre de code sql pour soin contenu. Je veux donc le faire en VBa à chaque modification d'un des deux champs (connector et pin)
Mon code ressemble donc à ca:
Private Sub pin_v_AfterUpdate()
Dim request As String
request = "select UPO.pin_signal_name into pin_signal_name_v from UPO where UPO.pin = [pin_v] and UPO.connector = [connector_v];"
CurrentDb.Execute (request)
End Sub,
pin_v et connector_v etant les valeur des deux champs dont j'ai besoin et pin_signal_name_v la valeur du champs à remplir.
J'ai également essayé comme ceci,
Private Sub pin_v_AfterUpdate()
Dim request As String
request = "select UPO.pin_signal_name from UPO where UPO.pin = [pin_v] and UPO.connector = [connector_v];"
pin_signal_name_vCurrentDb.Execute (request)
End Sub
Dans les deux cas j'ai des erreurs différentes. soit que je n'ai pas assez de parametres, soit que l'operation de selection est impossible.
Avez vous des solutions à me proposer?
Je code actuellement en programme en Access /VBA et la est mon probleme:
un des champs de mon formulaire doit etre rempli automatiquement en fonction de deux autres champs.
Comme ce champ "pin_signal_name" est une zone de texte, je ne peux pas mettre de code sql pour soin contenu. Je veux donc le faire en VBa à chaque modification d'un des deux champs (connector et pin)
Mon code ressemble donc à ca:
Private Sub pin_v_AfterUpdate()
Dim request As String
request = "select UPO.pin_signal_name into pin_signal_name_v from UPO where UPO.pin = [pin_v] and UPO.connector = [connector_v];"
CurrentDb.Execute (request)
End Sub,
pin_v et connector_v etant les valeur des deux champs dont j'ai besoin et pin_signal_name_v la valeur du champs à remplir.
J'ai également essayé comme ceci,
Private Sub pin_v_AfterUpdate()
Dim request As String
request = "select UPO.pin_signal_name from UPO where UPO.pin = [pin_v] and UPO.connector = [connector_v];"
pin_signal_name_vCurrentDb.Execute (request)
End Sub
Dans les deux cas j'ai des erreurs différentes. soit que je n'ai pas assez de parametres, soit que l'operation de selection est impossible.
Avez vous des solutions à me proposer?
A voir également:
- [vba] intégrer valeur formulaire dans requete
- Whatsapp formulaire opposition - Guide
- Formulaire de réclamation facebook compte désactivé - Guide
- Intégrer une vidéo dans un powerpoint - Guide
- Formulaire de reclamation instagram - Guide
- Intégrer une liste déroulante dans excel - Guide