Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1196to1200
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Dictionary + mehrere Schlüsselwerte

Dictionary + mehrere Schlüsselwerte
Marius
Hallo,
habe 3 Tabellen, die ich zusammen führen möchte. Da dies aber mehr als 65.536 Zeilen sind muss ich die Daten vorher komprimieren.
Bin nun soweit, dass ich das Objekt "Scripting.Dictionary" verwende. Brauche nur noch die zündelnde Idee wie ich nicht doppelte Daten einlesen kann.
Habe dies bisher so gelöst:
If Not oDic.Exists(myAr(A, 1)) Then
oDic(myAr(A, 1)) = 0
'nCount = Anzahl in Dictionary
nCount = nCount + 1
' B = Spalte
For B = 1 To UBound(myAr, 2)
'Spalten auch uebernehmen
NewArr(B, nCount) = myAr(A, B)
Next b
End If
Nur soll nicht nur geprüft werden, ob der erste Wert (myAr(A,1)) vorhanden ist, sondern die Kombinationion aus Wert myAr(A,1) + myAr(A,22) + myAr(A,23).
Kann man irgendwo auslesenlassen, wo der Wert gefunden wird nach dem Motto:
1. Gibt es myAr(A,1)?
2. Wenn ja ist myAr(A,22) gleich?
3. Wenn auch ja, ist myAr(A,23) auch gleich, dann nicht berücksichtigen.
Vielen Dank!

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Dictionary + mehrere Schlüsselwerte
19.01.2011 14:46:21
Tino
Hallo,
schreibe doch den verketteten Text in das Dictionary
oDic.Exists(myAr(A, 1) & myAr(A,22) & myAr(A,23))
und
oDic(myAr(A, 1) & myAr(A,22) & myAr(A,23)) = 0
Gruß Tino
AW: Dictionary + mehrere Schlüsselwerte
19.01.2011 16:20:50
Marius
Wird dann geprüft ob diese Kombination vorhanden ist?
Wichtig ist, dass es ja noch weiter Elemente (Spalte) gibt, die nicht berücksichtigt, aber weiter gespeichert werden müssen!
ja oT.
19.01.2011 16:45:42
Tino
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige