04.06.2021, 13:58
Hallo @all,
hier nun die zweite Herausforderung:
folgender Code speichert die ExcelTab. im PDF-Format:
Das klappt auch soweit ganz gut, ABER wenn nun nicht alle Zellen in meiner Tabelle gefüllt wurden, wird trotzdem das komplette Dokument gespeichert.
Bsp: Das Dokument umfasst 4 Seiten. Seite 1 und 2 umfassen grundlegende Daten die immer ausgefüllt werden müssen. Seite 3 und 4 sind für Fotos gedacht. Das ist sehr unterschiedlich. Wenn auf Seite 1-3 was eingetragen wurde, soll 4 NICHT mit abgespeichert werden. Wie geht das? Hinweis: In der Userform beziehen sich div Buttons auf alle 4 Seiten des Dokuments...
Ich hoffe Ihr versteht was ich meine. Wenn nicht, setze ich mich am WE ran und bastel eine Bsp-Datei...
Besten Dank....
hier nun die zweite Herausforderung:
folgender Code speichert die ExcelTab. im PDF-Format:
Code:
Private Sub CommandButton1_Click()
ChDir "C:\Users\*****\Desktop\test" 'anpassen 'oder thisworkbook.path
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Range("D22").Value & Format(Date, "_DD_MM_YYYY") & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
End Sub
Bsp: Das Dokument umfasst 4 Seiten. Seite 1 und 2 umfassen grundlegende Daten die immer ausgefüllt werden müssen. Seite 3 und 4 sind für Fotos gedacht. Das ist sehr unterschiedlich. Wenn auf Seite 1-3 was eingetragen wurde, soll 4 NICHT mit abgespeichert werden. Wie geht das? Hinweis: In der Userform beziehen sich div Buttons auf alle 4 Seiten des Dokuments...
Ich hoffe Ihr versteht was ich meine. Wenn nicht, setze ich mich am WE ran und bastel eine Bsp-Datei...
Besten Dank....