UsedObjects 属性

返回一个 UsedObjects 对象，该对象代表在工作簿中分配的对象。

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

示例

在本示例中，Microsoft Excel 确定已分配的对象的个数，并通知用户。本示例假定在应用程序中执行重新计算，并且在完成前中断重新计算。

Sub CountUsedObjects()

    MsgBox "The number of used objects in this application is: " & _
        Application.UsedObjects.Count

End Sub