Footnotes.Separator (Word)

Retorna um objeto Range que representa o separador de nota de rodapé.

With ActiveDocument.Footnotes.Separator 
 .Delete 
 .Borders(wdBorderTop).LineStyle = wdLineStyleSingle 
 .ParagraphFormat.RightIndent = InchesToPoints(3) 
End With