OVH Cloud OVH Cloud

Enregistr courant

1 réponse
Avatar
Ben
J'essaie d'imprimer l'enregistrement qui apparait sur mon formulaire. Le
code attaché au bouton:
Dim stDocName As String
stDocName = "clients"
DoCmd.OpenReport stDocName, acNormal, , where codeclient =
Forms!Form_Clients!text2

Ca me signale une erreur.
Merci pour votre aide

1 réponse

Avatar
Damien Mermoz
Salut,

Il ne faut pas de where dans l'argument condition de la méthode open et il
faut mettrre entre guillemet le texte.
Ca devrait marcher comme ça:

DoCmd.OpenReport stDocName, acNormal, , "CodeClient=" &
Forms!Form_Clients!text2



"Ben" a écrit dans le message news:

J'essaie d'imprimer l'enregistrement qui apparait sur mon formulaire. Le
code attaché au bouton:
Dim stDocName As String
stDocName = "clients"
DoCmd.OpenReport stDocName, acNormal, , where codeclient > Forms!Form_Clients!text2

Ca me signale une erreur.
Merci pour votre aide