PDF per Makro mit Auswahl der Spaltenbereiche

Hallo,
danke erstmal für deine Hilfe. Ich benötige denoch ein Userform, ich finde das schöner :) (außerdem ist der Tabellenbereich ein Beispiel; bei 4 Spalten durchaus realisierbar, aber bei 20 schon sehr umständlich)
Ich habe das Userform jetzt so erstellt:

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then Cells(1, 10) = "A" Else Cells(1, 10) = ""
End Sub
Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then Cells(2, 10) = "B" Else Cells(2, 10) = ""
End Sub
Private Sub CheckBox3_Click()
If CheckBox3.Value = True Then Cells(3, 10) = "C" Else Cells(3, 10) = ""
End Sub
Private Sub CheckBox4_Click()
If CheckBox4.Value = True Then Cells(4, 10) = "D" Else Cells(4, 10) = ""
End Sub
Private Sub CommandButton5_Click()
Me.Hide
Call DruckenMitSpaltenWahl
CheckBox1.Value = False
CheckBox2.Value = False
CheckBox3.Value = False
CheckBox4.Value = False
End Sub

Wobei ich mir in Spalte J die gewählten Spalten ausgeben lasse und in deiner Zelle G1 (Bezug für den Druck) folgende Formel: =WECHSELN(GLÄTTEN(J1&" "&J2&" "&J3&" "&J4);" ";";")
Das geht auch im Makro direkt, aber ich bekomme es nicht hin...
Zum Druck:
Die Wiederholungszeilen, die Du hier definierst

Const WhZeilen As String = "$10:$12" 'Wiederholungszeilen

wird nicht mit angezeigt.
Schön funktioniert das mit der letzten benutzetn Zeile :)
Was noch ungünstig ist, ist die Tatsache, dass ich ein PDF speichern will und nicht direkt drucken. Außerdem Wird der Druckbereich angepasst auf eine Seite, damit wird aber der Inhalt viel zu klein, wenn wirklich mal alle 500 Zeilen gefüllt sind.
Anbei die Datei mit Userform:
https://www.herber.de/bbs/user/104961.xlsm
Aber Grundsätzlich ein sehr hilfreicher Ansatz, vielen Dank
vielleicht hast du zu den genannten Problemen auch noch eine Idee

Hallo Michael,
nein, das hast du mirgegenüber noch nicht erwähnt :). Aber ich finde deine Art zu belehren/zu erklären sehr sympatisch.
Ja, du hast Recht. Das Sender - Empfänger - Prinzip hat hier wieder voll zugeschlagen.
Ich versuche meine (aus meiner Sicht komplexen) Probleme so einfach wie möglich zu beschreiben und am besten mit einer simplen Musterdatei zu simulieren.
Es fällt mir dabei jedoch öfter auf die Füsse, dass ich damit komplexere Zusammenhänge schlichtweg vergesse zu erklären oder einzubauen.
Ich versuche es nochmal :)
Also ich habe eine Tabelle, die mit verschiedensten Formeln und Zahlen gefüllt ist. Bis auf wenige Eingabefelder ist alles gesperrt.
Ich will jetzt über den PDF Druck quasi verschiedene Ausgabevarianten generieren. Dabei will ich Spaltenbereich vorfefinieren. Da ich ein wenig VBA Kenntnisse habe (Try & Error)
habe ich mir eingebildet aus den Werten A B C D eigenständig Bereiche zu bauen im Skript. Daher dieses einfache Muster :)
Deine Ansätze/Lösungen gefallen mir gut. Bei vielen Sachen verstehe ich schon den Hintergrund. Ich habe das mit dem Druckbereich nur unzureichend getestet,
daher habe ich den Seitenwechsel bei vielen Daten nicht gesehen und durch die Zufallszahlen ist mir der "Kopf" nicht aufgefallen. Danke für die optische Aufwertung/Trennung. Sorry dafür.
Den Zielpfad habe ich bereits angepasst mit:

strPfad = Environ("UserProfile") & "\Desktop\"

den PDF Druck habe ich auch angepasst, damit keine Datein überschrieben werden:

.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
strPfad & "Übersicht " & ActiveSheet.Name & " " & Format(Now, "YYYY.MM.DD hh.mm.ss") & " _
.pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
From:=1, OpenAfterPublish:=True

Erweitern wir doch bitte den Bereich um 5 Spalten (A,B,C,D,E,F,G,H,I)
Spalte D bleibt weiterhin die Bezugsspalte für die maximalen Spalten.
Die Auswahl in der Checkbox würde ich wie folgt simulieren wollen:
1. A
2. A + B
3. A + B + I
4. A + B + G + H + I
Echt nochmal vielen Dank für deine Hilfe. Ich bin froh um jeden zusätzlichen Text, weil ich damit gut lernen kann Zusammenhänge zu verstehen.
LG Christian

PDF per Makro mit Auswahl der Spaltenbereiche

Forumthread: PDF per Makro mit Auswahl der Spaltenbereiche

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

PDF per Makro mit Auswahl der Spaltenbereiche

Forumthread: PDF per Makro mit Auswahl der Spaltenbereiche

11 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread