Gleiches Problem wie früher... GROUP BY

[0xse]

Ich habe 500.000 Dokumente die zu 200 Kunden gehören. Ich habe die erste Spalte sortiert und mir eine Entrycollection geben lassen. Nur da sind auch wieder alle Dokumente drin und nicht nur die Kategorien (also die KndnNr).

Wie kann ich schnellstmöglich eine Liste (Datentyp ist erstmal egal) aller verschiedenen Kunden weiterverarbeitbar erstellen?

Set doc = view.GetFirstDocument()
While Not(doc Is Nothing)
   s = doc.KndnNr(0)
   If s <> "" Then
      If kndnr.Exists(s) = True Then Goto kndgefunden
      kndnr.Add s, 1
      kndcount = kndcount + 1
   End If
kndgefunden:
   Set doc = view.GetNextDocument(doc)
Wend

So funzt es bisher, nur leider läuft er dabei alle Datensätze durch :<

[Thomas Schulte]

Ist ja auch richtig was er da macht denn du brauchst da keine Entrycollection sondern den Viewnavigator und da die getnextCategory Methode um das zu realisieren

[0xse]

Cumshot! Es funktioniert Danke