Вставлена ​​функция SUMIF в ячейку VBAОжидаемый конец заявления - PullRequest
Новая
       6

Вставлена ​​функция SUMIF в ячейку VBAОжидаемый конец заявления

0 голосов
/ 21 мая 2018 
Dim ACHRowCount As Integer
ACHRowCount = Range("Q" & Rows.Count).End(xlUp).Row
'ACH CREDIT TOTALSCells
 Cells(ACHRowCount, 18).Offset(2, 0).Formula = "=SUMIF(S3:S" & ACHRowCount & ", "<0")"

По сути, у меня есть макрос, который должен вставить формулу в ячейку, которая суммирует только отрицательные значения в столбце.ACHRowCount - количество строк в столбце.Когда я пытаюсь запустить этот код, он говорит:

Ошибка: ожидаемый конец оператора.

1 Ответ

0 голосов
/ 21 мая 2018
  1. Назовите лист, с которым вы работаете
  2. Используйте Option Explicit вверху кода
  3. Используйте Long не Integer
  4. Добавьте аргумент диапазона суммыдо SUMIF например T1:T3.Это отсутствует в вашем коде.
  5. Удвоить на "" внутри строки

Код: 

Public Sub test()
    Dim ACHRowCount As Long

    With ActiveSheet '<= change to actual sheet name
        ACHRowCount = .Range("Q" & .Rows.Count).End(xlUp).Row
        .Cells(ACHRowCount, 18).Offset(2, 0).Formula = "=SUMIF(S3:S" & ACHRowCount & ", ""<0"",T1:T3)"
    End With

End Sub
...