Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1660to1664
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-Reiter als PDF speichern und abstellen

Excel-Reiter als PDF speichern und abstellen
20.12.2018 12:04:12
Sandra
Hallo zusammen,
ich weiß nicht, ob mir hier jemand helfen kann. Aber ich hoffe es. :-)
Ich würde gerne per Makro aus meiner Excel-Datei die Reiter "Auswertung" und "Einträge" als PDF mit Tagesdatum und Uhrzeit speichern und auf dem Laufwerk xy abstellen.
Kann mir einer von Euch helfen?
Vielen lieben Dank im Vorfeld!
Sandra

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Nachfrage..
20.12.2018 12:06:13
UweD
Als ein PDF, oder beide Blätter Einzeln?
AW: Nachfrage..
20.12.2018 12:13:20
Sandra
Hallo Uwe,
in einem PDF reicht vollkommen aus.
Merci!
AW: Nachfrage..
20.12.2018 12:20:55
UweD
Hallo nochmal.
So..
Sub Makro2()
    Dim Pfad As String, Datei As String
    Pfad = "X:\Temp\" 'mit \ am Ende 
    Datei = Format(Now, "YYYYMMDD_hhmm")
    
    Sheets(Array("Auswertung", "Einträge")).Select 'beide Blätter auswählen 
    
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:=Pfad & Datei & ".pdf", _
        Quality:=xlQualityStandard, IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, OpenAfterPublish:=True 'oder false 
    
    Sheets("Auswertung").Select 'Gruppierung aufheben 

End Sub

LG UweD
Anzeige
Uwe: Prima, funktioniert super. Danke schön!
21.12.2018 08:27:49
Sandra
Danke für die Rückmeldung owT
24.12.2018 12:56:22
UweD

332 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige