MS Excel Solution 1 - Prompt after fill-in and autowrite value...

-----A --------------------B-----------------------
15-apr 13:00 ----Must Input--------------------

After fill in A, a reminder will show up

Source from utteracess.com

Click on the view source - VBA then insert
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A2:A5000")) Is Nothing Then

If Len(Target.Value) > 0 And Len(Target.Offset(0, 1).Value) = 0 Then

MsgBox "Please remember to put value in column B", vbCritical, " "
Application.Goto Target.Offset(0, 1)
End If
End If


or after fill in A, B will be written as"Done"
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A2:A5000")) Is Nothing Then

If Len(Target.Value) > 0  Then
Target.Offset(0, 1).Value = "Done"
End If
End If
End Sub


http://www.utteraccess.com/forum/Vba-Command-t1965673.html