Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Automatisches erstellen eines PDF über ein Makro

4 views
Skip to first unread message

Damian Meier

unread,
May 23, 2001, 8:29:09 PM5/23/01
to
Hallo,
ich muss ein Makro programmieren und möchte mich nicht in das VBA
einarbeiten, da ich dies in der nächsten Zeit nicht mehr gebrauchen werde.
Hört sich sicher faul an, aber wegen einem Makro sich stunden lang in VBA
einzuarbeiten, scheint mir nicht sinvoll zu sein.

Ich möchte aus einem Word Doc ein PDF erstellen. Das ist ja sehr einfach
manuel zu lösen. Ich möchte nun ein Makro erstellen, welches den PDFWriter
aufruft und ihm als Parameter gleich das Ziel Verzeichniss angiebt. Ich
möchte das der User nur den Button, mit dem hinterleiten Makro, aufrufen
muss und schon wird das PDF Dok an seinen definierten Ziel erstellt. Habe es
schon mit aufzeichnen versucht, doch ohne Erfolg.

Wie kann ich das machen?

Danke schon im voraus.

Damian Meier


Lutz Gentkow

unread,
May 24, 2001, 5:13:22 AM5/24/01
to
Hallo Damian,

versuch´s mal so:

Sub Word2PDF()

Application.DisplayAlerts = wdAlertsNone
ActivePrinter = "Acrobat PDFWriter"
Application.PrintOut Range:=wdPrintAllDocument, _
Item:=wdPrintDocumentContent, Copies:=1, Pages:="", _
PageType:=wdPrintAllPages, Collate:=True, Background:=False, _
PrintToFile:=True, OutputFileName:="Test"

End Sub

Viele Grüße vom Niederrhein

Lutz

Claudia Vetter

unread,
May 29, 2001, 4:03:47 PM5/29/01
to
Hallo Lutz,


ich bin auch an so etwas ähnlichem interessiert und habe eine Frage zum
Umstellen des Druckers. Die Option PrintToFile wird ja beim Drucken in den
Acrobat PDFWriter auf True gesetzt.


Wenn ich jetzt meinen Standarddrucker wieder einstelle (den ich vorher über VBA
gemerkt habe) bleibt dieses Kontrollkästchen PrintToFile auf True gesetzt.


Ich bringe es einfach nicht fertig, das Kontrollkästchen wieder False zu setzen,
ohne das ich dazu etwas ausdrucken muss. Das soll im Hintergrund passieren.


Ich habe schon probiert, 0 Pages zu drucken, damit nur im Hintergrund der
Spooler läuft und dann wieder aufhört, allerdings mag dies das Word gar nicht, es
steigt ganz fürchterlich aus - Fehler in spooler.exe


Hast Du da (oder auch jemand anderes) einen Rat für mich!
Bitte Hilfe, sitze mit dem Problem arg in der Klemme


Danke und Gruß
Claudia

--
__________________________________________________________
News suchen, lesen, schreiben mit http://newsgroups.web.de

Lutz Gentkow

unread,
May 30, 2001, 1:54:18 AM5/30/01
to
Hallo Claudia,

andere Möglichkeiten, als früher von Thomas und mir angegeben, sind mir
leider nicht bekannt. Bei mir funktionieren beide Varianten problemlos.
Gibt´s auch sonst Probleme mit spooler.exe? Meistens liegt die Ursache
für derartige Fehler woanders.

Vetter Claudia

unread,
May 30, 2001, 2:05:56 AM5/30/01
to
Hallo Lutz,


sonst habe ich keine Probleme mit der Spooler.exe. Aber ich werde die Sachen mal
auf einem anderen Rechner ausprobieren.


Danke für den Tip
Gruß
Claudia

0 new messages