在本示例中,Microsoft Excel 确定已分配的对象的个数,并通知用户。本示例假定在应用程序中执行重新计算,并且在完成前中断重新计算。
复制代码 代码如下:
Sub CountUsedObjects()
MsgBox "The number of used objects in this application is: " & _
Application.UsedObjects.Count
End Sub
版权声明:除特别声明外,本站所有文章皆是本站原创,转载请以超链接形式注明出处!