VBA，更新图表以使用定义的范围包括最后一行数据

Question

我有一个问题，类似于VBA: Modify chart data range 但是我的答案是基于水平数据集的。

如何使此命名范围更新为在垂直列集中包含最新行？

这就是我得到的公式，B1是标题，B列将包含我的所有数据。

=OFFSET(Sheet1!$B$1,,,1,COUNTA(Sheet1!$B2:$B))

修改

我现在正在使用以下定义的范围：

=OFFSET(Sheet1!$B$2,,,COUNTA(Sheet1!$B2:$B1000),1)

但是当我将其添加到图表中时，出现以下错误：

Answer 1

您快到了-您基本上需要将height参数与width交换： = OFFSET（Sheet1！$ B $ 1 ,,, COUNTA（Sheet1！$ B1：$ B1000），1）

以下是不包含B1中标头的范围： = OFFSET（Sheet1！$ B $ 2 ,,, COUNTA（Sheet1！$ B2：$ B1000），1）

当然，欢迎您扩展B1：B1000的范围。 希望对您有帮助！