是否有Cell().公式函数？

Question

我的脚本编译得很好所以我认为它没问题但是找不到它当然它在这一行上出错了,这是一个while循环中的封装,我只是想尝试一个简单的方法来添加一个公式到一个然后执行类似的操作,将其添加到一行数据中.有没有.Formula或我有其他错误？

Cells(arow, acol).Formula = "=COUNTIF(" & wsData.Name & "!" & Cells(fdRow, acol).Address & ":" & Cells(ldRow, acol) & ")"
acol = acol + 1

Answer 1

只需进行一些小改动:

1. 你错过了.Address上Cells(ldRow, acol)
2. 我还在'工作表名称周围包含了撇号(仅当名称中包含空格时才需要).
3. 正如@Wayne G. Dunn也指出你需要COUNTIF函数的第二个参数,我把它放在最后作为1.你需要更新它.

这是更新的代码:

Cells(arow, acol).Formula = "=COUNTIF('" & wsData.Name & "'!" & Cells(fdRow, acol).Address & ":" & Cells(ldRow, acol).Address & ",1)"