Impression .doc en pdf : utilisation des Options : problème directory -
Bonjour,
j'ai téléchargé http://heureuxoli.developpez.com/office/word/doc2pdf et remercie au passage le développeur...Code que j'ai adapté pour tester mais j'ai un souci :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
Sub macro1()
Dim oldPrinter As String
Dim stChemin As String
Dim stNom As String
Set PDFCreator1 = New clsPDFCreator
' Affichage de la fenêtre de PDF
Shell "C:\Program Files\PDFCreator\PDFCreator.exe", vbNormalFocus
oldPrinter = ActivePrinter
'On va mettre en mémoire dans une
'variable le nom de l'imprimante par défaut
ActivePrinter = "PDFCreator"
ChangeFileOpenDirectory "C:\AGARDER\"
Documents.Open Filename:="20090649-06-03-2009.doc"
'les option PDFCreator
With PDFCreator1
.cOption("UseAutosave") = 1
.cOption("UseAutosaveDirectory") = 1
.cOption("AutosaveDirectory") = "c:\agarder" 'stChemin
.cOption("AutosaveFilename") = "20090649-06-03-2009.pdf" 'stNom
.cOption("AutosaveFormat") = 0 ' 0 = PDF
.cStart
.cClearCache
DoEvents
Temps1 = Now + TimeValue("00:00:10")
While Now < Temps1
' permet que les options pdf se mettent en place....
Wend
ActiveDocument.PrintOut Background:=True 'false
DoEvents
.cPrinterStop = False
End With
PDFCreator1.cClose
ActivePrinter = oldPrinter
' Change l'imprimante par défaut
End Sub |
En fait, j'ouvre bien mon .doc qui est dans c:\agarder, le moniteur d'impression de pdfcreator s'affiche avec le nom du fichier proposé, par contre je me retrouve avec le répertoire de mes documents par défaut..Il y a donc un problème comme si les options ne fonctionnaient pas...Enfin je ne veux pas que le moniteur pdfcreator s'affiche pour pouvoir boucler sur un tableau de fichiers...
Quelqu'un a une idée ?
Merci de votre aide
JPaul
Impression .doc en pdf : utilisation des Options : problème directory -
Bonjour,
et merci d'avoir répondu.
Indépendamment de la boucle, le simple exemple sans boucle ici ne fonctionne pas...et oui j'ai bien désactivé Autosave dans les options de pdfcreator.....et la version avec le userform marche nickel....
J'ai installé et réinstallé pdfcreator (c'est la version 9.0 : PDFCreator-0_9_0_GPLGhostscript.exe)....
J'avoue sécher........
Merci pour l'aide
JPaul
Impression .doc en pdf : utilisation des Options : problème directory -
Bonjour,
suivant tes conseils j'ai copié le code personnalisé de ton tuto directement dans le document word que j'utilise pour tester et ...mêmes symptômes : le moniteur d'impression s'affiche et j'ai droit aux 2 écrans le 1er qui propose d'enregistrer sous le nom du fichier et le 2ème qui propose de le faire dans mes documents et non dans le répertoire du fichier.....
bref ne fonctionne pas ...si tu as d'autres idées....
Merci en tout cas
JPaul
Impression .doc en pdf : utilisation des Options : problème directory -
j'ai installé la version 9.7 de pdfCreator...rien n'y fait......
Impression .doc en pdf : utilisation des Options : problème directory -
Salut,
tu vas rire il suffit d'enlever
du code pour que cela fonctionne....j'avoue que si tu comprends pourquoi je suis preneur !!!
Merci de ton aide en tout cas.
JPaul
