想用VBA代码在Word文档中的每个段落的段首、段尾加上字符,求大侠帮助！

lhteee

想用VBA代码在Word文档中的每个段落的段首加上“<p>”,在段尾加上“</p>”，但下面的代码会把这些字符都加到段首。求大侠帮助！

Sub AddParagraphTags()

   Dim para As Paragraph

   For Each para In ActiveDocument.Range.Paragraphs

       para.Range.InsertBefore "<p>"

       para.Range.InsertAfter "</p>"

   Next para

End Sub

文档.rar (9.66 KB, 下载次数: 7)

2024-5-2 14:43 上传

点击文件名下载附件

batmanbbs

lhteee

batmanbbs 发表于 2024-5-2 16:12

谢谢！&#128591;&#128591;&#128591;