|
Hallo.
ich bin ein vba "Neuling" und daher bei folgendem Vorgehen auf Hilfe angewiesen:
ich habe eine Datei mit mehreren Tabellenblättern (z.B. Tabelle 1, Tabelle2, Tabelle 3)
auf Tabelle 2 und 3 habe ich bereits Checkboxen eingefügt die genau das selbe für die jeweiligen Tabellen machen (ausblenden von Spalten).
Nun möchte ich, dass in Tabelle 1 eine identische Checkbox ist, diese soll aber nicht die Spalten in Tabelle 1 ansprechen, sondern die Spalten von 2 und 3 zentral steuern.
Sprich, ein "Zentrallsheet" das Seitenübergreifend die Spalten ein uns ausblendet und 2 in denen man noch individuell die Spalten auswählen kann.
Der Code für die Checkboxen auf Tabelle 2 und 3 sieht wie folgt aus:
Private Sub CheckBox1_Click()
[L:O].EntireColumn.Hidden = Not CheckBox1
End Sub
Private Sub CheckBox2_Click()
[U:Z].EntireColumn.Hidden = Not CheckBox2
End Sub
Private Sub CheckBox3_Click()
[AF:AM].EntireColumn.Hidden = Not CheckBox3
End Sub
Private Sub CheckBox4_Click()
[AQ:AV].EntireColumn.Hidden = Not CheckBox4
End Sub
Bin dankbar für jede Hilfe!
LG
|