excel - 找到 excel 2007 数据透视表

有人能告诉我如何在工作簿(或工作表)中找到所有数据透视表吗？在某些情况下，数据透视表可能隐藏在非常大的 Excel 工作表中或很难找到。如果我至少可以获取数据透视表所在位置的单元格地址或范围，那就太好了。

谢谢。

最佳答案

这应该对你有用。它将结果打印到立即窗口:

Sub FindPivotTables()
    Dim wst As Worksheet
    Dim pvt As PivotTable
    ' loop through all sheets and print name & address of all pivot tables
    For Each wst In ActiveWorkbook.Worksheets
        For Each pvt In wst.PivotTables
            Debug.Print wst.Name, pvt.TableRange2.Address, pvt.Name
        Next pvt
    Next wst
End Sub

关于excel - 找到 excel 2007 数据透视表，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/8511014/