[AC-2007] Imprimer en pdf [Résolu]

[Nokho]

Bonjour les developpeurs!!
J'ai un document de Microsoft Access. Dans celui-ci, il y a plusieurs états. J'ai voulu créer un bouton permettant de pouvoir imprimer les états sous forme de pdf comme on fait avec les documents. Cependant j'y arrive pas. Si quelqu'un peut m'aider volontiers.

[jpcheck]

salut,

une solution toute faite est proposee dans la

http://access.developpez.com/sources...Etat#ExportPDF

Merci d'y jeter un oeil pour voir si cette solution te convient.

Toujours profiter des donnees des

[Nokho]

Merci. Mais j'avoue que j'ai quelques difficultés pour comprendre certains codes. Surtout pour écrire dans le registre.

[Philippe JOCHMANS]

Bonjour

Si tu as Access 2007, c'est inclus dedans, regardes du coté de DoCmd.OutputTo.

Philippe

[Nokho]

Excellent. J'ai reussi à mettre l'état sous forme de pdf. Le document est enregistré par defaut dans Mes documents. Le code du bouton est:

Code :

DoCmd.OutputTo acOutputReport, "LocParRegion", acFormatPDF, "LocParRegion.pdf", True

LocParRegion est le nom de l’état que j'imprime.

Cependant lorsque j'appuie deux fois sur le bouton il écrase le fichier PDF qui était déjà présent. Maintenant je demande comment peut on faire pour ne pas écraser le premier fichier.

[Nokho]

De plus si le fichier déjà imprimé en PDF est toujours ouvert, l'impression en PDF ne se fait pas.

[Philippe JOCHMANS]

Re

Pour ne pas l'écraser il faut tout simplement modifier son nom.

Passes par une variable pour modifier le nom en fonction de ce que tu souhaites.

Philippe

[Nokho]

J'ai reussi à changer dynamiquement son nom par le code suivant:

Code :

1
2
3
Dim nom As String
 nom = "LocParRegion" & Me.liste_regions_et_codes.Column(0)
     DoCmd.OutputTo acOutputReport, "LocParRegion", acFormatPDF, nom & ".pdf", True

Il faut dire que le nom vient d'une ListeBox du nom de liste_regions_et_codes.
Est ce qu'il est possible de demander à un utilisateur quelconque de spécifier le chemin où il veut mettre le document avant l'impression et ensuite le stocker dans le répertoire demandé par l'utilisateur.

[reedy]

Bonjour,
Il faut utiliser l'objet FileDialog
Regarde dans la FAQ Access 2007 http://access.developpez.com/access2007/faq/?page=FD

[Nokho]

Merci Reedy pour les filedialog.
Mais j'ai pu le faire à partir en changeant le code précédent (je me suis aidé d'un macro) en:

Code :

1
2
3
4
5
6
7
On Error GoTo choix_du_région_Err
DoCmd.OutputTo acOutputReport, "LocParRegion", acFormatPDF, "", True, "", 0
choix_du_région_Exit:
    Exit Function
 
choix_du_région_Err:
    Resume choix_du_région_Exit

Donc il affiche la fenêtre et permet à un utilisateur de pouvoir spécifier le chemin.

Nokho.