10-08-2008 04:15 AM
Hallo zusammen,
Bei :
GAnzahl = GroupCount ' Groupcount ist 142
For k=1 To GAnzahl
If InStr(GroupPropGet(k,"name") , "XXX") = 0 Then
Call GroupDel(k)
End If
Next
kriege ich einen Fehler, was ich nicht so ganz verstehe :
Im Befehl "GroupDel (69)" verwenden Sie einen unzulässigen Wert : 69. erlaubte werte sind 0 bis GroupCount.
Obwohl der GroupCount bis 142 geht ??
hat jmd eine Idee ?
Youssef
Solved! Go to Solution.
10-08-2008 04:22 AM - edited 10-08-2008 04:25 AM
Hallo Youssef!
Wahrscheinlich war 74mal (142-68) deine Bedinung Wahr und eine Gruppe wurde gelöscht. Dadurch wurde dann natürlich auch GroupCount um 1 verringert, die Schleife läuft aber bis zum ursprünglichen Wert. Schleifen in denen gelöscht wird was man indiziert, sollten immer rückwärst laufen. Die Schleife sollte also so aussehen:
GAnzahl = GroupCount ' Groupcount ist 142 For k=GAnzahl To 1 Step -1 If InStr(GroupPropGet(k,"name" , "XXX" = 0 Then Call GroupDel(k) End If Next
Matthias
Matthias Alleweldt Project Engineer / Projektingenieur | Twigeater? |
10-08-2008 05:48 AM
Danke Matthias 😉
daran habe ich nicht gedacht.