Discussion :

[amerex]

Bonjour!

Voici un beau défi que j'ai à réaliser.

J'ai un rapport qui s'apelle "Facture".
Dans mon formulaire, j'ai un bouton qui :
1) Change l'imprimante de l'usager pour une imprimante PDF
2) Imprime le rapport (donc en PDF, ça demande où enregistrer)
3) Remet l'imprimante initiale à l'usager

En ce moment, le nom du fichier PDF par défaut qui s'inscrit à l'étape 2, est le "caption" du rapport.

J'aimerais avoir, à la place du "caption" du rapport, le numéro de la facture inscrite dans mon formulaire. Ainsi, l'usager n'a qu'à cliquer sur "Enregistrer", à la place d'écrire manuellement le numéro de la facture.

J'ai donc fait ceci:

Code VBA :

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

1
2
3
4
Private Sub Report_Open(Cancel As Integer)
Me.Report.Caption = "A" & Forms!FrmFactureA!FactureNuméro.Value
DoCmd.Maximize
End Sub

Le code fonctionne bien lorsque je fais un "aperçu avant impression" de la facture. Par contre, lorsque j'imprime, le nom par défaut (toujours à l'étape 2), reste le "caption" du rapport, donc "Facture".

Connaissez-vous un moyen d'y arriver ?
Merci!

[RobiPMS]

Bonjour.
Mettre la procédure sur impression de la section Détail du rapport devrait régler le problème (pas le"Maximize"!). Je viens de faire un essai concluant.
Cordialement.

[amerex]

Comme le titre de la fenêtre du rapport se changeait correctement à son affichage, et non à son impression direct, j'ai donc modifié ma procédure:

1) ouvrir le rapport
2) imprimer le rapport
3) fermer le rapport

Ça fonctionne!

Code VBA :

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

1
2
3
    DoCmd.OpenReport "rptFactureA", acViewPreview, "ReqFiltreFactureA"
    DoCmd.PrintOut acPrintAll
    DoCmd.Close acReport, "rptFacture