Office: mit Excel Daten aus Outlook erfassen

Ich grüße Euch.

Folgendes Problem:

Ich habe Kontakte in Outlook.
Innerhalb dieser Kontakte wurden Kategorien spezifiziert, z.B. Mitarbeiter, Chef, Praktikant, etc. Jeder Kontakt hat mehrere Kategorien.
Diese Daten sollen in Excel (Datei schon vorhanden, inklusive Makro).
Habe schon ein Makro mit VisualBasic geschrieben, welches, unter der Spezifikation einer speziellen Kategorie, alle Kontakte in mein Arbeitsblatt von Excel importiert.
Code:
....
For Each Itm In ContactItems
' durchsucht die Kontakte nach Kategorie Mitarbeiter
If InStr(1, Itm.Categories, "Mitarbeiter") <> 0 Then
Debug.Print Itm.LastName, Itm.FirstName, Itm.Categories
ContactToSheet Itm
End If
Next
....

Nun habe ich auch mal Abkürzungen als Kategorie verwendet. Z.B. AN, AG, AR, etc.

So, nun der Plan:

In einer 2ten xls-Datei habe ich, ganz simpel, die Abkürzungen in Spalte A stehen und in Spalte B die dazugehörigen Bezeichnungen.

Nun möchte ich gerne innerhalb des Makros folgendes erreichen:

Innerhalb der 1sten xls-Datei (die mit den Outlook-Informationen) starte ich das Makro. Dieses erfasst alle Kontakte einer speziellen Kategorie. Dann sollen mit Hilfe der 2ten xls-Datei die Abkürzungen geprüft werden (über einen Vergleich) und die Bezeichnung soll jedoch in die 1ste Datei übernommen werden. Hierbei weiß ich, daß alle Abkürzungen gebraucht werden, d.h. die Schleife läuft über alle Kontakte der Kategorie.

Ich weiß leider nicht, wie ich, per VB, an die "Liste" der Kategorien von Outllook komme.
Cells(11, 11).Value = Itm.Categories

Wie kann ich die Kategorien erfassen? Liefert mir das Ergebnis eine Art Feld?

Ich bedanke mich schon einmal im Voraus.

Freundlichst,
Acubens

P.S.
Microsoft Office Basic Edition 2003

P.P.S.
Habe die Such-Funktion genutzt aber leider nichts gefunden.

 

Hallo,

meinst Du mit "Liste" die Hauptkategorienliste? Der Speicherort hängt von der Outlook-Version ab. Hier gibt's viele Informationen zum Thema.

 

Guten Morgen.

Danke für die Antwort.

Mit "Liste" meine ich schon die Kategorienliste.
Allerdings sind meine Einträge nicht als Hauptkategorie definiert, sondern lediglich im Bearbeitungsfenster des Kontaktes im Textfeld unten reingeschrieben. Zumindest steht in Klammern hinter meinem Eintrag, das sie nicht in der HK-Liste stehen.
Zum Beispiel:
Mitarbeiter; AR; AN

Outlook liefert bei der VB-Abfrage einen String zurück. Soviel weiß ich.
Wie kann ich nun den String abfragen, ob ein bestimmter Ausdruck (z.B. AN) innerhalb dieses Strings ist?

Vielen Dank im Voraus.

Acubens