Hi Daniel,

zwischenstation hast du als ein einzelnes Object deklariert. Mit Set zwischenstation = CreateObject("Scripting.Dictionary") unter Punkt 2 überschreibst du die Daten aus Punkt 1 mit einem nun wieder leeren Objekt. Was passiert denn, wenn du diese Zeile einfach mal weglässt? Da du auch route.Add zwischenstation zweimal hast, erhälst du am Ende zweimal denselben Wert unter verschiedenen Übergabepunkten.

Warum überhaupt so kompliziert? Was willst du erreichen? Für derartige Vorhaben gibt es bessere Wege. z.B. die Type-Anweisung z.B. in Verbindung mit einem Array oder noch besser sind Klassenmodule.

Gruß Mr. K.