Hi Svan,
das Problem ist, dass Du auf Array-Elemente zugreifst, die nicht existieren. Ich würde mal versuchen, entweder über ReDim die Länge des Arrays varBereich anzupassen (nach dem Zugriff auf rs_Referenz) oder mittels UBound und if-Abfrage nur diejenigen varBereich (*) auszulesen, die es wirklich gibt.
Beide Vorschläge sind nur quick-and-dirty und nicht getestet.
Ciao
Hans-Peter