捕获范围变量中的单元格

Question

任何人都会看到此代码出了什么问题。我收到了“需要对象”的错误：

Dim r As Range
Set r = Sheet2.ChartObjects("myChart").BottomRightCell.Address

看起来很简单，但不起作用。我需要能够做到：

r.row和r.column

Answer 1

Range不是Address - 那是String。 BottomRightCell会返回Range。

Dim r As Range
Set r = Sheet2.ChartObjects("myChart").BottomRightCell

add = r.Address
row = r.Row
col = r.Column