標題: CurrentPage 疑問 [打印本頁]

---

作者: vavashop    時間: 2016-5-5 15:52     標題: CurrentPage 疑問

Sheets("權證鎖碼報表").Select
    Range("I3").Select
    ActiveSheet.PivotTables("樞紐分析表2").PivotFields("標的代碼").CurrentPage = "2330"

"2330"該怎麼改為 資料表1999 的a1欄位呢

一直改不成功
希望能有人可以協助

---

作者: yangjie    時間: 2016-5-6 09:02

回復 1# vavashop
Sheets("權證鎖碼報表").Select
    str1=sheets("1999").cells(1,1)
    Range("I3").Select
    ActiveSheet.PivotTables("樞紐分析表2").PivotFields("標的代碼").CurrentPage = str1
試試看

---

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