Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
944to948
944to948
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Als PDF mit PDFCreator speichern....

Als PDF mit PDFCreator speichern....
31.01.2008 21:00:00
Sonnenpeter
Hallo,
ich komm mal wieder nicht weiter.
Ich versuche mit PDFCreator Version 0.9.5 (2. September 2007) verschiedene Seiten einzeln zu speichern.
Das Makro läuft durch das Ergebniss ist aber keine PDF-Datei (die Endung lautet nur *.pdf
Was mache ich falsch?

Sub DruckePDF()
StandartDrucker = Application.ActivePrinter
Anzahl = Application.WorksheetFunction.Max(Sheets("PDF Druck").Range("A9:A28"))
Application.ActivePrinter = "PDFCreator auf Ne01:"
Sheets("Abfragen").Select
BZelle = 9
For i = 1 To Anzahl
BName = Sheets("PDF Druck").Range("B" & BZelle).Value
ActiveWindow.SelectedSheets.PrintOut From:=i, To:=i, Copies:=1, _
ActivePrinter:="PDFCreator auf Ne01:", Collate:=True, PrintToFile:=True, _
PrToFileName:="C:\Dokumente und Einstellungen\Peter\Desktop\Testordner\" & BName & ".pdf"
BZelle = BZelle + 1
Next
Application.ActivePrinter = StandartDrucker
End Sub


Gruß Sonnenpeter

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Als PDF mit PDFCreator speichern....
03.02.2008 10:52:00
Stefan12
Hallo Peter
Kann es sein das in der Zelle B9 nix steht? Dein Code sagt das der BName aus dem Tabellenblatt
("PDF Druck")und Zelle("B" & BZelle). kommt . In dem Fall ist dein anfangswert für BZelle =9.
Durchlaufe dein Macro mal mit dem Debugger ( klick vor das "SUB" deiner Prozedur und dann klick auf "F8")
Bei jedem Druck läuft dein Code immer eine Zeile weiter.
Wenn dann die Zeile mit dem Druck aktiv ist, hälst du den Mauszeiger über BName und dort bekommst du dann den Momentanen Wert von BName angezeigt.
Gruß, Stefan
Anzeige

383 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige