enregistrement automatique de pdf sans la config creator [Pollution]

**Davik** · 15/05/2006, 08h50

Bonjour,
J'aimerai savoir si la sauvegarde de pdf est programmable sur VB.
Je m'explique je voudrais pouvoir nommer le pdf à sa création par rapport à un champ(sur un clique bouton). Et je voudrais également programmer le chemin de l'enregistrement.

je me suis évidemment intérréssé au tuto de caféine. Mais je voudrais éviter de configurer le creator car je l'utilise également pour d'autre application et je ne voudrais pas changer sa config.

merci de votre aide

**Davik** · 15/05/2006, 09h58

personne n'a la moindre idée? est ce faisable ou est ce une idée inconcevable?

**Davik** · 15/05/2006, 13h40

merci mais j'effectue deja cette impression virtuelle par acrobat distiller maintenant je voulais savoir si je pouvais enregistrer automatiquement les pdfs crées avec des noms et des chemins programmés sous VB.

**Tofalu** · 15/05/2006, 14h01

Le tuto de cafeine est complet et permet d'utiliser VBA pour configurer la machine virtuelle il me semble.

**Davik** · 15/05/2006, 14h30

il configure le nom et le chemin de l'enregistrment du pdf par son creator, mais si tu veux utiliser ton acrobat pour une autre application alors tu dois reconfigurer... j'aimerai lui indiquer par vb le chemin d'enregistrment du pdf

**argyronet** · 15/05/2006, 16h04

Bonjour,

Si ton problème est lié à Acrobat PDFWriter, la solution (à adapter pour ton cas) est ici...

Argy

**Davik** · 16/05/2006, 07h03

Argy est un sauveur pour moi lol, peut tu m'en dire plus sur l'endroit à placer les différents code stp car je suis un peu perdu pour les placer correctement merci encore

**argyronet** · 16/05/2006, 12h48

Eh bien en fait c'est simple...
Tu suis et appliques ce qui est écrit dans les codes sources à savoir :

Tu ajoutes un module où tu colles le code qui traite des accès au Registre situé dans le bloc en dessous de "Informations supplémentaires:"
Dansun autre module tu colles le code situé dans le bloc en dessous de "Obtention et définition temporaire dynamique des paramètres d'impression:"
Dans ton Formulaire, tu colles la procédure subCreatePDFFromReport située dans le bloc en dessous de "Création du PDF:"
En enfin, tu crées un bouton qui imprime comme cet exemple:

Code :

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

1
2
3
Private Sub cmdImprimerPDF()
subCreatePDFFromReport "Etat PDF", "C:\Poubelle\PDF\FactureClient.pdf"
End Sub

Après il s'agit de déterminer qu'est ce que tu veux imprimer en PDF ???
C'est un état Access ?
Si oui, alors, il te faut créer depuis VB une instance Access via OLE automation, ouvrir la base et exploiter l'impression de l'état via cette procédure.
Mais ce qui n'est pas très clair, c'est d'où tu pars, et où tu veux aller...

Argy

**Davik** · 16/05/2006, 12h58

a aujourdhui en faite j'ai un bouton sur un formulaire qui me crée ce formulaire en pdf. (état ou formulaire ca revient au meme vu que j'arrive a créer mes pdfs aujourdhui)

donc moi ce que je voudrais c'est qu'au lieu que ce pdf aille dans les fichiers pdf adobe, on définisse le chemin d'un dossier en vb pour qu'il s'enregistre dedans et qu'il s'enregistre sous le nom d'un champ du formulaire.

par exemple je veux que tout mes pdf soit dans Currentproject.path & \fiche_atex\ et pour le nom je veux qu'il soit saisi dans un champ de mon formulaire.

autre question adobe distiller convient ou il faut aboslument pdf writer ?

merci de ton aide je vais pouvoir commencer à avancer a partir de ce début de code

**Davik** · 16/05/2006, 13h10

a na finalement c'est bon jai le writer j'étais juste habitué à utiliser distiller

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Private Sub subCreatePDFFromReport(ByVal ReportName As String, _
  ByVal PDFFileName As String)
  originalPrinter = fnctGetDefaultPrinter()
  SetDefaultPrinter "Acrobat PDFWriter"
  subRegistrySetKeyValue rootHKeyCurrentUser, _
   "Software\Adobe\Acrobat PDFWriter\", "PDFFileName", _
     PDFFileName, RRKREGSZ
  DoCmd.OpenReport ReportName, 0
  SetDefaultPrinter originalPrinter
