Question

excel中vba编程range的应用

其中这句

arg = "'" & path & "[" & file & "]" & sheet & "'!" & Range(ref).Range("A1").Address(, , xlR1C1)

为什么要用两个range呢，谢谢

Private Function GetValue(path, file, sheet, ref)
' 从关闭的工作薄返回值
Dim arg As String
'确定文件是否存在
If Right(path, 1) <> "" Then path = path & ""
If Dir(path & file) = "" Then
GetValue = "File Not Found"
Exit Function
End If
'创建公式
arg = "'" & path & "[" & file & "]" & sheet & "'!" & Range(ref).Range("A1").Address(, , xlR1C1)
'执行EXCEL4宏函数
GetValue = Application.ExecuteExcel4Macro(arg)
End Function

Answer 1

假设ref代表的文本是：b2:c6
那么：range(ref)就表示b2到c6的范围；
range(ref).range("a1")就表示b2到c6这个范围的左上角第一个单元格，即b2单元格

这样做能确保定位到一个单元格上，而不是一个区域