您的位置:首页 > 编程语言 > VB

一个统计Word文档中行数的VBA例程

2012-07-02 19:23 337 查看
这是一个计算Word中文档行数的例程(表格中的行数不算)。

Sub test()
Dim i As Integer
Dim t As Table

i = ActiveDocument.range.ComputeStatistics(wdStatisticLines)
For Each t In ActiveDocument.Tables
i = i - t.range.ComputeStatistics(wdStatisticLines)
Next
MsgBox i
End Sub


欢迎访问我的主博客《许阳的红泥屋
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: