亲爱的 Stackoverflow-ians,
我带着另一个问题来找你。我正在通过 VBA 在不同的数据透视表上创建一个钻取。我一直希望深入研究 Total 单元格,并且当我的数据透视表扩展时,我在代码中所做的引用它不起作用。如何在不使用单元格引用的情况下引用数据透视表中的单元格。
代码如下:
Sheets("16-Compliancy-Extract").Select
Range("H14").Select
Selection.ShowDetail = True
Selection.Copy
H14 是我所指的单元格。问题是当我将新数据转储到数据透视表时,这个单元格-“地址”不断变化。
我该如何命名它?
用这个修复它:它在与我试图检索的 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
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句