Excel VBA 使用变量插入公式

Question

我试图在 VBA 的帮助下将公式插入单元格，但我一直收到错误 1004：“应用程序定义或对象定义的错误”。 问题出在哪里？

Worksheets("Sheet1").Range("L10").Formula = "=VLOOKUP(" & Cells(6, 15) & ", SQLTable, 2, 0)*" & Cells(6, 16)

Answer 1

我相信您需要Cells(6, 15)的地址，因为您将公式放在工作表上。 还进行了修改以包含一个工作表变量，用于正确的 object 资格

---

Dim ws As Worksheet: Set ws = ThisWorkbook.Sheets("Sheet1")
ws.Range("L10").Formula = "=VLOOKUP(" & ws.Cells(6, 15).Address & ", SQLTable, 2, 0)"

---

这将默认为绝对地址 ( $O$6 )。 如果你想删除被锁定的列，你可以像这样修改绝对属性（ Column Absolute, Row Absolute ）： ws.Cells(6, 15).Address (False, False)