View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Jarek Kujawa[_2_] Jarek Kujawa[_2_] is offline
external usenet poster
 
Posts: 896
Default Can Excel trigger Outlook reminder?

Yes, it can

1. press ALT+F11 to get to the VBA
2. select Tools-References and scroll down to check relevant version
of Microsoft Outlook Object Library, click OK to install it
3. press Insert-Module
4. paste this macro there

the macro loops all cells in F2:F1000 range looking for non-blanks,
creating e-mails w/o sending them (to send an e-mail automatically
uncheck the '.Send row). if you want to send an e-mail you will have
to click YES on alerts to confirm you really want to send it cause I
couldn't find the way to turn those alerts off

try the macro with your data and let me know if it's ok for you


for more you might look at www.outlookcode.com


Sub cus()
Dim outl As Outlook.Application
Dim remindd As Outlook.MailItem

Set outl = New Outlook.Application
Set remindd = Outlook.CreateItem(olMailItem)


For i = 2 To 1000
If Len(Cells(i, 6)) 0 Then
If Cells(i, 6) = DateSerial(Year(Now()), Month(Now()),
Day(Now())) Then
With remindd
.Display
.To = Cells(i, 6).Offset(0, -1)
.CC = "
.Subject = "REMINDER: Today is the due date for " &
Cells(i, 1)
.Body = Cells(1, 1) & ": " & Cells(i, 1) & vbNewLine &
Cells(1, 2) & ": " & Cells(i, 2) & vbNewLine & Cells(1, 3) & ": " &
Cells(i, 3) & vbNewLine & Cells(1, 4) & ": " & Cells(i, 4)
'.Send
End With
End If
End If
Next i

Set remindd = Nothing
Set outl = Nothing

End Sub



On 26 Kwi, 20:01, Andee39 wrote:
A little more info on the spreadsheet I want to create. Â*We receive
corrrespondence from another unit that has a due date. Â*This correspondence
is referred to an attorney in my unit. Â*When the due date comes, I would like
to have an Outlook reminder sent to myself and the individual it was assigned
to. Â*My column headers would be:
ID#
Name of constituent
Address (if applicable)
Date referred
Assigned to
Due date

Thanks.



"Andee39" wrote:
I hope I'm asking this question in the right forum. Â*I would like to know if
it is possible to create a basic spreadsheet where one of the columns is for
due date and when that due date comes up a reminder is generated from
Outlook? Â*I think I understood correctly from a Google search that it can be
done in Visual Basic but I have no idea how to do it. Â*I'm also hoping it
would not be complicated b/c I have not used VB. Â*If that can't be done, how
could I work it that the cell would change to red with due date comes? Â*
Thanks.- Ukryj cytowany tekst -


- Pokaż cytowany tekst -