Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1676to1680
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Speichern Pdf

Speichern Pdf
01.03.2019 07:41:51
Alexander
Hallo liebes Forum,
ich wollte über einen CommandButton einen Speicher befehl abgeben.
Der sollte so aussehen, dass ich meine gesamte Arbeitsmappe mit dem aktuellen Datum fortlaufend als pdf Datei abspeichern kann als Ablage. Klappt auch mit dem speichern so weit, nur bekomme ich es nicht hin das er immer hinter dem Dateinamen das datum automatisch machen.
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
D:/'Pfad
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas_
:=False, OpenAfterPublish:=True
ThisWorkbook.SaveAs sPfad & Format(Date, "DDMMYYYY")
Vielleicht hat einer von euch ne Lösung Danke schon mal

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Speichern Pdf
01.03.2019 07:55:25
Marco
Hallo,
so mache ich das. Du müsstest allerdings natürlich noch die Pfade anpassen.
VG
Marco
verzeichnis2 = Environ("TEMP") & "\"
ws2 = ActiveSheet.name
exportpdffile = verzeichnis2 & ws2 & Date & ".pdf"
' Export PDF
ActiveSheet.ExportAsFixedFormat xlTypePDF, exportpdffile, Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=True, OpenAfterPublish:=False
AW: Speichern Pdf
01.03.2019 08:10:31
Alexander
Bekomme eine Fehlermeldung ab dem teil:
ActiveSheet.ExportAsFixedFormat xlTypePDF, exportpdffile, Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=True, OpenAfterPublish:=False
Anzeige
AW: Speichern Pdf
01.03.2019 08:43:00
Werner
Hallo Alexander,
vermute mal da fehlt der Slash
ThisWorkbook.SaveAs sPfad & "/" & Format(Date, "DDMMYYYY")
Gruß Werner
AW: Speichern Pdf
01.03.2019 09:21:26
Alexander
Genau daran hat es gelegen vielen vielen danke.
Gerne u. Danke für die Rückmeldung. o.w.T.
01.03.2019 09:23:36
Werner
AW: Speichern Pdf
01.03.2019 12:25:32
Marco
ActiveSheet.ExportAsFixedFormat xlTypePDF, exportpdffile, Quality:=xlQualityStandard,IncludeDocProperties:=False, IgnorePrintAreas:=True, OpenAfterPublish:=False
muss natürlich in einer Zeile stehen, sorry
AW: Speichern Pdf
04.03.2019 16:42:39
Akatosh
Sheets(Array("Front", "Mitte", "Rückseite")).Select
ChDir "C:\Ordner\Unterordner"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Ordner\Unterordner\Dashboard_." & Format(Date, "dd.mm.yyyy") & ".pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=True
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige