Dim varLL, Fehler As String, wb As Workbook, i As Integer
With ActiveWorkbook
varLL = .Sheets("Eingabe").Range("L4")
For i = 1 To 8
If Controls("TextBox" & i + 8).Text varLL Then Fehler = Fehler & " - " & i
Next
Konkretes Beispiel:
Wert in L4= 66666
Textbox1 Wert = 16666
Textbox2 Wert = 26666
Textbox3 Wert = 36666
Textbox4 Wert = 46666
Also Abfrage korrekt.