SIcherstellen. das es Outlook-Kontakte sind...
KLE
Hi,
...ich habe eine Datei mit der ich einfach Kontakte aus Outlook einlese. Aber: Neuerdings erhalte ich bei einem Ordner immer eine Fehlermeldung. Jetzt habe ich herausgefunden, dass er sich immer an einer Verteilerliste/Gruppe stört beim Import.
Wie kann ich sicherstellen, dass beim einlesen:
' Outlook-Ordner zuweisen
Set objnSpace = objOutlook.GetNamespace("Mapi")
Set workingFolder = objnSpace.PickFolder ''' Dialog öffnen (Ordner-Auswahl Outlok)
If workingFolder Is Nothing Then Exit Sub ' Ist kein Ordner ausgewählt - exit.
For i = 1 To workingFolder.Items.Count
Set objItem = workingFolder.Items(i)
With Obitem
....' und hier geht dann der import los...
einfach die Verteilerliste nicht berücksichtigt wird?
Zusatzfrage, wie kann man sicherstellen, das nur "Kontakt-Ordner" ausgewählt werden können?!?
Gruß und vielen Dank!
Kay