从地址获取一个单元格

Fre*_*rik 2 excel vba excel-vba

在Excel VBA中,我想这样做:

Dim cellAddress As String, cell As Range
Set cellAddress = "=Sheet1!A7"
Set cell = GetCellFromAddress(cellAddress)
Run Code Online (Sandbox Code Playgroud)

我怎么能以最好的方式实现"GetCellFromAddress"?我知道我可以解析cellAddress,但这看起来有点尴尬......

我正在使用Excel 2007,如果重要的话.

Luc*_*ian 5

Dim cellAddress As String, cell As Range
cellAddress = "=Sheet1!A7"

Set cell = Range(cellAddress)

MsgBox cell.Address(True, True, xlR1C1, True)
Run Code Online (Sandbox Code Playgroud)

这将显示带有文本的消息框:

---------------------------
Microsoft Excel
---------------------------
[Book1]Sheet1!R7C1
---------------------------
OK   
---------------------------
Run Code Online (Sandbox Code Playgroud)

玩得开心!