深入到Excel 2013中的具体总计

Question

亲爱的会员Stackoverflow-ians，

我带你到另外一个问题。我正在通过VBA在不同的数据透视表上创建明细表。我一直在寻找总计单元格的细目，并且在我的数据透视表展开时无法正常工作。如何在不使用单元格引用的情况下引用我的数据透视表中的单元格。

守则如下：

Sheets("16-Compliancy-Extract").Select 
Range("H14").Select 
Selection.ShowDetail = True 
Selection.Copy 

H14是我指的是电池。问题在于，当我将新数据转储到数据透视表时，此Cell - “Adress”会不断变化。

我怎么称得上体面？

Answer 1

修正了这个问题：它在哪里搜索与我的GrandTotal相同的列中最后一个填充的单元格，我试图检索它。

Dim rng As Range 
Dim pt As PivotTable 

Set pt = Sheets("16-Compliancy-Extract").PivotTables("Draaitabel1") 
Set rng = pt.ColumnRange 
rng.Cells(rng.Cells.Count).End(xlDown).ShowDetail = True