[AC-2007] Impression fenêtre relations [Résolu]

[Nourson]

Bonjour à tous

Je souhaiterais imprimer la fenêtre des relations directement via VBA.
Quelqu'un pourrait-il m'aider ou me donner une piste ?
Merci

[pgz]

Bonsoir.

Tu peux essayer cela

Code :

1
2
3
4
5
6
7
8
9
10
11
Sub subImprimeRelations()
Dim sRep As String
 
Application.RunCommand acCmdRelationships
Application.RunCommand acCmdPrintRelationships
sRep = Screen.ActiveReport.Name
Application.DoCmd.OpenReport sRep, acViewNormal
Application.DoCmd.Close acReport, sRep, acSaveNo
Application.RunCommand acCmdClose
 
End Sub

Cela utilise des commandes d'interfaces, et donc ce n'est pas terrible.

Cordialement,

PGZ

[Nourson]

Merci pour la réponse.
C'est que vrai que sont les commandes d'interface mais en creusant, je vais arriver à ce que je veux.
Nourson