Create meeting in outlook from Excel vba

E

eran.chason

Hello,
I have the following code in Excel VBA to create an appointment in
Outlook calander. I want also to add an optional attendees.


Can anyone help? nothing I do seem to work!


Dim objOL As Object
Dim objItem As Object
Dim lngRow As Long


Set objOL = CreateObject("Outlook.Application")
Set objItem = objOL.CreateItem(1)
If Me.CheckBox_AdvanceParam.Value = True Then GoTo MultiplePM


With objItem
.Body = Me.ComboBox_PMType.Text
.Duration = 360
.ReminderMinutesBeforeStart = (60 * 24)
.Start = Me.TextBox_Date.Text & " 09:30:00 AM"
.Subject = Me.ComboBox_PMType.Text & " on " &
Me.ComboBox_System
.Save
End With


Thanks a lot,
Eran
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Add attendees from excel vba 3
Create a meeting in calander from Excel VBA 1
Excel > Outlook Calendar code works.... 1 question 1
Working outlook via vba code with xlsx - error 0
Sending a mail via outlook excel 2003 0
Closing PDF file from Excel VBA (Adobe Reader, Adobe Acrobat, Browser) 0
Macro Help - Jacob Skaria has previously been helping 16
Creating appointments from MS Access to Outlook 1

Top