PDF per Makro erstellen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: PDF per Makro erstellen
von: Paul
Geschrieben am: 25.04.2015 19:14:01

Hallo,
ich habe mir gerade einen Code zusammengeschustert (und gegoogelt) um bestimmte Tabellenblätter meiner Dienstplantabelle als PDF abzuspeichern. Das der so nicht funktioniert hab ich mir bei meinen VBA Kenntnissen denken können. Aber ich habe schonmal alle mir wichtigen Parameter zusammengetragen. Könnt ihr mir helfen ihn zum Laufen zu bekommen?

Private Sub CommandButton2_Click()
    Sheets(Array("Woche 1", "Woche 2", "Woche 3", "Woche 4")).Select
    ActiveWondow.ExportAsFixedFormat
    Type=xlTypePDF
    Filename = Range("AH1").Value
    Quality = xlQualityStandard
    IncludeDocProperties = True
    IgnorePrintAreas = False
    OpenAfterPublish = True
    ChDir ThisWorkbook.Path
End Sub
Die Tabelle kann ich leider aufgrund der Uploadbegrenzung nicht beifügen...
Vielen Dank!
Paul.

Bild

Betrifft: AW: PDF per Makro erstellen
von: Nepumuk
Geschrieben am: 25.04.2015 19:58:37
Hallo,
so besser?

Private Sub CommandButton2_Click()
    ChDrive Left$(ThisWorkbook.Path, 2)
    ChDir ThisWorkbook.Path
    Worksheets(Array("Woche 1", "Woche 2", "Woche 3", "Woche 4")).Select
    Worksheets("Woche 1").ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:=Range("AH1").Value, _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=True
End Sub

Gruß
Nepumuk

Bild

Betrifft: AW: PDF per Makro erstellen
von: mumpel
Geschrieben am: 25.04.2015 20:00:05
Hallo!

Public Sub TestPDF()
    
    Sheets(Array("Tabelle1", "Tabelle3")).Copy
    
    With ActiveWorkbook
        .ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\Test56.pdf", _
                             Quality:=xlQualityStandard, IncludeDocProperties:=True, _
                             IgnorePrintAreas:=False, OpenAfterPublish:=True
        .Close savechanges:=False
   End With
End Sub

VBA/HTML - CodeConverter für Office-Foren, AddIn für Office 2002-2013 - in VBA geschrieben von Lukas Mosimann. Projektbetreuung:mumpel

Code erstellt und getestet in Office 15 - mit VBAHTML 12.6.0

Gruß, René

Bild

Betrifft: AW: PDF per Makro erstellen
von: Paul
Geschrieben am: 25.04.2015 20:21:10
Vielen Dank ihr beiden! Jetzt geht es...

 Bild

Beiträge aus den Excel-Beispielen zum Thema "PDF per Makro erstellen"