Word VBA教程:Count属性

返回指定集合的项目数。Long 类型,只读。

expression.Count

expression   必需。该表达式返回“应用于”列表中的一个对象。

VBA示例

本示例显示活动文档的段数。


MsgBox "The active document contains " & _
    ActiveDocument.Paragraphs.Count  & "paragraphs."

本示例显示所选内容的字数。


If Selection.Words.Count >= 1 And _
        Selection.Type <> wdSelectionIP Then
    MsgBox "The selection contains " & Selection.Words.Count _
        & " words."
End If

本示例用一个Fields() 数组来储存活动文档中的域代码。


fcount = ActiveDocument.Fields.Count
If fcount >= 1 Then
    ReDim aFields(fcount)
    For Each aField In ActiveDocument.Fields
        aFields(aField.Index) = aField.Code.Text
    Next aField
End If

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号