mehrere CheckBox +If... +select
23.09.2004 16:00:01
Bastian
Folgendes Problem:
Ich würde gerne per CheckBox mehrere bestimme Zellen markieren.
Der Code dafür sieht so aus:
-----------------------------------------------------------------------
If CheckBox1.Value = False Then
Range("A8:AL8,A20:AL20,A32:AL32,A44:AL44,A56:AL56").Select
End If
-----------------------------------------------------------------------
Mein Problem ist nun, das ich 9 solcher Checkboxen habe und immer wenn ich die restlichen 8 dazu nehme, wird immer nur die letzte Markierung durchgeführt.
Das soll heißen, der Code sieht dann so aus:
-----------------------------------------------------------------------
If CheckBox1.Value = False Then
Range("A8:AL8,A20:AL20,A32:AL32,A44:AL44,A56:AL56").Select
End If
If CheckBox2.Value = False Then
Range("A9:AL9,A21:AL21,A33:AL33,A45:AL45,A57:AL57").Select
End If
-----------------------------------------------------------------------
Jetzt werden halt nur diese Zellen markiert A9:AL9,A21:AL21,A33:AL33,A45:AL45,A57:AL57 (von CheckBox2)
und nicht diese
A8:AL8,A20:AL20,A32:AL32,A44:AL44,A56:AL56 (von CheckBox1)
und diese
A9:AL9,A21:AL21,A33:AL33,A45:AL45,A57:AL57 (von CheckBox2),
was er eigentlich soll!
Beide Bedingungen sind so erfüllt, daß das eigentlich passieren sollte!
Was mach ich falsch?
Vielen Dank!
Gruß!
Bastian / racoon