D.h. auch wenn ich das erste dictionary in route speichere, wird es im nachhinein noch überschrieben?

Nein, da wird nix überschrieben. Beide Zwischenstationen (Dictionaries) haben bei dir die selbe Instanz einer Collection zugewiesen.

D.h. ich müsste für jede gaesteliste eine neue Instanz, zB gaesteliste1, 2, etc anlegen?

Korrekt, jede Zwischenstation bräuchte, unter dem von dir genannten Kriterium, seine eigene Collection.

Ob du dafür unbedingt eine Variable brauchst...? Nein.

Set zwischenstation = CreateObject("Scripting.Dictionary")
Call route.Add(zwischenstation)
Call zwischenstation.Add("Oklahoma", New Collection)
Call zwischenstation("Oklahoma").Add("Günther")
 
Set zwischenstation = CreateObject("Scripting.Dictionary")
Call route.Add(zwischenstation)
Call zwischenstation.Add("Manchester", New Collection)
Call zwischenstation("Manchester").Add("Günther")
 
For Each zwischenstation In route
  For Each key In zwischenstation.Keys
    If key = "Oklahoma" Then
      Call zwischenstation(key).Add("Heinz")
'...

Grüße