Hallo Jaqueline,
nachfolgender VBA-Code blendet Dir bei Aktivieren von Kontrollkästchen die Spalten E, F oder G ein bzw. wieder aus. Für diesen VBA-Code müssen Kontrollkästchen aus der Symbolleiste "Steuerelement-Toolbox" verwendet werden. Außerdem müssen die Namen der CheckBoxen "CheckBox1", "CheckBox2" und "CheckBox3" heißen.
Kopiere den VBA-Code in das VBA-Projekt des Tabellenblatts, in dem die CheckBoxen eingefügt wurden.
Teste das Makro aber bitte in einer Testdatei und nicht gleich in Deiner Originaldatei.
Option Explicit
Private Sub CheckBox1_Click()
'Wenn CheckBox1 aktiviert, dann...
If CheckBox1 = True Then
'...Spalte E einblenden und ...
Columns("E:E").EntireColumn.Hidden = False
'...Text in CheckBox ändern (Text nur für das _
Beispiel, ist für die Funktion nicht notwendig)
CheckBox1.Caption = "Spalte E Ein"
'...wenn CheckBox nicht aktiviert, dann...
Else
'...Spalte E ausblenden und ...
Columns("E:E").EntireColumn.Hidden = True
'...Text in CheckBox ändern (Text nur für das _
Beispiel, ist für die Funktion nicht notwendig)
CheckBox1.Caption = "Spalte E Aus"
End If
End Sub
Private Sub CheckBox2_Click()
'Wenn CheckBox2 aktiviert, dann...
If CheckBox2 = True Then
'...Spalte F einblenden und ...
Columns("F:F").EntireColumn.Hidden = False
'...Text in CheckBox ändern (Text nur für das _
Beispiel, ist für die Funktion nicht notwendig)
CheckBox2.Caption = "Spalte F Ein"
Else
'...Spalte F ausblenden und ...
Columns("F:F").EntireColumn.Hidden = True
CheckBox2.Caption = "Spalte F Aus"
End If
End Sub
Private Sub CheckBox3_Click()
'Wenn CheckBox3 aktiviert, dann...
If CheckBox3 = True Then
'...Spalte G einblenden und ...
Columns("G:G").EntireColumn.Hidden = False
'...Text in CheckBox ändern (Text nur für das _
Beispiel, ist für die Funktion nicht notwendig)
CheckBox3.Caption = "Spalte G Ein"
Else
'...Spalte G ausblenden und ...
Columns("G:G").EntireColumn.Hidden = True
'...Text in CheckBox ändern (Text nur für das _
Beispiel, ist für die Funktion nicht notwendig)
CheckBox3.Caption = "Spalte G Aus"
End If
End SubbZum besseren Verständnis habe ich Dir mal eine Beispieldatei unter
http://www.excelbeispiele.de/beispiele_supportnet/Durch_Kontrollkaestchen_Spalten_ein_oder_ausblenden.xls hochgeladen.
Solltest Du nicht wissen, wie Du den Code in Deine Datei bekommst, dann schau mal auf
meiner HP in der
Rubrik Anleitungen und dort dann in der
Anleitungsnummer 2 nach. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.
Bei Fragen melde Dich.
MfG,
Oliver
[sub]Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du[/sub]
[sup] ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.[/sup]