Pop Reminder

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

tmdrake - 16 Apr 2008 21:38 GMT

I have a excel spreadsheet that contains the date a request is received and
the date the request is due to the customers. How do I create a popup that
alerts the user three days prior to the due date, which request are due? I
will need for the popup to activate everytime the spreadsheet is opened.

Thanks you much

Signature

tmdrake

Reply to this Message

Office_Novice - 16 Apr 2008 22:58 GMT

Change Ranges to suit and bobs your uncle.

Sub Pop()

Dim PopDate As Range
Dim DueDate As Range

Set PopDate = Range("A1")
Set DueDate = Range("B1")

If PopDate = DueDate - 3 Then
MsgBox "Riminder goes here"
End If

End Sub

> I have a excel spreadsheet that contains the date a request is received and
> the date the request is due to the customers. How do I create a popup that
> alerts the user three days prior to the due date, which request are due? I
> will need for the popup to activate everytime the spreadsheet is opened.
>
> Thanks you much

Reply to this Message

cht13er - 16 Apr 2008 23:55 GMT

On Apr 16, 5:58 pm, Office_Novice
<OfficeNov...@discussions.microsoft.com> wrote:

> Change Ranges to suit and bobs your uncle.
>
[quoted text clipped - 20 lines]
> > --
> > tmdrake

If you want this to run every time the worksheet is opened, place this
code in "ThisWorkbook" code section in the Visual Basic Editor (Alt
+F11 from Excel):

Private Sub Workbook_Open()
Dim PopDate As Range
Dim DueDate As Range

Set PopDate = Range("A1")
Set DueDate = Range("B1")

If PopDate = DueDate - 3 Then
Call MsgBox("This is a reminder that requests are
due.",vbokonly,"Notice")
End If

End Sub

If you want to produce a list of requests that are due, you could do
that too - it's just a matter of making an array of all cases in which
they're due (post here if you need more help).
HTH

Chris

Reply to this Message