Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations John Tel on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

pop up dialog box based on date field

Status
Not open for further replies.

dignityy

Technical User
Oct 10, 2006
25
US
I have another question I hope someone can help me with.

I have a data base stored in excel and when the date field expires I want a dialog box to pop open indicating so, is this possible? For example we have a date in column E and when that date comes I want a dialog box to open up and tell me to update the account. This dialoge box should alwasy pop open until the file is corrected. Did that make sense?

Thanks
 
Pop up when? Every five seconds until it is fixed? Every ten seconds until it is fixed? Every time a cell is changed? Every time the file is opened? Every time the file is closed?

Gerry
My paintings and sculpture
 
Make sure that column is formateed at DATE
insert code into corresponding sheet in VBA project.

Private Sub Worksheet_Activate()

For x = 1 To Application.ActiveSheet.UsedRange.Rows.Count

myval = Application.ActiveSheet.Cells(x, 3)
mydate = Date

If DateDiff("d", myval, Date) < 0 Then
Application.ActiveSheet.Cells(x, 3).Interior.ColorIndex = 37
End If
Next x



End Sub

[yinyang] Tranpkp [pc2]
 



Hi,

This should be done in the Workbook_Open event. Trun on your macro recorder and record putting an AutoFilter on a sheet, and filtering the date column using the current date.

Is that what you need?

Skip,

[glasses] [red][/red]
[tongue]
 

Skip - I want a more automated event to occur. When ever someone opens the file the macro should run(or via button) and then the macro will check the date column for each row against the system date and open up a dialog box indicating which row needs attention. Can you help?
 


"Turn on your macro recorder and record putting an AutoFilter on a sheet, and filtering the date column using the current date."

Skip,

[glasses] [red][/red]
[tongue]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top