在 VBA 中确定动态数据透视表的范围答案

【问题标题】：Determine the range of a Dynamic Pivot Table in VBA在 VBA 中确定动态数据透视表的范围
【发布时间】：2021-05-27 07:42:11
【问题描述】：

我有一个创建电子邮件的宏。电子邮件的正文是一个固定的选定范围。

我想更改这一点，因为当有人收到电子邮件时，正文后会有空行，这是有道理的，因为范围太大，并且会包含空行。

范围太大，因为 Excel 中工作表的第一部分是“嗨，xyz 这里是下面的数据透视表.....”然后它将显示一个数据透视表。

我不知道数据透视表会有多大，所以我选择了一个像 60 这样的数字，所以它可以捕捉到所有内容。该范围类似于sheets("sheet1").range("A2:G60")。

有没有办法制作像RNG=sheets("sheet1").range("a2" & "pivottable1") 这样的东西。

【问题讨论】：

查看this description 中已包含在PivotTable 对象中的不同定义范围。您可能需要pt.TableRange1 参考，但不要使用Select 部分。使用pt.TableRange1 已经是Range，因此您可以获得.Address 或.Rows.Count 或任何其他Range 属性。

【解决方案1】：

使用 HTMLBody，而不是正文，请发布您的代码以尝试它

【讨论】：