[求助]如何一次性删除空行

laojuchun · 发表于 2004-8-19 12:10

请教在WORD中如何一次性删除空行呢，请指教，谢谢！

hpw · 发表于 2004-8-19 13:12

编辑 --> 替换 --> 高级 --> 特殊字符 --> 段落标记 --> 全部替换即可

henterwu · 发表于 2004-8-19 13:47

这个可以吗？

删除第一个表格的空行：

Sub Macro1() For a = ActiveDocument.Tables(1).Rows.Count To 1 Step -1 ActiveDocument.Tables(1).Rows(a).Select If Len(Selection.Text) <= ActiveDocument.Tables(1).Columns.Count * 2 + 2 Then ActiveDocument.Tables(1).Rows(a).Delete End If Next End Sub

[此贴子已经被作者于2004-8-19 15:22:25编辑过]

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