Previous Topic Next Topic

Pop up reminder

Closed
djandpj
Posts
2
Registration date
Thursday October 18, 2012
Status
Member
Last seen
October 18, 2012
 - Oct 18, 2012 at 07:27 AM
TrowaD
Posts
2880
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
May 2, 2022
 - Oct 18, 2012 at 10:26 AM
Hello,
5 day Pop up reminder for excel in vba that runs in excel 2007
I'm new to this hope you can help
Thanks
djandpj


Related:

3 replies

Answer 1 / 3
djandpj
Posts
2
Registration date
Thursday October 18, 2012
Status
Member
Last seen
October 18, 2012
 1
Oct 18, 2012 at 09:40 AM
Is it possible to have a pop up reminder when a item date is due within a designated number of days plus items due 5 days in the future.

I want to set up a reminder in excel, this reminder must pop and show due date and item up 5 days before the due date Can I Create A Reminder To Pop Up In Excel 5 Days Before? .... Excel 2007

Thanks for your interest.

djandpj
1
Answer 2 / 3
TrowaD
Posts
2880
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
May 2, 2022
 509
Oct 18, 2012 at 09:06 AM
Hi Djandpj,

What do you mean by "5 day pop up reminder"?
Please explain in more detail.

Best regards,
Trowa
0
Answer 3 / 3
TrowaD
Posts
2880
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
May 2, 2022
 509
Oct 18, 2012 at 10:26 AM
Hi Djandpj,

I don't want to sound like a pain in the behind area, but you are still not very clear.

All you ask is: "Is it possible" and "Can I".
So to answer your questions, the answer is yes.

Try to give some more relevant info like where the dates are located on the sheet and when do you want to be reminded (when you open the file, open the sheet, manually run code, etc....)

Here is a simple code which checks the date in A1 and compares it to today's date. When there is 5 or less days to go a popup appears. The is done whenever the sheets containing the date in A1 is activated. 

Private Sub Worksheet_Activate()
If Range("A1").Value - Date <= 5 Then
MsgBox "5 or less till due date"
End If
End Sub

To implement the code, right-click on the sheets name and select "view code", paste code on big white field.

Best regards,
Trowa
0