pdf drucken mit button in excel einfügen

[eurosky]

Guten Abend!

Ist es möglich das ich gezielt einzelne Arbeitsblätter als PDF abspeichern kann? Z.b. mittels einem Button auf dem jeweiligen Arbeitsplatt?
Blatt Salto Formular und Spalte H3?

[knobbi38]

Halllo,

"Ist es möglich ...?"

Wie weit bist du denn mit deinen Versuchen gekommen? Hast du schon mal ein Makro aufgezeichnet?

[eurosky]

Guten Abend!

Nein ich habe zwar etwas bei Google gelesen aber noch nicht Probiert bez. weiß ich nicht wie ich hier vorgehen sollte am besten.

[knobbi38]

Hallo,

starte deine Makroaufzeichnung und dann machst du deine notwendigen Schritte von Hand. Nach beendigen dann die Makroaufzeichnung beenden und sich das Makro mal anschauen und ggf anpassen.

Mit "Speicher unter" kannst du den makierten Bereich als PDF speichern. Bei den Dialog->Optionen kannst du das einstellen.

Gruß
Knobbi38

[schauan]

CEF/Thread-Excel-Word-Makrorekorder

[eurosky]

Super Danke, hat zwar etwas gebraucht bis ich es verstanden habe aber es läuft.

Wenn ich mehrerer Drucker im System habe wie kann ich das einstellen damit der PDF Drucker die Aktion ausführt?!

[schauan]

Hallöchen,

im Prinzip so:

Code:

strDrucker = ActivePrinter
ActivePrinter = "MeinPdfDrucker"
'Drucken
'...
ActivePrinter = strDrucker

Was Du fü den PDF-Drucker schreiben musst. lässt Du Dir mit
MsgBox ActivePrinter
oder zum Kopieren aus dem Direktbereich mit
Debug.Print ActivePrinter
anzeigen

[RPP63]

Moin!
Statt der Zuweisung ActivePrinter:= in der .Printout-Methode kannst Du (vielleicht besser) auch die .ExportAsFixedFormat-Methode nehmen.

Gruß Ralf

[eurosky]

Danke für Eure Antworten aber ich bin für das zu blöde.
Bekomme immer Debungfehler?!

Das habe ich in meinem Makro stehen:

Sub PDF()'
' PDF Makro'
' Tastenkombination: Strg+q'
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
End Sub

Ich weiss nicht wie ich die Info hier eintragen muss damit er mir nur am Adobe PDF Drucker druckt.

[knobbi38]

Hallo,

wenn du mal eine Blick in die Doku werfen würdest, was meinst du, wofür der Parameter ActivePrinter  bei der Printout Methode steht?

https://learn.microsoft.com/de-de/office...s.printout