Need Formula

[rgodchaux]

Need a formula that inserts a check mark into a cell if the Enter key is hit.
If Enter key is not hit leave cell blank.

 

[Gary''s Student]

Enter these two macros:

Sub Macro1()
ActiveCell.Value = "P"
ActiveCell.Font.Name = "Wingdings 2"
End Sub

Sub Macro2()
Application.OnKey "{ENTER}", "Macro1"
End Sub

then run Macro2. Whenever you touch the ENTER key on the numeric keypad, a
check mark will be entered. These leaves the main ENTER key available for
normal uses.