Outlook-Kontake in Excel anzeigbar?

10/06/2008 - 10:03 von Michael Mueller | Report spam
Hi,

in Outlook habe ich in der Menüleiste ein Feld für "Kontakt suchen".
Wenn ich dort einen Namen füttere wird ein Fenster geöffnet mit den
Eigenschaften des Kontaktes.

Nun würde ich gerne in Excel per VBA just dieses Eigenschafts-Fenster für
einen vorgegebenen Namen anzeigen lassen.

Wer kann mir sagen wie dies funktioniert (wenn es denn geht)?

Danke
Michi
 

Lesen sie die antworten

#1 stefan onken
10/06/2008 - 10:13 | Warnen spam
On 10 Jun., 10:03, "Michael Mueller"
wrote:
Hi,

in Outlook habe ich in der Menüleiste ein Feld für "Kontakt suchen".
Wenn ich dort einen Namen füttere wird ein Fenster geöffnet mit den
Eigenschaften des Kontaktes.

Nun würde ich gerne in Excel per VBA just dieses Eigenschafts-Fenster für
einen vorgegebenen Namen anzeigen lassen.

Wer kann mir sagen wie dies funktioniert (wenn es denn geht)?

Danke
Michi



hallo Michael,
hier ein Codebeispiel:

Sub KontaktAnzeigen()
'Extras/Verweise auf MS Outlook Object Library setzen
Dim ol As Outlook.Application
Dim olNameSpace As Outlook.NameSpace
Dim olFolder As Outlook.MAPIFolder
Set ol = CreateObject("Outlook.Application")
Set olNameSpace = ol.GetNamespace("MAPI")
Set olFolder = olNameSpace.GetDefaultFolder(olFolderContacts)
For Each Kontakt In olFolder.Items
If Kontakt.LastName = "NACHNAME" Then
Kontakt.Display
Exit Sub
End If
Next
End Sub

Statt NACHNAME dann der zu suchende Nachname. Es gibt natürlich mehr
Kategorien, siehe auch
http://www.office.gmxhome.de/_excel_outlook.htm

Gruß
stefan

Ähnliche fragen