seit (ungelogen) nahezu 24 h tüftel ich an einem Problem herum.
Auch in englischen Foren konnte ich keine Hilfe finden.
In Outlook habe ich ein Adressbuch, das heisst "Contacts".
Innerhalb diesem Adressbuch gibt es eine Verteilerliste, die heiss "Abteilung".
Nun wollte ich in Excel VBA die Members dieser Verteilerliste auslesen.
Auf das Adressbuch kann ich zugreifen, aber auf die Verteilerliste nicht.
Jegliche Syntax habe ich ausprobiert, keinen Erfolg.
Wenn jemand noch was weiß, ich könnte gerade in die Tastatur beissen.
Sub Mist
Dim oOL As Object
Dim oAdr As Object
Dim oEntry As Object
Dim oGroup As Object
Dim objNameSpace As Outlook.Namespace
Dim objDistList As Outlook.DistListItem
Set oOL = CreateObject("Outlook.Application")
Set objNameSpace = oOL.GetNamespace("MAPI")
Set oAdr = objNameSpace.AddressLists("Contacts") 'das klappt!!!!
Set objDistList = oAdr.Item("Abteilung") 'Egal wie ich es mache, die Zeile geht nicht!!!!
End Sub