[求助]怎样用替换功能去掉word文档中的下箭头呢？

morphine · 发表于 2005-7-10 17:49

从网页上复制到word中的文档，往往带有大量的下箭头（↓），一个个删除太费事，如何用替换功能一次性地替换成硬回车呢？请教大家了，谢谢！

konggs · 发表于 2005-7-10 18:16

替换："^l" 替换为:"^p"

morphine · 发表于 2005-7-10 19:31

我知道了，谢谢konggs!

承影 · 发表于 2005-7-11 09:14

konggs ，你好，将下箭头（↓）替换成硬回车后，文字段落之间那么多的硬回车符号能不能只剩下一个（不知这样表达能否清楚）？请指教

konggs · 发表于 2005-7-11 09:24

Sub DelBlank() Dim i As Paragraph, n As Long Application.ScreenUpdating = False '关闭屏幕刷新 For Each i In ActiveDocument.Paragraphs '在活动文档的段落集合中循环 If Len(i.Range) = 1 Then '判断段落长段,此处可根据文档实际情况 i.Range.Delete '进行必要的修改可将任意长度段落删除 n = n + 1 '计数 End If Next MsgBox "共删除空白段落" & n & "个!" Application.ScreenUpdating = True '恢复屏幕刷新 End Sub老大的代码：效率最快！(删除所有的空段落)

看不懂的或不会用，就用替换"^P^P"，替换为"^P"

承影 · 发表于 2005-7-11 10:34

非常感谢！

办公之星 · 发表于 2005-7-11 10:56

偶觉得，知道“↓”为换行符更重要。这是因为，如果隐藏了编辑标记，我们是看不到这些标记的。

吴毓明 · 发表于 2005-7-12 23:19

我怎么替换不了？纳闷

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