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