2016-09-16 5 views
0

私のピボット記法で何かが間違っています 2行でエラーが表示されますが、 "lastRow"の代わりに "4"を入力すると動作します。私は間違って何をしていますか?固定範囲を動的に変更する方法は?vba間違ったピボット記入

Dim lastRow As Integer 
Set pc = ActiveWorkbook.PivotCaches.Create(xlDatabase, "Sheet1!R1C1:R10C" & "lastRow") 
Set pt = pc.CreatePivotTable(Range("I2")) 
+0

LASTROWはLASTROW =範囲( "A" &Rows.Count).END(xlUp).Row – salti

+0

'" Sheet1のR1C1はofcourseの定義されています"&" lastRow "は、" Sheet1!R1C1:R10ClastRow "と同じです。あなたは確かに '' Sheet1!R1C1:R10C "&lastRow' –

答えて

0

LASTROW周りの引用を削除します!R10C:

Set pc = ActiveWorkbook.PivotCaches.Create(xlDatabase, "Sheet1!R1C1:R10C" & lastRow) 
関連する問題