Thema Datum  Von Nutzer Rating
Antwort
10.01.2024 20:30:06 Daniel
NotSolved
10.01.2024 22:50:23 xlKing
NotSolved
11.01.2024 08:10:20 Daniel
NotSolved
11.01.2024 20:19:50 xlKing
Solved
17.01.2024 17:09:00 Daniel
NotSolved
11.01.2024 07:56:41 Mase
NotSolved
11.01.2024 08:05:00 Daniel
NotSolved
11.01.2024 15:22:50 Mase
NotSolved
11.01.2024 16:21:23 Daniel
NotSolved
11.01.2024 20:26:38 Mase
Solved
11.01.2024 20:43:02 Daniel
NotSolved
11.01.2024 17:19:52 Gast8231
NotSolved
11.01.2024 20:07:08 Daniel
NotSolved
Blau Liste von dictionaries in zwei Schleifen durchlaufen
 12.01.2024 06:08:31 Gast32600
Solved
17.01.2024 21:43:22 Daniel
NotSolved

Ansicht des Beitrags:
Von:
Gast32600		 Datum:
12.01.2024 06:08:31		 Views:
480		 Rating:
     
Antwort:
 Nein
Thema:
Liste von dictionaries in zwei Schleifen durchlaufen

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.

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:
Rich Text Editor, ctl00_Content_editor1



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
10.01.2024 20:30:06 Daniel
NotSolved
10.01.2024 22:50:23 xlKing
NotSolved
11.01.2024 08:10:20 Daniel
NotSolved
11.01.2024 20:19:50 xlKing
Solved
17.01.2024 17:09:00 Daniel
NotSolved
11.01.2024 07:56:41 Mase
NotSolved
11.01.2024 08:05:00 Daniel
NotSolved
11.01.2024 15:22:50 Mase
NotSolved
11.01.2024 16:21:23 Daniel
NotSolved
11.01.2024 20:26:38 Mase
Solved
11.01.2024 20:43:02 Daniel
NotSolved
11.01.2024 17:19:52 Gast8231
NotSolved
11.01.2024 20:07:08 Daniel
NotSolved
Blau Liste von dictionaries in zwei Schleifen durchlaufen
 12.01.2024 06:08:31 Gast32600
Solved
17.01.2024 21:43:22 Daniel
NotSolved