They'll need to be "From text" rather than "From edge of page," of course.

Is there a reason I don't use page borders?

(1) The lines delineate the left and right margins. These are not
symetrical; there is a wider left margin than right margin.
(2) I include text information such as my name, address, and phone number
outside the lines. I suppose I could add these in a header/footer instead.
(3) for many users, there is also line numbering outside the lines - i.e. in
the margin, same as above.

My main reason for doing it this way is that (I think) I learned the method
from the pleading wizard at some time in the distant past. That isn't a good
reason for doing anything, since I don't like the pleadings it produces. I
just checked and I can use page borders, set, as Suzanne suggested, at a
given distance from the text. I can put a frame with my text and a graphic
in the margin in the header that is outside the border. I am sure I could
put the page numbers there as well. Eventually I may switch over, especially
if it produces smaller documents.

The following macro comes close to what I want for the borders. May be of
use to others.

Sub Macro3()
'
' Macro3 Macro
' Macro written 5/3/2005 by Charles Kyle Kenyon
' Inserts page borders and sets margins for pleadings.
   With Selection.Sections(1)
       With .Borders(wdBorderLeft)
           .LineStyle = wdLineStyleDouble
           .LineWidth = wdLineWidth050pt
           .Color = wdColorAutomatic
       End With
       With .Borders(wdBorderRight)
           .LineStyle = wdLineStyleSingle
           .LineWidth = wdLineWidth050pt
           .Color = wdColorAutomatic
       End With
       .Borders(wdBorderTop).LineStyle = wdLineStyleNone
       .Borders(wdBorderBottom).LineStyle = wdLineStyleNone
       With .Borders
           .DistanceFrom = wdBorderDistanceFromText
           .AlwaysInFront = True
           .SurroundHeader = False
           .SurroundFooter = False
           .JoinBorders = False
           .DistanceFromTop = 24
           .DistanceFromLeft = 4
           .DistanceFromBottom = 24
           .DistanceFromRight = 4
           .Shadow = False
           .EnableFirstPageInSection = True
           .EnableOtherPagesInSection = True
           .ApplyPageBordersToAllSections
       End With
   End With
   With ActiveDocument.PageSetup
       .TopMargin = InchesToPoints(1)
       .BottomMargin = InchesToPoints(1)
       .LeftMargin = InchesToPoints(1.5)
       .RightMargin = InchesToPoints(0.8)
   End With
End Sub