Ouverture formulaire au click Fermé

Question

Bonjour, 

J'ai deux formulaire : Consumables_List et Consumable_Details.

Le premier contient la liste de mes produits et je souhaite pouvoir afficher le détails de chaque produit sur click sur le champ Reference_List (Champ avec référence du produit dans mon formulaire Consumables_List)

J'ai écris un code qui me permet d"ouvrir Consumable_Details mais celui-ci s'ouvre vide c'est à dire sans prendre en compte la référence de Consumables_List :

Private Sub Reference_List_Click()Dim StDocName As StringDim StLinkCriteriA As StringStDocName = "Consumable_Details"StLinkCriteriA = "[Reference] = " & "" & Me![Reference_List] & ""DoCmd.OpenForm StDocName, , , StLinkCriteriA, acWindowNormalEnd Sub

Je ne sais pas d'où vient le problème. 

Merci de votre aide.


Configuration: Windows / Chrome 74.0.3729.108

f894009 · Answer

Bonjour,

Peut-etre cote parametre, a voir:

https://docs.microsoft.com/fr-fr/office/vba/api/access.docmd.openform

castours · Answer

Private Sub Btn_OpenRenouAdhé_Click()
On Error GoTo Err_Btn_OpenRenouAdhé_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "F_RenouvellementAdh"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Btn_OpenRenouAdhé_Click:
    Exit Sub
Err_Btn_OpenRenouAdhé_Click:
    MsgBox Err.Description
    Resume Exit_Btn_OpenRenouAdhé_Click
   End Sub

Ouverture formulaire au click

2 réponses

Discussions similaires

Newsletters