在公式栏中插入公式

Question

有人知道我的代码有什么问题吗？

Sub reFormat()
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets("Admin")
    ws.Range("C21").Formula = "=""S4&""AA5&""AA6&""AA7&""AA8&""AA9&""AA10" 'returns applica-
    tion defined or object-defined error
End Sub

我希望这段代码的输出是：=S4&(AA5&AA6&AA7&AA8&AA9&AA10) 感谢您的帮助！

Answer 1

您的公式根本无效。字符串的计算结果为：

="S4&"AA5&"AA6&"AA7&"AA8&"AA9&"AA10

这不是有效的 Excel 公式。

你引用的太多了。如果这些是单元格引用并且您的公式打算连接它们，并且您希望您的字符串计算为：

=S4&(AA5&AA6&AA7&AA8&AA9&AA10)

那么你可以这样做：

.Formula = "=S4&(AA5&AA6&AA7&AA8&AA9&AA10)"

在公式栏中插入公式

Inserting Formula in Formula Bar

excel

vba

formula