| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Can Excel trigger Outlook reminder?
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. |
|
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
Can Excel trigger Outlook reminder?
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. |
|
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
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 - |
|
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
Can Excel trigger Outlook reminder?
corrected (sorry)
Sub cus() Dim outl As Outlook.Application Dim remindd As Outlook.MailItem Set outl = New Outlook.Application For i = 2 To 1000 If Len(Cells(i, 6)) 0 Then If Cells(i, 6) = DateSerial(Year(Now()), Month(Now()), Day(Now())) Then Set remindd = Outlook.CreateItem(olMailItem) 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 27 Kwi, 11:13, Jarek Kujawa wrote: 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 atwww.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 -- Ukryj cytowany tekst - - Pokaż cytowany tekst - |
|
#5
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
Can Excel trigger Outlook reminder?
Thank you so very much for your help. I really appreciate it and I apologize
for any silly questions I might ask. This is out of my league. Before I go ahead with the macro I have a few more questions: - you stated that the macro loops all cells in F2:F1000 range. Does that mean that my column headers/information needs to be in that range? That seems rather odd. - you mention to send an email automatically I will have to uncheck the '.Send row. I don't see a check - will that appear automatically after pasting the macro? - you mention if I want to send an email I will have to click YES on alerts. I don't see anything mentioned in the macro about alerts. Where is that located? - if I want to have the email reminder sent automatically, where does the macro get the email address(es) from? Did I already apologize for all my questions .......... "Jarek Kujawa" wrote: corrected (sorry) Sub cus() Dim outl As Outlook.Application Dim remindd As Outlook.MailItem Set outl = New Outlook.Application For i = 2 To 1000 If Len(Cells(i, 6)) 0 Then If Cells(i, 6) = DateSerial(Year(Now()), Month(Now()), Day(Now())) Then Set remindd = Outlook.CreateItem(olMailItem) 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 27 Kwi, 11:13, Jarek Kujawa wrote: 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 atwww.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 -- Ukryj cytowany tekst - - Pokaż cytowany tekst - . |
|
#6
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
Can Excel trigger Outlook reminder?
1. no, you may choose a range of your own
2. by "check" I meant an apostrophe (sorry) 3. there is nothing on the alerts in the macro. when you rid of the a/ m apostrophe and try to run the macro you'll see the alert stating sth. like "some software is trying to control your e-mail program..." 4. I have "told" the macro to look for email addresses one column to the left of the column containing due date (in this case due dates are stored in F2:1000, if change the range for due dates then the macro will still/always look for email address one column to the left of that new range). HIH pls click YES if it helped On 27 Kwi, 20:21, Andee39 wrote: Thank you so very much for your help. Â*I really appreciate it and I apologize for any silly questions I might ask. Â*This is out of my league. Before I go ahead with the macro I have a few more questions: - you stated that the macro loops all cells in F2:F1000 range. Â*Does that mean that my column headers/information needs to be in that range? Â*That seems rather odd. - you mention to send an email automatically I will have to uncheck the '.Send row. Â*I don't see a check - will that appear automatically after pasting the macro? - you mention if I want to send an email I will have to click YES on alerts. Â*I don't see anything mentioned in the macro about alerts. Â*Where is that located? - if I want to have the email reminder sent automatically, where does the macro get the email address(es) from? Did I already apologize for all my questions .......... "Jarek Kujawa" wrote: corrected (sorry) Sub cus() Dim outl As Outlook.Application Dim remindd As Outlook.MailItem Set outl = New Outlook.Application For i = 2 To 1000 Â* Â* If Len(Cells(i, 6)) 0 Then Â* Â* Â* Â* If Cells(i, 6) = DateSerial(Year(Now()), Month(Now()), Day(Now())) Then Â* Â* Â* Â* Set remindd = Outlook.CreateItem(olMailItem) Â* Â* Â* Â* Â* Â* 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 27 Kwi, 11:13, Jarek Kujawa wrote: 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 atwww.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 -- Ukryj cytowany tekst - - Pokaż cytowany tekst - .- Ukryj cytowany tekst - - Pokaż cytowany tekst - |
|
#7
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
Can Excel trigger Outlook reminder?
|
|
#8
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
Can Excel trigger Outlook reminder?
|
|
#9
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
Can Excel trigger Outlook reminder?
Noong Martes, Abril 27 2010 01:21:01 UTC+8, si Andee39 ay sumulat:
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. Hi, I am having the same issue. Has this been resolved? |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Does excel have a reminder function like outlook does? | Excel Worksheet Functions | |||
| Can a date in excel be linked with outlook to serve as a reminder | Excel Worksheet Functions | |||
| How can I get a date in exel to trigger a reminder in 30 days? | Excel Discussion (Misc queries) | |||
| Is there a way to trigger pop-up notices in excel? | Excel Discussion (Misc queries) | |||
Hybrid Mode
