尝试MsgBox单元格引用地址时出现运行时错误“424”

时间:2016-01-13 18:36:14

标签: excel vba excel-vba

我正在尝试将单元格引用地址作为字符串返回。

1   Sub Test()
2       minLoc = Worksheets("Skills").Range("C2")
3       Dim Loc As String
4       Loc = minLoc.Address(RowAbsolute:=False, ColumnAbsolute:=False)
5       MsgBox (Loc)
6   End Sub

错误“运行时错误'424':”出现在第4行。

1 个答案:

答案 0 :(得分:3)

将minLoc更改为范围并进行设置。正如您所写,VBA将其用作字符串。该字符串没有.Address属性。

Sub Test()
    Dim minLoc As Range
    Set minLoc = Worksheets("Skills").Range("C2")
    Dim Loc As String
    Loc = minLoc.Address(RowAbsolute:=False, ColumnAbsolute:=False)
    MsgBox (Loc)
End Sub
相关问题