ich habe folgenden Code:
Private Sub ComboBox1_Click()
Dim i As Integer
Dim a As Integer
If ComboBox1.ListIndex = 0 Then Exit Sub
TextBox1 = Sheets("Merker").Cells(ComboBox1.ListIndex + 1, 1)
For i = 2 To 22
For a = 1 To 21
If Sheets("Merker").Cells(ComboBox1.ListIndex + 1, i) = "ja" Then
Controls("CheckBox" & a).Value = True
End If
Next i
Next a
End Sub
...Und bekomme folgende Fehlermeldung: ungültiger Verweis auf Next-Steuervariable.Wer kann mir grade sagen was falsch ist, und mir mit der Lösung aushelfen!?
Gruß
Thorsten