Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Thema aus Outlook-Kontakte die Adressen auslesen

90 views
Skip to first unread message

Erich Jung

unread,
Jan 25, 2005, 5:21:13 AM1/25/05
to
Hallo Excelfreaks,

ich bräuchte mal dringend einen Tipp von Euch wie man aus Outlook aus den
Kontakten einzelne Adressefragmente ausliest.
Wenn ich mir in Outlook die Kontakte als Telefonliste anzeigen lasse sehe
ich in den einzelnen Spalten NAME, FIRMA, TELEFON....usw.


Von H. Herber habe ich ein Makro das die Adresse komplett ausliest und in
die Exceltabelle einträgt. Hier ein Auszug davon...

.
Cells(intCounter, 1) = objAddressEntry.Name
Cells(intCounter, 2) = objAddressEntry.Address
.

Meine Frage ist nun, wie kann ich speziell nur einzelne Fragmente der
Adresse aus Outlook einlesen? Speziell geht es mir um die Telefonnummer die
ich in einer eigenen Spalte haben möchte ohne dass ich weiteren VBA-Code
benötige um die Nummer aus der Adresse zu extrahieren.

Also ungefähr so:
.
Cells(intCounter, 2) = objAddressEntry.PhoneNumber [oder so ähnlich
;-)))]
.

Welche Elemente sind aus den Outlook-Kontakten noch ansprechbar/lesbar?

Bin dankbar für jeden Tipp.

btw. Ich habe leider Probleme mit meinem Outlook NewsReader. Ich kann zwar
einen neuen Newsbeitrag schreiben, aber eine Antwort auf einen Beitrag kann
ich nicht verschicken. Es ist also keine Unhöflichkeit wenn ich nicht direkt
antworte.

Gruß Erich


frankarendt-theilen

unread,
Jan 25, 2005, 7:22:42 AM1/25/05
to
Hallo Erich,
siehe unter
http://www.software-chuchi.ch/praxis/microsoft_excel_vba_office_automation_kontakte_von_outlook_automatisch_importieren.htm

MfG Frank
_____________________________________________
Frank Arendt-Theilen, Microsoft MVP für Excel, Hameln
Website: http://www.xl-faq.de; Auftragsprogrammierung

stefan onken

unread,
Jan 25, 2005, 7:37:02 AM1/25/05
to
hallo Erich,
noch ein link dazu:
http://www.office.gmxhome.de/_excel_outlook.htm

Gruß
stefan

"Erich Jung" schrieb:

> Hallo Excelfreaks,
>
> ich bräuchte mal dringend einen Tipp von Euch wie man aus Outlook aus den
> Kontakten einzelne Adressefragmente ausliest.
> Wenn ich mir in Outlook die Kontakte als Telefonliste anzeigen lasse sehe
> ich in den einzelnen Spalten NAME, FIRMA, TELEFON....usw.
>
>
> Von H. Herber habe ich ein Makro das die Adresse komplett ausliest und in
> die Exceltabelle einträgt. Hier ein Auszug davon...
>

> ..


> Cells(intCounter, 1) = objAddressEntry.Name
> Cells(intCounter, 2) = objAddressEntry.Address

> ..


>
> Meine Frage ist nun, wie kann ich speziell nur einzelne Fragmente der
> Adresse aus Outlook einlesen? Speziell geht es mir um die Telefonnummer die
> ich in einer eigenen Spalte haben möchte ohne dass ich weiteren VBA-Code
> benötige um die Nummer aus der Adresse zu extrahieren.
>
> Also ungefähr so:

> ..


> Cells(intCounter, 2) = objAddressEntry.PhoneNumber [oder so ähnlich
> ;-)))]

> ..

Erich Jung

unread,
Jan 25, 2005, 3:11:47 PM1/25/05
to
Vielen Dank Euch beiden, die Progs aus den Links funktionieren super

Gruß Erich

"Erich Jung" <erich...@de.bosch.com> schrieb im Newsbeitrag
news:ct56ir$63$1...@ns2.fe.internet.bosch.com...

0 new messages