Hej

Jag vill känna av om det kommit in nya mail till Outlook. Denna händelse
ska trigga ett makro som sedan ska köra igång lite olika saker på
datorn.

Problemet är att jag inte vill ha en loop eller timer som ligger och väntar
och känner av efter en viss tid, utan använda eventet

event olApp.newMail() som finns i Outlook. Probelmet är att jag inte får det att fungera. Mailar gärna koden om någon tror sig kunna få rätsida
på det...

/Emma

Emma,

Nej, jag tror inte att denna ansats fungerar :-(

NewMail() returnerar inget objekt som representerar de nya mailen.

Den kan inte heller aktiveras för enskilda nya e-post utan gruppvis
av nya e-post. Därefter måste du lista ut vilka som är nya...

Det finns tredjepart-verktyg men utifrån din situationsbeskrivning är det inte önskvärt.

CDO är jag inte så kunnig på men det *kan* vara ett alternativ.

Mvh
XL-Dennis

men obj_newMail är ju ett event - vill bara att den ska känna om det finns
nya mail - och om ja, så ska min sub starta som gör det jag vill.

Men jag verkar inte gjort suben på rätt sätt...

/Emma

Om du lagt till referenser till Microsoft Outlook skriver du:
<code>
Option Explicit

Private WithEvents mOutlook As Outlook.Application

Private Sub Form_Load()
Set mOutlook = New Outlook.Application
End Sub

Private Sub Form_Unload(Cancel As Integer)
Set mOutlook = Nothing
End Sub

Private Sub mOutlook_NewMail()
MsgBox "Du har fått post!"
End Sub
</code>

Tack Andreas, fick det att fungera tidigare imorse - jag som testat lite fel.

Det visade sig att den endast känner av mail i min Inbox till den mailbox
som är satt som default. Jag vill dock känna av om det kommer några
mail till mailbox2 som ligger inlagd i samma session.

/Emma

Andreas & Emma,

Tack för info - jag läste inte frågeställningen fullt ut.

Trevllig helg,
XL-Dennis