Вставка формулы с помощью vba Excel

Question

Я пытаюсь создать макрос, который вставляет формулу в конкретную ячейку. Для этого я использую следующий код.

Сначала я выбрать правильный лист:

Sheets("Resultaat").Select 

Затем я выбираю ячейку, в которой я хочу, чтобы вставить формулу:

Range("C2").Select 

Я использую ActiveCell.Formula вставить формулу так:

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

Этот код не работает. Это дает мне следующую ошибку.

compile error: Expected end of statement

Я думаю, что ошибка вызвана ">0" части кода. Есть ли способ заставить этот код работать?

Answer 1

Несколько вещей:

1. вам не нужно активировать или выбрать что-нибудь, но может относиться к ячейке непосредственно.

2. Ваша формула должна быть в американском английском стиле при использовании vba. Поэтому используйте , вместо ;.

3. Вам нужны двойные кавычки, чтобы оставить одинарные кавычки в формуле.

ли это вместо:

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