Solved: Message box ( Open Event)

[BENSON]

Is it possible to have a message box display on openning a worksheet, that will count down the number of days left befor a user must do something to the worksheet.ie if the worksheet was opened today the message box would say for example " 10 days left" ,if the same sheet was opened tomorrow the message box would display " 9 Days Left" and so on.

Thanks

[Simon Lloyd]

Private Sub Workbook_Open()
Dim oDate As Date
oDate = "07/04/08"
If Date <= oDate Then
MsgBox "You have " & oDate - Date & " days left"
End If
End Subthis goes in the thisworkbook module

[BENSON]

MANY THANKS WORKS PERFECT