怎样在word中的每一行开头和结尾加入固定的字符？

[qking13]

怎样在word中的每一行开头和结尾加入固定的字符？
比如我想在word的每一行开头加入字符aaa，结尾加入bbb
(假设每一行有足够的空间来加入这些字符，而不会到下一行)

[palagon]

假设每一行有足够的空间来加入这些字符，而不会到下一行？？？
这个假设使得我怀疑你是想要对段落进行操作，普通的每一行都会产生自动换行。

试试下面代码，可以轮流获得每个段落的内容

MsgBox ThisDocument.Paragraphs(i).Range

[palagon]

注意有换行符存在的，需要手工去除
比如前后分别加上“start”和“end”，代码如下

strTemp = ThisDocument.Paragraphs(i).Range
ThisDocument.Paragraphs(i).Range = "Start" & Left(strTemp, Len(strTemp) - 1) & "End" + Right(strTemp, 1)

[qking13]

谢谢2位的指点，为什么我一运行
palagon()的宏，提示“集合所要求的成员不存在”
？？？