Afficher le valeur d'une table dans un champFermé

Question

Bonjour, 

J'ai une ltable client avec comme champs : ID, Nom, CodeClient, Adresse ...

J'ai mis une zone de liste avec seulement ID(caché), CodeClient et Nom.

Je souhaite savoir l'adresse du client dans une zone de texte par un double clique.


J'ai essayé de faire quelques trucs, mais ... dans ma zone de texte il m'indique
SELECT NomClient FROM tblClient WHERE IDClient =1

Voilà mon codage :

Private Sub lst_Client_DblClick(Cancel As Integer)

Dim strSQL As String

strSQL = " SELECT NomClient FROM tblClient WHERE IDClient =" & Me![lst_Client].Column(0)

Me![txt_CodeClient] = strSQL


End Sub

Merci d'avance !

Configuration: Windows 7 / Internet Explorer 9.0

Jean_Jacques · Answer

Bonjour hrzo,

Après l'avoir adapté, cet évènement sur clic affichera l'enregistrement ayant la même référence que celle connue dans le formulaire actif.


   Private Sub Màj_Click()

On Error GoTo Err_Màj_Click
    Dim DocName As String
    Dim LinkCriteriA As String
    DocName = "Transactions"
    LinkCriteriA = "[RéfTransaction]=" & Me![RéfTransaction]
    DoCmd.OpenForm DocName, , , LinkCriteriA
    Exit Sub

Err_Màj_Click:
    MsgBox Error$
    Exit Sub
End Sub

___
Cordialement
***
La science ne fait que trouver ce qui existe depuis toujours.
REEVES Hubert

hrzo · Answer

Bonjour,

Merci d'avoir repondu! 

Euh je ne comprends pas du tout ce que vous faites...

Pourquoi ouvrir un formulaire a la fin ?

quel est le but du "On Error GoTo Err_Màj_Click " ?

Merci.

Afficher le valeur d'une table dans un champ

2 réponses

Discussions similaires

Newsletters