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

Excel zu PDF + Name speichern

Excel zu PDF + Name speichern
07.10.2021 13:46:30
Jan
Hallo ich bin auf der Suche nach einem Code der mir eine Excel-Datei automatisch in eine PDF exportiert und dann Dateinamen aus einer bestimmten Zelle (z.B. A1) nimmt .
Wie löse ich dieses Problem. Danke schon mal

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

Betreff
Datum
Anwender
Anzeige
AW: Excel zu PDF + Name speichern
07.10.2021 14:09:34
Piet
Hallo
den Code fand ich in wenigen Sekunden im Internet, MS Office Forum. Schau mal ob du damit weiterkommst. Im Netzt gibt es massenhaft Beispiele
mfg Piet
  • 
    Sub aktivesBlattToPdf()
    ChDir "c:\Temp\" 'anpassen 'oder thisworkbook.path
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    Range("F5").Value & Format(Date, "YYYYMMDD") & ".pdf", Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
    False
    End Sub
    

  • AW: Excel zu PDF + Name speichern
    07.10.2021 15:23:55
    Jan
    Herzlichen Danke für die schnelle Hilfe
    AW: Excel zu PDF + Name speichern
    07.10.2021 14:10:26
    JoWE
    Hallo,
    das hättest Du mit Google recht schnell gefunden.
    Aber es geht z. B. so:
    
    Sub speichern_tabelle_in_PDF()
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    "Dein ZielOrdner\" & Sheets("Tabelle1").Range("A1").Value & ".pdf" _
    , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
    :=False, OpenAfterPublish:=False
    End Sub
    
    Gruß
    Jochen
    Anzeige

    Beliebteste Forumthreads (12 Monate)

    Anzeige

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Anzeige