摘要： 通过如下的宏代码，您就可以在WORD中删除空白的段落。 通过如下的宏代码，您就可以在WORD中删除空白的段落。
Sub DelBlank()
Dim i As Paragraph， n As Long
Application.ScreenUpd...
通过如下的宏代码，您就可以在WORD中删除空白的段落。
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 ’进行必要的修改可将任意长度段落删除
如何给Word2003文档设置密码(图文教程)
在编辑一些非常重要的Word文档时，特别是一些机密的文档，给Word文档加上密码是一项非常有用的功能，也是一项安全的保障。
n = n 1 ’计数
End If
Next
MsgBox "共删除空白段落" & n & "个!"
Application.ScreenUpdating = True ’恢复屏幕刷新
End Sub
代码简单，功能强大，希望对您有所帮助。
word2003怎样把表格和文字互相转换
在使用word2003的时候，有时候往往遇到把表格改成文字，或者是把文字制成表格的情况，当遇到这种情况的时候其实word有一个可以自动转换的方法。学会这个方法在进行表格和文字互相转换的时候就容易多了
