Question

基本上我已经使用Adobe的报表生成器工具创建了一个报表信息中心，然后我使用下面的VBA宏来更新我的报表生成器查询并刷新我的数据透视表：

Private Sub CommandButton21_Click()

 Dim addIn As COMAddIn
 Dim automationObject As Object
 Dim success As String
 Set addIn = Application.COMAddIns("ReportBuilderAddIn.Connect")
 Set automationObject = addIn.Object
 success = automationObject.RefreshAllRequests(ActiveWorkbook)

 Dim PT As PivotTable
 Dim WS As Worksheet

    For Each WS In ThisWorkbook.Worksheets

        For Each PT In WS.PivotTables
          PT.RefreshTable
        Next PT

 Next WS

End Sub

宏似乎运行良好，但我最初的问题是我的数据透视表没有正确更新。然后我发现这是因为我将（空白）行过滤掉了，这意味着当数据透视表刷新新一天的数据时，那天会被自动过滤掉。有没有什么方法可以让我的所有数据透视表都更新而没有（空白）字段？

Answer 1

请尝试添加此内容并告诉我这是否有效

Double

过滤和vba问题

1 个答案: