How about

Sub EnterSomething()
Dim R As Range
For Each R In Worksheets("Sheet1").Range("A1:A10") ' or For
each R in Selection
R = R.Value
Next R
End Sub



HTH,
JP


On Dec 20, 2:09 pm, Jim May wrote:
Is there a VBA equivalent to doing this..

select a cell F2 into Edit mode - and Press enter Key

Is there a VBA Eqiv? If so, what code line(s)?