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
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen