[VBA ] 樞紐分析圖

看板Visual_Basic作者 (Roger)時間7年前 (2017/03/24 18:34), 編輯推噓0(006)
留言6則, 2人參與, 最新討論串1/1
目前嘗試打開別的EXCEL去產生樞紐分析圖 我把另一份的EXCEL定義成 Set MyXlsData = New Excel.Application 接著把MyXlsData第三頁的資料框起來,於第一頁產生樞紐分析圖 但似乎無法產生,錯誤訊息是:"438,物件不支援此屬性或方法" 使用了網路教學與錄製巨集都是一樣(請參考下面) 想請問是哪邊出了問題,謝謝 1. MyXlsData.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=Range(MyXlsData.Worksheets(3).Cells(2, 1), ThisWorkbook.Worksheets(3).Cells(44, 4)), Version:=xlPivotTableVersion15).CreatePivotTable TableDestination:=Range(MyXlsData.Worksheets(1).Cells(2, 1), MyXlsData.Worksheets(1).Cells(2, 2)), TableName:="樞紐分析表5", DefaultVersion:=xlPivotTableVersion15 2. Prng=Range(xxx...) MyXlsData.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ Prng, Version:=xlPivotTableVersion15).CreatePivotTable _ TableDestination:=MyXlsData.Worksheets(1).Cells(2, _ 2) & "!R3C1", TableName:="樞紐分析表5", DefaultVersion:=xlPivotTableVersion15 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 61.220.206.157 ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1490351694.A.AC8.html

03/24 19:18, , 1F
所以是要用thisworkbook去呼叫myxlsdata?
03/24 19:18, 1F

03/24 19:24, , 2F
是的
03/24 19:24, 2F

03/24 19:35, , 3F
怪怪的,1的資源來源兩份都有引用@@ 2的range指定來源也是
03/24 19:35, 3F

03/24 19:35, , 4F
有完整程式碼嗎?
03/24 19:35, 4F

03/24 19:36, , 5F
自已用vba刻比較快~用google找vba 樞紐分析表
03/24 19:36, 5F

03/24 19:48, , 6F
另外myxlsdata改用workbook類別
03/24 19:48, 6F
文章代碼(AID): #1OrFPEh8 (Visual_Basic)
文章代碼(AID): #1OrFPEh8 (Visual_Basic)