Hidden und Makro
02.07.2004 10:56:19
Rainer
ich hab mal wieder ein Problem :/ Ich hab ein Makro geschreiben, dass mir ermöglich soll bestimmte Spalten anzuzeigen, bzw. bestimmte auszublenden.
Nur funktioniert das leider nicht.
Was mach ich hier falsch?
Private Sub CommandButton1_Click()
Select Case ComboBox1.Value
Case 0
Columns("O:BB").Hidden = True
Case 1
Columns("T:BB").Hidden = True
Columns("O:S").Hidden = False
Case 2
Columns("Y:BB").Hidden = True
Columns("O:X").Hidden = False
Case 3
Columns("AD:BB").Hidden = True
Columns("O:AC").Hidden = False
Case 4
Columns("AI:BB").Hidden = True
Columns("O:AH").Hidden = False
Case 5
Columns("AN:BB").Hidden = True
Columns("O:AM").Hidden = False
Case 6
Columns("AS:BB").Hidden = True
Columns("O:AR").Hidden = False
Case 7
Columns("AX:BB").Hidden = True
Columns("O:AW").Hidden = False
Case 8
Columns("O:BB").Hidden = False
End Select
End Sub