HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Entdecke rund 2 Millionen Excel-Lösungen im
Forumsarchiv
Forumbeitrag
Excel-Version des Fragestellers:
2022
Erfahrungslevel des Fragestellers:
Excel gut - VBA bescheiden
daniel
02.07.2026 09:36:33
AW: Verbesserte Version mit Fehlerbehandlung
schau mal, dass ist dein Code, mit dem du versuchst, die PDF zu erstellen.
Fett markiert ist der Teil, in dem Pfad und Dateiname angegeben werden:

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=sFullPath, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False

du verwendest hier die Variable sFullPath
und das bedeutet, dass du irgendwo vorher eine Zeile benötigst, in welcher du der Variablen sFullPath den entsprechenden Wert zuweist:

sFullPath = "C:\Ordner1\Ordner2\Dateiname"

wenn der Pfad von der Datei mit dem Makro übernommen werden soll:

sFullPath = Thisworkbook.Path & "\Dateiname"

das kannst du natürlich auch ohne Variable direkt in den Befehl zur PDF-Erstellung einbauen.
eine Variable würde ich dann verwenden, wenn die Erstellung des Speichernamens aufwendiger ist und in mehreren Schritten erfolgt oder der Spechername noch an anderer Stelle im Code verwendet werden soll.
ansonsten reicht:

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Thisworkbook.Path & "\Dateiname", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False

Gruß Daniel
Als Antwort auf diesen Beitrag
Chris
01.07.2026 20:17:50
AW: Verbesserte Version mit Fehlerbehandlung
Deinen Code zum Drucken, habe ich ja bereits versucht zu erweitern. Die Grundidee hat ja funktioniert. Leider fehlt mir der Weg die Datei im richtigen Ordner zu speichern
Folgenachrichten
Antwort auf Beitrag erstellen
Bitte einen Anwendernamen ohne @ eingeben.
Bitte das Passwort eingeben.
Bitte eine gültige E-Mail-Adresse eingeben.
Bitte einen Betreff eingeben.
Weitere Optionen
Aktivieren, wenn die Frage/der Beitrag noch nicht beantwortet wurde und unter Listen > Offene Threads erscheinen soll.
Beispieldatei hochladen

Bitte einen Nachrichtentext eingeben.