problem mit if ... and ... then

[herrentor]

warum funktioniert das nicht? es geht auch nicht, wenn "eine" zahl anstatt 3-6 schreibe. ich möchte einfach nur, dass wenn in zelle [1,i] nichts ausgewählt ist und in zeile i die spalten 3,4,5 oder 6 ungleich 0 sind, eine messeage box kommt.

Code:

if Tab.Cells[1,i] = ComboBox1.Items[-1] and Tab.Cells[i,3-6] <> 0 then

danke im voraus.