2017-06-26 22 views
0

ピボットテーブルを作成するマクロがあります。今年は素晴らしい成果を収めましたが、ユーザーはExcel 2013に移行していないため、機能していません。 1つの紆余曲件は、実行するクエリに応じて、データの範囲がユーザーごとに変更できることです。ピボットテーブルを作成するコードを修正しようとしましたが、構文エラーが発生しています。Excel 2013 vbaを使用したピボットテーブルの作成

記録されたコード:

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ 
"Results!R2C1:R633C25", Version:=xlPivotTableVersion15).CreatePivotTable _ 
TableDestination:="Sheet1!R3C1", TableName:="PivotTable1", DefaultVersion _ 
:=xlPivotTableVersion15 

が最後の行と列を決定するために変数を使用してコードを変更し:

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ 
"Results!R2C1:R" & MyRow & "C" & MyCol, _ Version:=xlPivotTableVersion15.CreatePivotTable _ 
TableDestination:="Sheet1!R3C1", TableName:="PivotTable1", DefaultVersion _ 
:=xlPivotTableVersion15 

変更されたコードが間違っているかについての任意の提案を大幅に理解されるであろう。あなたの助けをありがとう

答えて

0

もう問題ありません。ユーザーはマクロの新しいコピーを取得し、再度作業を開始しました。ありがとう。

関連する問題