Just keep the file hidden - though you will need to unhide it to enter new values. Store it in your default XLStart folder so that it is opened, or save it as an add-in and install it.
You can use the workbook open event - put you don't need today's date in column A, though you could put some identifying string in column A, with the due date in column B. Copy the code into the ThisWorkbook object's codemodule.
Bernie
Private Sub Workbook_Open()
Dim i As Long
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
If Date = Cells(i, 2).Value Then
MsgBox "Pay the bill: " & Cells(i, 1).Value
End If
Next i
End Sub
|