- 帖子
- 586
- 主題
- 123
- 精華
- 0
- 積分
- 763
- 點名
- 0
- 作業系統
- WINDOW7
- 軟體版本
- Office 2003
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2010-5-16
- 最後登錄
- 2017-3-14
 
|
下面的程式碼找了好久才看到
不過有一個問題
如果我要顯示的資料有好幾個
可以用什麼方式?
譬如我要顯示的項目在工作表"項目"中那幾個- Sub dd()
- For i = 1 To ActiveSheet.PivotTables("樞紐分析表1").PivotFields("客戶簡稱").PivotItems.Count
- If ActiveSheet.PivotTables("樞紐分析表1").PivotFields("客戶簡稱").PivotItems(i) <> "中環" Then
- ActiveSheet.PivotTables("樞紐分析表1").PivotFields("客戶簡稱").PivotItems(i).Visible = False
- End If
- Next
- End Sub
 樞紐.rar (16.11 KB)
|
|
發表於 2012-6-14 14:18
| 
