如何使用 VBA 在 excel 中的特定单元格中设置公式？答案

【问题标题】：How to set a formula in particular cells in excel using VBA?如何使用 VBA 在 excel 中的特定单元格中设置公式？
【发布时间】：2014-06-06 01:36:22
【问题描述】：

我想在 excel 的前 1000 行中设置以下公式（它已经正常工作）。实际上我正在寻找 VBA。但是，我对 VBA 代码并不熟悉。

=IFERROR(VLOOKUP(DD,HDR_COLMN,COLUMN(),0),"")

DD - 从另一个工作表中获取数据

HDR_COLMN - 从另一个工作表（Sheet2）获取表头并在 Sheet1 中显示为下拉值

请任何人都可以帮助我。提前谢谢

【问题讨论】：

标签： excel vba

【解决方案1】：

唯一棘手的部分是双引号。

假设我们想用 VBA

存入这个

=IFERROR(VLOOKUP(A1,B1:C10,2,TRUE),"")

这样就可以了：

Sub luxation()
    Range("A10").Formula = "=IFERROR(VLOOKUP(A1,B1:C10,2,TRUE),"""")"
End Sub

【讨论】：

要将其应用于前 1000 行，只需执行 Range("A1:A1000").Formula = "=IFERROR(VLOOKUP(A1,$B$1:$C$10,2,TRUE),"""")"（我之所以提到这一点，是因为对于初学者来说不一定直观，.Formula 可以这样工作）。
@Gary 的学生和 DavidZemens....谢谢。但我想将此公式设置为 [A1 - A1000 到 BB - BB1000]。（表示一行包含 54 个单元格）
@Gary 的学生和 DavidZemens....谢谢。但我想将此公式设置为 [A1 - 到 BB 和 A1000 到 BB1000]。（意味着一行包含 54 个单元格）。请跳过我之前的评论。谢谢