目前尝试打开别的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

所以是要用thisworkbook去呼叫myxlsdata?

是的

怪怪的,1的资源来源两份都有引用@@ 2的range指定来源也是有完整程式码吗?自已用vba刻比较快~用google找vba 枢纽分析表另外myxlsdata改用workbook类别