blocks|key|1962438|text|xlR1C1是一个reference+style，用于指定公式的工作方式。使用此样式时，公式的工作方式和外观将与您预期的截然不同。R1C1规范基本上意味着使用行和列序号而不是字母名称来不同地引用单元格。例如，在使用xlR1C1时，您将使用=R2C2+(row2，第2列)访问单元格B2。另一个示例是，可以将单元格C10称为=R10C3|type|unstyled|depth|inlineStyleRanges|offset|length|style|CODE|entityRanges|data|1962439|至于第8行发生了什么……您正在构造一个单元格引用，如下所示：(请注意，您的单元格引用将有所不同，因为其中有一个文件路径)|1962440|='[Myfilename.xlsx]Sheet1'!R1C1|code-block|syntax|javascript|1962441|可以使用调试器查看arg变量中包含的字符串。|1962442|entityMap|0|LINK|mutability|MUTABLE|url|http://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel.xlreferencestyle%2528v=office.15%2529.aspx^0|0|6|3B|5|4H|6|9|F|0|0|0|0|9|3|0^^$0|@$1|2|3|4|5|6|7|W|8|@$9|X|A|Y|B|C]|$9|Z|A|10|B|C]|$9|11|A|12|B|C]]|D|@$9|13|A|14|1|15]]|E|$]]|$1|F|3|G|5|6|7|16|8|@]|D|@]|E|$]]|$1|H|3|I|5|J|7|17|8|@]|D|@]|E|$K|L]]|$1|M|3|N|5|6|7|18|8|@$9|19|A|1A|B|C]]|D|@]|E|$]]|$1|O|3|-4|5|6|7|1B|8|@]|D|@]|E|$]]]|P|$Q|$5|R|S|T|E|$U|V]]]]

<code>xlR1C1</code> is a <a href="http://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel.xlreferencestyle%28v=office.15%29.aspx" rel="nofollow" title="Reference Style">reference style</a> which is used to specify how formulas work. When using this style, your formulas will work and look very differently than you expect. The R1C1 specification, basically means the cells are referred to differently using row &amp; column ordinals instead of letter names. For example, when using xlR1C1, you would access cell B2 by using <code>=R2C2</code> (row2, column 2). Another Example, cell C10 could be referred to as <code>=R10C3</code>

As to whats happening on line 8... you are constructing a cell reference that looks like this: (Note that your cell reference will be different because it has a file path in it)

<pre><code>='[Myfilename.xlsx]Sheet1'!R1C1
</code></pre>

You can use the debugger to view the string contained in the <code>arg</code> variable.

blocks|key|988600|text|将Range("A1")添加到代码中似乎没有任何作用。在“即时”窗口中键入此命令将导致某些...意外的结果。|type|unstyled|depth|inlineStyleRanges|offset|length|style|CODE|entityRanges|data|988601|?Range("B3").Range("A1").Address
$B$3|code-block|syntax|javascript|988602|现在，我期望返回$A$1，但似乎函数的这一部分将返回Range(ref)的地址。|988603|现在，使用ReferenceStyle参数调用Range.Address将产生这些结果。|988604|?Range("B3").Range("A1").Address(,,xlR1C1)
R3C2|988605|entityMap|0|LINK|mutability|MUTABLE|url|http://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel.xlreferencestyle%2528v=office.15%2529.aspx|1|http://msdn.microsoft.com/en-us/library/office/ff837625(v=office.15).aspx^0|1|B|0|0|8|4|Q|A|0|N|D|5|E|0|N|D|1|0|0^^$0|@$1|2|3|4|5|6|7|10|8|@$9|11|A|12|B|C]]|D|@]|E|$]]|$1|F|3|G|5|H|7|13|8|@]|D|@]|E|$I|J]]|$1|K|3|L|5|6|7|14|8|@$9|15|A|16|B|C]|$9|17|A|18|B|C]]|D|@]|E|$]]|$1|M|3|N|5|6|7|19|8|@$9|1A|A|1B|B|C]]|D|@$9|1C|A|1D|1|1E]|$9|1F|A|1G|1|1H]]|E|$]]|$1|O|3|P|5|H|7|1I|8|@]|D|@]|E|$I|J]]|$1|Q|3|-4|5|6|7|1J|8|@]|D|@]|E|$]]]|R|$S|$5|T|U|V|E|$W|X]]|Y|$5|T|U|V|E|$W|Z]]]]

Adding <code>Range("A1")</code> to the code doesn't appear to do anything at all. Typing this into the immediate window results in some... unexpected results.

<pre><code>?Range("B3").Range("A1").Address
$B$3
</code></pre>

Now, I would have expected that to return <code>$A$1</code>, but it seems that this part of the function will return the address of <code>Range(ref)</code>. 

Now, calling <a href="http://msdn.microsoft.com/en-us/library/office/ff837625(v=office.15).aspx" rel="nofollow"><code>Range.Address</code></a> with the <a href="http://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel.xlreferencestyle%28v=office.15%29.aspx" rel="nofollow">ReferenceStyle</a> argument would produce these results.

<pre><code>?Range("B3").Range("A1").Address(,,xlR1C1)
R3C2
</code></pre>

