Something like this … Private Sub processFolder(ByVal oParent As Outlook.MAPIFolder) Dim oFolder As Outlook.MAPIFolder Dim oMail As Outlook.MailItem For Each oMail In oParent.Items ‘Get your data here … Next If (oParent.Folders.Count > 0) Then For Each oFolder In oParent.Folders processFolder oFolder Next End If End Sub
You are missing the iTIP method, both in the content-type: Content-Type: text/calendar; charset=”utf-8″; method=REQUEST and as a VCALENDAR property as well: BEGIN:VCALENDAR VERSION:2.0 METHOD:REQUEST PRODID:-//GourmetPortal//NONSGML rr//DE The method might be PUBLISH or REQUEST (in which case you also miss some ATTENDEE property). Then, some clients are ignoring iMIP in multipart/alternative and are looking only as … Read more
This code will add an event listener to the default local Inbox, then take some action on incoming emails. You need to add that action in the code below. Private WithEvents Items As Outlook.Items Private Sub Application_Startup() Dim olApp As Outlook.Application Dim objNS As Outlook.NameSpace Set olApp = Outlook.Application Set objNS = olApp.GetNamespace(“MAPI”) ‘ default … Read more
Since you have not mentioned what needs to be copied, I have left that section empty in the code below. Also you don’t need to move the email to the folder first and then run the macro in that folder. You can run the macro on the incoming mail and then move it to the … Read more
The code below will create an outlook message & keep the auto signature Dim OApp As Object, OMail As Object, signature As String Set OApp = CreateObject(“Outlook.Application”) Set OMail = OApp.CreateItem(0) With OMail .Display End With signature = OMail.body With OMail ‘.To = “someone@somedomain.com” ‘.Subject = “Type your email subject here” ‘.Attachments.Add .body = “Add … Read more
Something like this should do the trick Dim objNS As Outlook.NameSpace Dim objFolder As Outlook.MAPIFolder Set objNS = GetNamespace(“MAPI”) Set objFolder = objNS.Folders(“Procurement, Request”) Set objFolder = objFolder.Folders(“Inbox”) This link has some useful code for handling different Inboxes – it may be of interest