返回一个 UsedObjects 集合后,便可用 Count 属性来确定 Microsoft Excel 应用程序中所用对象的个数。 
在本示例中,Microsoft Excel 确定已分配的对象的个数,并通知用户。本示例假定在应用程序中执行重新计算,并且在完成前中断重新计算。 

复制代码代码如下:


Sub CountUsedObjects() 
MsgBox "The number of used objects in this application is: " & _ 
Application.UsedObjects.Count 
End Sub