blocks|key|1962492|text|Range().Range()+Documentation+here|type|unstyled|depth|inlineStyleRanges|offset|length|style|CODE|entityRanges|data|1962493|1962494|当应用于Range对象时，该属性相对于Range对象。例如，如果所选内容是单元格C3，则Selection.Range("B1")将返回单元格D3，因为它相对于Selection属性返回的Range对象。另一方面，代码ActiveSheet.Range("B1")总是返回单元格B1。|blockquote|1962495|1962496|1962497|代码使用第二个Range("A1")来确保如果您的ref区域大于一个单元格，则它只返回该区域的左上角单元格。另外，您的另一个名为ExecuteExcel4Macro()的Sub似乎需要一个R1C1类型的单元格引用，因此地址将被转换为该类型，以便将arg字符串传递给Sub。|1962498|entityMap|0|LINK|mutability|MUTABLE|url|http://msdn.microsoft.com/en-us/library/office/ff834676%2528v=office.15%2529.aspx^0|0|F|G|I|0|0|0|4|5|J|5|14|2|18|L|1Z|2|28|9|2M|5|31|N|3V|2|0|0|0|7|B|P|3|1S|K|2D|3|2M|4|3F|3|3O|3|0^^$0|@$1|2|3|4|5|6|7|V|8|@$9|W|A|X|B|C]]|D|@$9|Y|A|Z|1|10]]|E|$]]|$1|F|3|-4|5|6|7|11|8|@]|D|@]|E|$]]|$1|G|3|H|5|I|7|12|8|@$9|13|A|14|B|C]|$9|15|A|16|B|C]|$9|17|A|18|B|C]|$9|19|A|1A|B|C]|$9|1B|A|1C|B|C]|$9|1D|A|1E|B|C]|$9|1F|A|1G|B|C]|$9|1H|A|1I|B|C]|$9|1J|A|1K|B|C]]|D|@]|E|$]]|$1|J|3|-4|5|6|7|1L|8|@]|D|@]|E|$]]|$1|K|3|-4|5|6|7|1M|8|@]|D|@]|E|$]]|$1|L|3|M|5|6|7|1N|8|@$9|1O|A|1P|B|C]|$9|1Q|A|1R|B|C]|$9|1S|A|1T|B|C]|$9|1U|A|1V|B|C]|$9|1W|A|1X|B|C]|$9|1Y|A|1Z|B|C]|$9|20|A|21|B|C]]|D|@]|E|$]]|$1|N|3|-4|5|6|7|22|8|@]|D|@]|E|$]]]|O|$P|$5|Q|R|S|E|$T|U]]]]

<code>Range().Range()</code> <a href="http://msdn.microsoft.com/en-us/library/office/ff834676%28v=office.15%29.aspx" rel="nofollow">Documentation here</a>:

<blockquote>
 When applied to a <code>Range</code> object, the property is relative to the <code>Range</code> object. For example, if the selection is cell <code>C3</code>, then <code>Selection.Range("B1")</code> returns cell <code>D3</code> because it’s relative to the <code>Range</code> object returned by the <code>Selection</code> property. On the other hand, the code <code>ActiveSheet.Range("B1")</code> always returns cell <code>B1</code>.
</blockquote>

The code is using that second <code>Range("A1")</code> to ensure that if you have a <code>ref</code> range larger than one cell, it only returns the top left cell of that range. Also it would appear your other <code>Sub</code> called <code>ExecuteExcel4Macro()</code> requires an <code>R1C1</code> type cell reference so the address is being converted into that type for passing the <code>arg</code> string into the <code>Sub</code>.

I'm using this function to retrieve a value from a closed workbook. In this 8th line of this code, I don't understand why "A1" is being used. What exactly is happening in that entire 8th line? I'm confused by the xlR1C1 argument as well.

<pre><code>Private Function GetValue(path, file, sheet, ref)

 Dim arg As String
 If Right(path, 1) &lt;&gt; "\" Then path = path &amp; "\"
 If Dir(path &amp; file) = "" Then
 GetValue = "File Not Found"
 Exit Function
 End If
 arg = "'" &amp; path &amp; "[" &amp; file &amp; "]" &amp; sheet &amp; "'!" &amp; _
 Range(ref).Range("A1").Address(, , xlR1C1)
 GetValue = ExecuteExcel4Macro(arg)

End Function
</code></pre>

Why is cell "A1" being used in this GetValue function in VBA?

翻译质量差，导致语言生硬或混乱。

没有提供实际的解决方法或示例。

解答不清晰，无法理解或解决问题。

页面排版不美观，阅读体验差。

文章

问答

视频

学习中心

腾讯云实验室

直播

竞赛

腾讯云代码分析专区

腾讯iOA零信任安全管理系统专区

腾讯云架构师技术同盟交流圈

腾讯云数据库专区

腾讯云顾问专区

腾讯云原生专区

腾讯混元专区

腾讯云TCE专区

腾讯云Lighthouse专区

腾讯云HAI专区

腾讯云Edgeone专区

腾讯云存储专区

腾讯云智能专区

腾讯轻联专区 

腾讯云开发专区

TAPD专区

腾讯轻量云游戏服专区

腾讯云最具价值专家

腾讯云架构师技术同盟

腾讯云创作之星

腾讯云开发者先锋

腾讯云代码助手

云原生构建

TAPD 敏捷项目管理

Cloud Studio

SDK中心

API中心

命令行工具

涵盖代码开发、场景应用、自动测试全流程，助你从零构建专属AI助手

一站式MCP教程库，解锁AI应用新玩法

我使用此函数从已关闭的工作簿中检索值。在这段代码的第8行中，我不明白为什么要使用"A1“。这整个第8行到底发生了什么？我也被xlR1C1的论点搞糊涂了。Private Function GetValue(path, file, sheet, ref)    Dim arg As String    If Right(p...

问为什么在VBA的GetValue函数中使用单元格"A1“？
EN

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问为什么在VBA的GetValue函数中使用单元格"A1“？EN