Bare find på en formatering, og gem det som en 'string'. Her er et lille eksempel, hvor du bare skal ændre på måden at tage imod input, hvor du vil gemme det, hvor tit du vil tjekke, og hvordan du vil fortælle brugeren det:
Dim ReminderTime As String
MsgBox Format$(Now, "dd-mm-yyyy hh:nn")
ReminderTime = InputBox("Indtast dato: (dd-mm-yyyy hh:nn)")
If ReminderTime = Format$(Now, "dd-mm-yyyy hh:nn") Then
MsgBox "Husk det nu!"
End If