使用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"")"