如何在Excel 2010数据透视表合并中使用R1C1范围内的变量?

时间:2018-07-04 03:11:44

标签: excel vba excel-vba excel-2010

如何获取新的单元格ref或包含行号和列号的变量,将其识别为实际的示例。 R38C8通过合并功能使用的参考?

我的两个数据透视表的行和列不断变化,我具有新的行和列编号范围-准备好使用R1C1引用,但无法使用公式中的变量或单元格引用进行合并-我这是新手,刚完成了为期3周的速成课程...请帮助,这让我发疯了!...

我的代码的最后一部分,尝试使用单元格引用(合并不喜欢“&arS”或RarS:

RS = 32 + RowCountS
CS = ColCountS
RI = 63 + RowCountI
CI = ColCountI

arS = Cells(RS, CS)  ' Stock table, last cell in the range 
arI = Cells(RI, CI) 'Invoiced Table last cell in the range

' Creates a new table by consolidating the negative invoiced amounts with the stock movements totals
'
Sheets("Calculated Stock").Range("A4").Select

 Selection.Consolidate Sources:=Array( _
    "'Calculated Stock'!R32C1:R" & arS"" _
    , _
    "'Calculated Stock'!R63C1:R" & arI"" _
    ), Function:=xlSum, TopRow:=True, LeftColumn:=True, CreateLinks:=False
 Range("A4").Select

1 个答案:

答案 0 :(得分:0)

此行

arS = Cells(RS, CS)   

将变体arS设置为单元格中保留的任何值或文本。我认为您认为它拥有指向该单元格的指针-但这需要该行

       Set arS = cells(rs,cs)

如果您设置了Option Explicit并声明arS为范围为

,则您将消除此错误。
     Dim arS as Range

使用您拥有的代码

  "'Calculated Stock'!R32C1:R" & RS & "C" & CS

将arS设置为指针后,您将使用

 "'Calculated Stock'!R32C1:" & arS.address(true,true,xlR1C1)