[求助]怎样去掉word文挡中的数字序号

lo2003 · 发表于 2006-6-17 11:06

如何一次性去掉word文挡中的数字序号?比如①②③⒒⒓⑾⑿⒀等等。谢谢!!!!

20Vx5PzG.rar (2.24 KB, 下载次数: 20)

[此贴子已经被作者于2006-6-17 13:49:36编辑过]

konggs · 发表于 2006-6-17 12:15

没看到附件。真的不好判断。

例如：

1.你的序号是自动生成的，还是手工输的？

2.你的①②是通过域得来的，还是就是这样的字符①②？

3.等等。不好做啊。

lo2003 · 发表于 2006-6-17 13:33

谢谢！我是应该传一个附件，否则自己说不清楚，别人当然也就不知道要解决的问题究竟是什么。

konggs · 发表于 2006-6-17 15:01

Sub 试试()
Dim a As Paragraph
For Each a In ActiveDocument.Paragraphs
If a.Range.Characters(1) Like "[①-⑩]" Then '其它的类似
a.Range.Characters(1).Delete
End If
Next
End Sub

yuyvtul · 发表于 2006-6-17 15:21

查找[①-⑩]
替换为空，全部替换

lo2003 · 发表于 2006-6-17 17:48

谢谢几位的回答。我马上去试试。

lo2003 · 发表于 2006-6-17 18:08

试了，都可以。

yuyvtul的方法可行，但必须把“使用通配符”勾选上。

Konggs的方法省事，做好宏以后下次用起来就更方便了。

再次感谢！

gamegirl · 发表于 2006-6-18 09:34

右击项目编号

lo2003 · 发表于 2006-6-27 13:10

谢谢！！！！！！！！！！！！！！！

		自动登录	找回密码
密码			免费注册