I create an Outlook Appointment on my calender with results from a
userform to remind me to invoice service job.
Hope this helps.
With OutlookApp.CreateItem(olAppointmentItem)
.Start = Date + 20 & " 2:00 pm"
.End = Date + 20 & " 2:00 pm"
.Subject = customer & " " & "Service Job #" & " " &
TextBox1.Value & " ---- Invoice Due"
.location = location.Value
.Body = tbComment.Value
.ReminderMinutesBeforeStart = 1440
.ReminderSet = True
.Save
End With
--
try2XL
------------------------------------------------------------------------
try2XL's Profile:
http://www.excelforum.com/member.php...o&userid=30701
View this thread:
http://www.excelforum.com/showthread...hreadid=503115