heute habe ich mal eine Outlookfrage, ich weiß, dass das Forum für Excel ist, aber ihr kennt euch ja so gut mit VBA aus und fragt mit Excel auch Outlookinhalte ab... in der Hoffnung, dass meine Frage für euch leicht zu beantworten ist stelle ich sie hier mal ein:
Also ich überwache meine Outlook-Posteingang mit folgendem Code:
Public Sub Application_Startup()
Set newMail = Application.GetNamespace("MAPI").Folders.Item("Postfach").Folders.Item(" _
Posteingang").Items
End Sub
Private Sub newMail_ItemAdd(ByVal Item As Object)
MsgBox ("Neues Element im Posteingang")
End Sub
Sobald ein neues Element im Posteingang eingeht bekomme ich eine Meldung "Neues Element im Posteingang". Durch eine Formularvorlage kommt es zu einer kurzen Zwischenspeicheraktion im Posteingang aufgrund dessen die Meldung auch erscheint, obwohl die Nachricht direkt in einen Unterordner verschoben wird.
Jetzt meine Frage dazu, wie muß man den Code anpassen, so dass die Meldung erst erscheint, wenn das neue Element länger als 10 Sekunden im Posteingang liegt?
Gruß Andy