如何在word中每行末尾加入同一标点

2024-11-02 07:22:57
有2个网友回答
网友(1):

用VBA吧,按ALT+F11
复制横线内的代码 并粘贴到里面

---------------------------------------------------------------------
Sub jiafuhao()

Dim x
x = 1

hh:
If x < 1000 Then '1000为要加符号的总行数 可根据需要改
Selection.EndKey Unit:=wdLine
Selection.TypeText Text:="?" '?每行未加的标点号 可根据需要改

x = x + 1
GoTo hh

Else
End If
End Sub

----------------------------------------

然后把光标定到要加符号的开始行
点“工具”-“宏”-“宏”
选中jiafuhao ,再点“运行”

网友(2):

你可以做一个记号,文档不出现的符号,或者是文字,例如“0”,写完之后可以用“查找与替换”就可以了