next pt? RRS feed

  • Question

  • i have the following;

    Dim NewWb As Workbook
    Dim WBname As String
    Dim pt As PivotTable
    Dim ws As Worksheet
    Dim Flds As Variant

    Public Sub Process()

         For Each ws In ActiveWorkbook.Worksheets
            For Each pt In ws.PivotTables
            Next pt
        Next ws

    it used to work, now it stops after updating the first pivot table, any ideas?

    Friday, January 11, 2013 9:28 PM