Discussion :

[KClaudel]

Bonjour à tous,

Je souhaite faire une chose que je pensais très très simple mais à priori ce n'est pas le cas.

En effet, je souhaite pouvoir en vba ou autre (de préférence en vba) pouvoir exporter une table complète ou le résultat d'une requête.
Tout simplement comme si l'on faisait un clique droit sur la table (ou la requête) -> exporter -> pdf
Sauf qu'a chaque fois que je regarde pour faire ceci, il faut installer un logiciel, modifier tout un tas de truc muche machin chose et je ne sais que d'autre encore.

Donc ma question est somme toute assez bête et je pense assez simple mais je ne trouve rien de concret.

Merci d'avance.

Cordialement.

[RobiPMS]

Bonjour.
Quelle est ta version d'Access? L'export en pdf sans installer un autre logiciel est très simple avec Access 2007 et +.
Cordialement

[KClaudel]

Bonjour RobiPMS

Ma version d'Access est Access 2010.

Je tiens à préciser que l'exportation en pdf se fera suite à un clique sur un bouton dans un formulaire par exemple et que ça aura pour conséquence bien évidement d'exporter la table ou requête en pdf.

Merci d'avance.

Cordialement.

[RobiPMS]

Bonsoir.
Le code à placer dans la procédure événementielle sur clic de ton bouton :

Code :

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

DoCmd.OutputTo acOutputTable, "Ta_table", acFormatPDF, "C:\Dossier\Nom_de_fichier.pdf"

et pour une requête

Code :

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

DoCmd.OutputTo acOutputQuery, "Ta_requête", acFormatPDF, "C:\Dossier\Nom_de_fichier.pdf"

Cordialement

[KClaudel]

Merci beaucoup à toi RobiPMS,
C'est exactement ce que je cherchais.

Maintenant je souhaite faire un peu plus compliqué.

En faite, quand je clique sur mon bouton, je souhaite récupérer l'adresse de ma BDD et enregistrer le fichier à coté de celle-ci.

Private Sub chemin_Click()
'je récupère le chemin : ok
Dim chemin As String
chemin = Application.CurrentProject.Path
'je l'affiche pour être sur : ok
MsgBox chemin
'il ne me crée pas le fichier que ce soit avec chemin avec ou sans les ""
DoCmd.OutputTo acOutputTable, "PERSONNE", acFormatPDF, "chemin"

End Sub

Merci d'avance.

Cordialement.

[jimbolion]

HardLienWare bonjour

Transformes la ligne suivante :

Code :

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

DoCmd.OutputTo acOutputTable, "PERSONNE", acFormatPDF, "chemin"

Par celle-ci

Code :

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

DoCmd.OutputTo acOutputTable, "PERSONNE", acFormatPDF, chemin & "\nom_de_fichier.pdf"

Bonne journée

JimboLion

[RobiPMS]

Bonjour.
C'est simplement parce que tu indiques juste le chemin, mais pas le nom de fichier!
Mets ceci :

Code :

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

DoCmd.OutputTo acOutputTable, "PERSONNE", acFormatPDF, chemin & "\nom_de_fichier.pdf"

Cordialement.

[RobiPMS]

Je vois que durant la rédaction de ma réponse, jimbolion est intervenu dans la discussion pour apporter la même réponse. On est donc d'accord...

[KClaudel]

Merci à vous deux, c'est parfait, je ne sais même pas pourquoi je ne l'ai pas vu et que je n'y ai pas fait attention.
Un peu idiot dès fois je crois, je suis.

Merci encore.

Cordialement.

[jimbolion]

RobiPMS,

Et exactement la même réponse qui plus est !

Bonne journée à toi