Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1544to1548
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

PDF - Speichern / Fester Ordner

PDF - Speichern / Fester Ordner
28.02.2017 21:48:11
Mike
Hallo,
mit diesem Makro speichere ich einzelne Angebote als PDF - Datei.
Die PDF - Dateien sollen alle in einem festen Ordner hinter legt werden.
Wo gebe ich den Pfad an ?
Sub pdfspeichern()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"Angebotsliste für" & Cells(5, 3).Value, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
Pfad : Y:\B2B\Team\Mike\PDF\Angebote\
End Sub

Gruß und Danke Mike

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: PDF - Speichern / Fester Ordner
28.02.2017 22:04:23
Zwenn
Hallo Mike,
Du kannst den Pfad einfach vor den Dateinamen schreiben

Sub pdfspeichern()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"Y:\B2B\Team\Mike\PDF\Angebote\Angebotsliste für" _
& Cells(5, 3).Value, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
'Pfad : Y:\B2B\Team\Mike\PDF\Angebote\
End Sub

AW: PDF - Speichern / Fester Ordner
28.02.2017 22:55:56
Mike
Hallo,
vielen Dank
Gruß mike
AW: PDF - Speichern / Fester Ordner
01.03.2017 07:41:06
JoWE
Hallo Mike,
vllt. so:
Dim strPath as String
strPath = "Y:\B2B\Team\Mike\PDF\Angebote\"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
strPath & "Angebotsliste für" & Cells(5, 3).Value, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= False
Gruß
Jochen
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige