如何将范围的地址转换为字符串

时间:2017-04-11 17:01:09

标签: excel excel-vba vba

我有一个VBA代码,它为excel范围提供了一个活动和选择的地址。我想把它作为一个字符串。

Sub getRange()
Dim atcSheet As Worksheet
Dim selRange As Range
Dim myRange As String

Set actSheet = ActiveSheet
Set selRange = Selection

MsgBox (selRange.Address)
myRange = selRange.Address(RowAbsolute, ColumnAbsolute)
MsgBox (myRange)
end sub

当运行它时(在选择了几个单元格构成范围之后),MsgBox返回地址,但我无法将其作为字符串变为变量。

2 个答案:

答案 0 :(得分:5)

如果您打算将范围的绝对引用转换为字符串变量,那么

myRange = selRange.Address

默认情况下,地址(True,True)。

答案 1 :(得分:3)

使用:

myRange = selRange.Address(True, True)
' for debug
MsgBox myRange