Hallo,

ich frage CB's ab, um dann bestimmte Zellen mit entsprechendem Inhalt zu füllen.
Da bei ElseIf ja nicht mehrere "... = true" bearbeitet werden, sondern nach dem ersten erfolgreichem die If-Prozedur gleich abgebrochen wird, heißt das für mich, daß ich für jede CB einen derartigen Block schreiben muß:

~begin~
If CheckBox1 = True Then
Cells(17, 2) = "sehr"
End If
~end~

Ich hätte mir da aber eher etwas wie:
Cells(17,2)="sehr" für CheckBox1 = True
vorgestellt. Natürlich wieder mit der Option, daß der Code nicht beim ersten "...=True" die restlichen CB's links liegen läßt.
Vielen Dank für Hinweise die zur Lösung des Probs beitragen ;-)
Gruß,
Ingo