Discussion :

[massi15]

Bonsoir
je sollicite votre aide après une longue absence.
voilà, mon problème je souhaiterais imprimer un etat uniquement un seul enregistrement. comment faire svp
code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
On Error GoTo Err_Visualisation_État_Click
Dim stDocName As String
stDocName = "impression1"
DoCmd.OpenReport "impression1", acViewPreview, "n°", "Societe", "N° Ordre", "Statut juridique", "Adresse" '
Exit_Visualisation_État_Click:
Exit Sub
Err_Visualisation_État_Click:
MsgBox Err.Description
Resume Exit_Visualisation_État_Click

mais cela ne fonctionne pas
merci d'avance pour votre aide.

[Invité]

Bonjour

Je t'invite à revoir dans l'aide la syntaxe de l'instruction DoCmd.OpenReport.

Il faut utiliser la clause Where qui te sert de filtre.

Dans ton code ceci ne sert à rien

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim stDocName As String
stDocName = "impression1"

Car tu remets le nom de ton état.

Philippe

[massi15]

Bonsoir
merci pour votre réponse.
comment utiliser where.
voila ce j'ai fait, mais pas de résultats
code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim strDocName As String
Dim strWhere As String
strDocName = "impression1"
strWhere = "[n°]=" & me!n°
DoCmd.OpenReport strDocName, acPreview, , strWhere

erreur "3079" le champs spécifié peut désigner plusieures tables...?
comment faire svp
merci