wie kann ich mit Excel die Anzahl Mails im Outlook-Posteingang auslesen?
Vielen Dank im voraus!
Johannes
wenn es nur um die Anzahl geht:
Gruss Rainer
ich denke und glaube hoffentlich nicht :-)
Laut meinen Unterlagen sollte das MAPI Objekt unter O2000 schon gleich sein,... aber ich kann es nicht testen.
Hast du O2000 ?
Gruss Rainer
ich denke und glaube hoffentlich nicht :-)
Laut meinen Unterlagen sollte das MAPI Objekt unter O2000 schon gleich sein,... aber ich kann es nicht testen.
Hast du O2000 ?
Gruss Rainer
dann muss ich da wohl noch ein wenig feilen :-)
Danke für die Info
Lass mal das Makro in einer leeren Tabelle laufen,... damit solltest du die ID deiner Ordner kriegen bis zur 2. Ebene. vielleicht kannst du den Posteingang dann direkt addressieren:
Code eingefügt mit Syntaxhighlighter 1.16
Sub Get_ID_SubFolders_Outlook()
Dim i As Integer, n As Integer, mycounter As Integer
Dim objOutlook As Object
Dim objnSpace As Object
Dim objFolder As Object
Set objOutlook = CreateObject("Outlook.Application")
Set objnSpace = objOutlook.GetNamespace("MAPI")
Set objFolder = objnSpace.folders(1)
Debug.Print objFolder
mycounter = 1
On Error Resume Next
For i = 1 To 10
Cells(mycounter, 1) = i
Cells(mycounter, 2) = objFolder.folders(i)
For n = 1 To 10 ' Bei mehr Postfächern bitte anpassen
Cells(mycounter, 3) = n
Cells(mycounter, 4) = objFolder.folders(i).folders(n)
mycounter = mycounter + 1
Next n
Next i
Set objnSpace = Nothing
Set objFolder = Nothing
Set objOutlook = Nothing
End Sub
Zu deinem Problem:
Das gleich habe ich ebenfalls seit 2 Wochen, ... aber noch keine Lösung, auch die MSKB schweigt sich dazu aus.
Reparieren hat nix gebracht,.... und zum Neuinstallieren habe ich (noch) keine Zeit/Lust.
Gruss Rainer