Excel VBA - concantenate字符串

我想学习VBA，并得到了一些关于如何通过使用CStr引用的工作簿上增加我的行号的帮助。在下面，我试图用字符串'year'来协调其他工作簿上的单元格。如果我拿出'年'，它工作正常，但'年'添加它不起作用。必须有一些我做错了，但我无法弄清楚。Excel VBA - concantenate字符串

Dim year As String 
year = "16" 
ActiveCell.FormulaR1C1 = "='[Junk Work File.xlsx]Total'!R" & CStr(r) & "C1" & year

2015-06-15 Chuck

定义我们 '不工作'。怎么了？一个错误？意外的结果？ – user3561813

..................使用**“year”** –

尝试使用不同的名称作为变量，它可能不起作用，因为“year”是保留字。试试strYear。 – tonester640

尝试使用'+'而不是'&'。

ActiveCell.FormulaR1C1 = "='[Junk Work File.xlsx]Total'!R" & CStr(r) & "C1" + year

或者

可以使用串联功能

ActiveCell.FormulaR1C1 = Concatenate("='[Junk Work File.xlsx]Total'!R" & CStr(r) & "C1" , year)

2015-06-15 15:59:35 coder231

回答