April 2006
Beginner
1114 pages
98h 16m
English
pivotcache.MemoryUsed
Returns the amount of memory used by the pivot cache in bytes. The following code displays the total memory used by pivot caches in the Immediate window:
Sub CountCache( )
Dim pc As PivotCache, mem As Long
For Each pc In ActiveWorkbook.PivotCaches
mem = mem + pc.MemoryUsed
Next
Debug.Print "#PivotCaches", "Mem Used"
Debug.Print ActiveWorkbook.PivotCaches.Count, mem \ 1024 & "K"
End SubRead now
Unlock full access