On Monday, October 27, 2014 12:14:41 AM UTC-7, L. Howard wrote:
I meant to mention that I feel the error check for non numeric entry is a bit clunky.

Seems something has to be selected or a previous number will leave all the values of it selected on the sheet after a non number is entered.

Howard

Maybe this would be better.

If IsNumeric(Target.Value) = False Then
Range("F1").Select
MsgBox "Must be number!"
Range("F1").ClearContents
Application.EnableEvents = True
Exit Sub
End If