標題: [發問] 樞紐分析表VBA~ActiveSheet.PivotTables相關問題 [打印本頁]

---

作者: 幼稚園飛天豬    時間: 2011-5-9 22:52     標題: 樞紐分析表VBA~ActiveSheet.PivotTables相關問題

With ActiveSheet.PivotTables("樞紐分析表1").PivotFields("bh")
        .PivotItems("GF5587").Visible = False
        .PivotItems("GF5589").Visible = False
        .PivotItems("GF5590").Visible = False
        .PivotItems("GF5591").Visible = True
        .PivotItems("GF5592").Visible = False
    End With

以上是樞紐分析表bh欄位，將一些資料隱藏起來，只顯示自已想顯示的部分。
因為bh欄位的資料是很多種的值~我總不能1個1個寫        .PivotItems("GF5587").Visible = False
有沒有vba能作到，就是bh欄位所有的資料都False，然後在執行自已想要的資料為true
因為資料是變數，變成要先更新，然後再將所有的資料False再將需要的資料True

---

作者: Min    時間: 2011-5-11 23:26

這一個
ActiveSheet.PivotTables("樞紐分析表1").PivotFields("bh").count 嗎?

用for迴圈試試看
for i = 1 to.....
.PivotItems(i).Visible = False

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)