Assuming orng2 (not defined in your questions) is a selected range of paragraphs then
Dim orng As Range, oRng2 As Range
Dim i As Long
With oRng2
.ParagraphFormat.TabStops.ClearAll
.ParagraphFormat.TabStops.Add Position:=InchesToPoints(0.25), _
Alignment:=wdAlignTabLeft, _
Leader:=wdTabLeaderSpaces
End With
oRng2.Paragraphs(1).Range.InsertBefore vbTab
Set orng = oRng2.Paragraphs(1).Range
orng.Collapse 1
orng.Fields.Add orng, wdFieldListNum, "LegalDefault"
For i = 2 To oRng2.Paragraphs.Count
oRng2.Paragraphs(i).Range.InsertBefore vbTab
Next i
is one way of achieving your aim. Adjust the size of the tab setting to taste. Here .25"