End SubPrivate Sub subCreatePDFFromReport(ByVal ReportName As String, _
  ByVal PDFFileName As String)
  originalPrinter = fnctGetDefaultPrinter()
  SetDefaultPrinter "Acrobat PDFWriter"
  subRegistrySetKeyValue rootHKeyCurrentUser, _
   "Software\Adobe\Acrobat PDFWriter\", "PDFFileName", _
     PDFFileName, RRKREGSZ
  DoCmd.OpenReport ReportName, 0
  SetDefaultPrinter originalPrinter
End Sub

dans cette partie de code
"Software\Adobe\Acrobat PDFWriter\", "PDFFileName", cela correspond à quoi le chemin de mon programme adobe ? que je dois adapter selon le pc ?

**argyronet** · 16/05/2006, 13h10

Envoyé par Davik

...........par exemple je veux que tout mes pdf soit dans Currentproject.path & \fiche_atex\ et pour le nom je veux qu'il soit saisi dans un champ de mon formulaire.

Tu n'as pas lu le commentaire du code source ou bien tu ne le comprends pas !!!

Envoyé par Argy

Intérêt : Eviter d'avoir la boîte de dialogue de confirmation du nom du fichier PDF à créer, ce qui est primordial.

Ce qui sous entend : Imposer un chemin et un fichier !!!

Envoyé par Davik

autre question adobe distiller convient ou il faut aboslument pdf writer ?

Il faut absolument PDFWriter... Tu n'as pas lu !!! C'était écrit :

Envoyé par Argy

Note importante : L'ensemble du code ci-dessous est destiné à être utilisé avec PDFWriter d' Acrobat. De plus, l'installation d'Acrobat doit être faite en mode personnalisé afin de cocher la case PDFWriter qui n'est pas installé en mode Par défaut.

**Davik** · 16/05/2006, 13h20

désolé c'est bon j'ai le writer

mes codes sont rentrées mais lors du test une petite erreur

SetDefaultPrinter sub ou fonction non définie

**argyronet** · 16/05/2006, 13h22

Envoyé par Davik

dans cette partie de code
"Software\Adobe\Acrobat PDFWriter\", "PDFFileName", cela correspond à quoi le chemin de mon programme adobe ? que je dois adapter selon le pc ?

C'est la procédure pour attaquer le Registre de Windows...

Le chemin et le nom de l'état sont définis ici :

Code :

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

1
2
3
Private Sub cmdImprimerPDF()
subCreatePDFFromReport "Etat PDF", "C:\Poubelle\PDF\FactureClient.pdf"
End Sub

Argy

**Davik** · 16/05/2006, 13h30

est ce que cela serait possible de le faire fonctionner pour l'impression des formulaires ?

**Tofalu** · 16/05/2006, 13h45

Au risque de me répeter les formulaires sont là pour la consultation et la saisie. Les états servent à l'impression !

**Davik** · 16/05/2006, 14h00

je sais mais dans mon cas j'imprime directement avec le distiller le formulaire et cela pose aucun probleme. Donc je pense que dans le cas du WRITER cela doit etre possible

juste chager le petit bout de code qu'il faut !

**argyronet** · 16/05/2006, 14h04

Le principe est simple...
On imprime un PDF donc on imprime...
Que ce soit du Word, de l'Excel du Access, c'est tout pareil... Ca marche à partir du moment où il y a une méthode Print...

Mais pour un formulaire, il n'y a pas d'options acPreview...

Argy

**Davik** · 16/05/2006, 14h07

alors expliquez moi pourquoi j'arrivais à un imprimer sur mon formulaire avec le Distiller, à partir d'un bouton ?

donc la solution dans mon cas c'est de passé du formulaire en état et ensuite d'utiliser l'impression en pdf sur l'état ?

**argyronet** · 16/05/2006, 14h41

Envoyé par Tofalu

Au risque de me répeter les formulaires sont là pour la consultation et la saisie. Les états servent à l'impression !

C'est ce qu'a dit Tof...
On imprime pas un formulaire sauf quand il s'agit de débattre sur son look par exemple en mode dév dans une équipe...

Argy

**Davik** · 16/05/2006, 15h05

ce que je comprend pas pas c'est pourquoi l'impression de formulaire fonctionne avec le distiller alors qu'avec le writer selon vous ca ne marcherait pas

j'ai des raisons d'imprimer mes formulaires...
on peut rien faire pour que ca puisse imprimer car avec le writer je pourrai exactement effectuer ce que jai besoin

merci.

enregistrement automatique de pdf sans la config creator [Pollution]

Access

Discussions similaires

Partager

Partager