Excel VBA相当于ADDRESS函数

Question

我想在vba中编写这个函数,以便它给我单元格id.

=ADDRESS(1,2,4,TRUE,"Sheet1")

有谁知道VBA的语法？提前致谢.

Answer 1

在VBA中做类似事情的正常方法也是

Worksheets("Sheet1").Cells(1, 2).Address(RowAbsolute:=False, _
                                         ColumnAbsolute:=False, _
                                         External:=True)

将返回[TestWorkbook.xlsm]Sheet1!B1或

Worksheets("Sheet1").Cells(1, 2).Address(RowAbsolute:=False, _
                                         ColumnAbsolute:=False, _
                                         External:=False)

哪个会回归B1.

没有显示工作表名称和单元格的简单方法,也不包括工作簿名称.一种可能的方式

"'" & Worksheets("Sheet1").Name & "'!" & Worksheets("Sheet1").Cells(1, 2).Address(RowAbsolute:=False, _
                                                                                  ColumnAbsolute:=False, _
                                                                                  External:=False)

(显然,如果你使用Worksheets("Sheet1").Name那么你也可以使用"Sheet1",但我这样编写,以便你可以使用变量而不是硬编码的值.编辑:重读最后一句,我意识到它是多么愚蠢 - Worksheets(mySheetName).Name是同样的mySheetName,所以只是使用"'" & mySheetName & "'!" & ...)