VB macro to create a calendar appt. via excel

Microsoft Office 2003 basic edition
October 14, 2009 at 14:16:35
Specs: XP, 1.733 GHz / 1013 MB
Hi I have a excel sheet where users can fill the details and then click a button "Email". This button runs a macro and it opens a new message box of the default email program and pasts the details entered by the users.

I need help in creating calendar appointments using the same concept. Is it possible... Please help.

See More: VB macro to create a calendar appt. via excel

Report •

October 14, 2009 at 23:45:46
Dim outlookApp as Object
Dim outlookItem as Object

Set outlookApp = CreateObject("outlook.application")
Set outlookItem = outlookApp.CreateItem(olTaskItem)

With outlookItem
.Subject = "the subject"
.Body = "the body"
.NoAging = True
.DueDate = ""
.StartDate = ""
.Attachments.Add ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
.Importance = ""
.ReminderSet = True
.ReminderTime = ""
.Close (olSave)
End With

Set outlookItem = Nothing
Set outlookApp = Nothing

Report •

October 15, 2009 at 01:40:12
Hi rix, when i run this code it gives me an error 424 object required.

Report •

October 15, 2009 at 03:03:07
The fourth row should be
Set outlookItem = outlookApp.CreateItem(olTaskItem)
(I updated my first reply).

You will have to fill in the values for the dates etc.

Report •

Related Solutions

October 16, 2009 at 11:23:12
Hi Rix its still giving me the same error messgae.

Report •

Ask Question