为什么 VBA 中的 GetValue 函数使用单元格“A1”？

我正在使用此函数从关闭的工作簿中检索值。在此代码的第 8 行中，我不明白为什么使用“A1”。整个第 8 行到底发生了什么？我也对 xlR1C1 的论点感到困惑。

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)
    GetValue = ExecuteExcel4Macro(arg)

End Function

Range().Range() 文档在这里 http://msdn.microsoft.com/en-us/library/office/ff834676%28v=office.15%29.aspx:

当应用于Range对象，属性是相对于Range目的。例如，如果选择的是单元格C3, then Selection.Range("B1")返回单元格D3因为它是相对于Range返回的对象Selection财产。另一方面，代码ActiveSheet.Range("B1")总是返回单元格B1.

该代码正在使用第二个Range("A1")以确保如果您有ref如果范围大于一个单元格，则它仅返回该范围的左上角单元格。它还会出现你的其他Sub called ExecuteExcel4Macro()需要一个R1C1类型单元格引用，以便地址被转换为该类型以传递arg串入Sub.