ich möchte gern unterschioedliche Textboxen auswählen,
so klappt es nicht:
For iIndx = 1 To 23 & ( 44 to 50)
gruß
kurt h
For iIndx = 1 to 23
... Code
Next
For iIndex = 44 to 50
...Code
Next
oder du machst eine Gesamtschleife mit Prüfung
For iIndx = 1 to 50
Select Case iIndx
Case 1 to 23, 44 to 50
...Code
Case Else
End Select
Next
oder du schreibst die Start- und EndWerte in ein Array und Schachtelst dann diese Scheifen.
Dim Von
Dim Bis
dim i
Von = Array(1, 44)
Bis = Array(23, 50)
for i = 0 to 1
For iIndx = von(i) to Bis(i)
...Code
Next
Next
Gruß Daniel