Hallo - und noch mal Outlook
ich versuche auf folgendem wege den/die pfad/e zur Outlook pst heraus zu finden - doch leider bekomme ich nur ""
Dim objOutl As Object
Dim oNameSpace As Object
Dim oStore As Object
Dim oStores As Object
Dim oNameSpace As Object
Dim oStore As Object
Dim oStores As Object
Set objOutl = CreateObject("outlook.application")
Set oNameSpace = objOutl.GetNamespace("MAPI")
Set oNameSpace = objOutl.GetNamespace("MAPI")
Set oStores = oNameSpace.Stores
For Each oStore In oStores
Debug.Print "Pfad :" & oStore.FilePath & vbCrLf
Next oStore
Debug.Print "Pfad :" & oStore.FilePath & vbCrLf
Next oStore