Word VBA教程:所要求的集合成员不存在

当试图访问一个不存在的对象时,就会产生“所要求的集合成员不存在”错误。例如,如果活动文档中不包含任何表格,则下列指令可能导致出错。


Sub SelectTable()
    ActiveDocument.Tables(1).Select
End Sub

若要在访问集合成员时避免这种错误,需在访问前确认该成员存在。如果通过索引序号访问该成员,可使用Count属性判定该成员是否存在。如果活动文档中包含至少一张表格,则下列示例选定第一张表格。


Sub SelectFirstTable()
    If ActiveDocument.Tables.Count > 0 Then
        ActiveDocument.Tables(1).Select
    Else
        MsgBox "Document doesn't contain a table"
    End If
End Sub

如果通过名称访问集合成员,可使用 For Each...Next 在集合元素中进行循环,以判定该成员是否为集合的一部分。例如,如果名为“acheive”的“自动更正”词条是AutoCorrectEntries集合的一员,则下列示例将该词条删除。详细信息,请参阅循环遍历一个集合


Sub DeleteAutoTextEntry()
    Dim aceEntry As AutoCorrectEntry
    For Each aceEntry In AutoCorrect.Entries
        If aceEntry.Name = "acheive" Then aceEntry.Delete
    Next aceEntry
End Sub

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号