Assuming you want to pre-pad selected cells with three spaces, try:

Sub padit()
Dim r As Range
Set r = Selection
r.Value = " " & r.Value
End Sub

--
Gary's Student


"John Grossman" wrote:

How do I do F2 - home - add 3 spaces and enter.
Don't want it to carry over name I'm editing - each row different