使用 vba Excel 插入公式

Question

我正在尝试创建一个在特定单元格中插入公式的宏。为此，我使用以下代码。

首先我选择合适的工作表：

Sheets("Resultaat").Select

然后我选择要插入公式的单元格：

Range("C2").Select

我使用ActiveCell.Formula 插入这样的公式：

ActiveCell.Formula = "=COUNTIF(Overview!$G$2:$G$1000;">0")"

此代码不起作用。它给了我以下错误。

编译错误：预期语句结束

我认为错误是由代码的">0" 部分引起的。有什么办法可以让这段代码工作吗？

Answer 1

一些事情：

1. 您无需激活或选择任何内容，直接引用单元格即可。

2. 在使用 vba 时，您的公式需要采用美式英语。所以使用, 而不是;。

3. 您需要双引号才能在公式中保留单引号。

改为这样做：

 Sheets("Resultaat").Range("C2").Formula = "=COUNTIF(Overview!$G$2:$G$1000,"">0"")"