1

我昨天刚开始使用宏,在我遇到这个问题之前一切都很好。每次我尝试运行此代码时,我都会得到

运行时 1004 错误。

代码所做的是为 acct_cre_mth_id 过滤器分配一个值。

我用谷歌搜索,发现一个解决方案是重命名过滤器,我已经这样做了,但它没有用。

我有给定的代码,但对于不同的过滤器它工作正常,但仅对于这个特定的过滤器我有问题。

Sheets("Sheet6").Select
 ActiveSheet.PivotTables("PivotTable1").PivotFields("acct_cre_mth_id"). _
    ClearAllFilters
ActiveSheet.PivotTables("PivotTable1").PivotFields("acct_cre_mth_id"). _
    CurrentPage = "1321"
ActiveSheet.PivotTables("PivotTable1").PivotFields("acct_cre_mth_id"). _
    ClearAllFilters
ActiveSheet.PivotTables("PivotTable1").PivotFields("acct_cre_mth_id"). _
    CurrentPage = "1322"
ActiveSheet.PivotTables("PivotTable1").PivotFields("acct_cre_mth_id"). _
    ClearAllFilters
ActiveSheet.PivotTables("PivotTable1").PivotFields("acct_cre_mth_id"). _
    CurrentPage = "1323"
ActiveSheet.PivotTables("PivotTable1").PivotFields("acct_cre_mth_id"). _
    ClearAllFilters
ActiveSheet.PivotTables("PivotTable1").PivotFields("acct_cre_mth_id"). _
    CurrentPage = "1324"
End Sub
4

0 回答 0