wie kann ich mit VBA die Kontaktdaten (E-Mail, Anschrift, Telefonnummer etc.) des aktuellen Users aus Outlook auslesen?
Sub temp()
Dim myOlApp As Outlook.Application
Set myOlApp = CreateObject("Outlook.Application")
wer = myOlApp.GetNamespace("MAPI").CurrentUser
MsgBox (wer)
End Sub