Office: Array-Index außerhalb des zulässigen Bereiches

Hallo, ich habe eine Anwendung die in Outlook nach einem Subject sucht.
Dabei bekomme ich eine Fehlermeldung 440 Array-Index außerhalb des zulässigen Bereiches

Der Fehler passiert in Zeile 350.
Die Var lngcur steht dann auf 3908, lngcount 3911
Somit kann ich mir die Fehlermeldung nicht erklären.
Im Anhang befindet sich das VB
Über einen Tip freue ich mich.
Michael

:)

 

HI

da du Elemente der Objektliste innerhalb der Schleife löschst, reduziert sich deren Anzahl während die Schleife immer von der Anzahl ausgeht, die zu beginn vorhanden war.
Damit versuchst du dann bei Schleifenende auf Objekte zuzugreifen, die gar nicht mehr vorhanden sind (ausserdem überspringt die Schleife beim Löschen immer ein Objekt).

die Lösung ist einfach:
lass die Schleife rückwärts laufen.
For lngcur = lngcount to 1 step - 1
dann wirkt sich das Löschen nur auf den Teil der Objektliste aus, den du schon bearbeitest hast und nicht auf den, den du noch bearbeiten musst.

Gruß Daniel

 

Oder du benutzt...

Code:

 

Danke ;-)