Send Outlook Meeting Invitation using Excel

Question

I am looking to send meeting invitations for each row in a worksheet.

I am able to create an item that when displayed shows as an appointment, not a meeting request that

Answer 1

I had the same problem as the OP but rather than resort to send keys I used the inspector to access the Invite Attendees ribbon command. Here are excerpts from the code:

Dim oApp As Object
Dim OutMail As Object
Dim oCommandBar As Object 'Office.CommandBars
Dim oInsp As Object 'Outlook.inspector
        
Set outMail = oApp.CreateItem(1)

'then these in the loop to get access to the ribbon:

Set oInsp = OutMail.GetInspector
Set oCommandBar = oInsp.CommandBars

'Show the mail item
outMail.display

'Press the Invite attendees ribbon item
oCommandBar.ExecuteMso ("InviteAttendees")