在範圍變量中捕獲單元

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