Hi!

ich habe folgendes Problem. In einer Schleife verwende ich eine Collection. Diese soll für jeden Durchlauf mit bestimmten Werten gefüllt werden, was auch gut klappt. Blöderweise gelingt es mir aber nicht, die Collection zu beginn jedes Schleifendurchlaufes zu löschen, d.h. auch alte Einträge bleiben erhalten. Gibt es eine einfache Möglichkeit, die gesamte Collection auf einmal zu löschen bzw. zu entleeren, bevor der nächste Durchlauf beginnt?

Gefüllt wird die collection mittels folgenden Codes:

Set SIBereich = Range("E1:E" & intLetzteZeile)

On Error Resume Next
For Each ZelleinSI In SIBereich
collSI.Add ZelleinSI.Value, CStr(ZelleinSI.Value)
Next ZelleinSI

On Error GoTo 0

wobei sich die Range bei jedem Schleifendurchlauf ändert. Ich hätte gerne sowas wie collSI.Delete!

Vielen Dank