VBA Сумиф против Сумифс

Question

---

UPDATE:

Спасибо за вашу помощь! Это определенно сработало.

Мне интересно, есть ли способ добавить функцию цикла? Я хотел бы сослаться на столбец A на рабочем листе 888 для определения того же значения в столбце A на 999 и суммировать значения в последнем столбце таблицы (учитывая, что последний столбец может отличаться, что позволяет макрос должен быть более динамичным).

Dim LastRow, LastColumn As Long 
LastRow = Cells(Rows.Count, "A").End(xlUp).Row 
LastColumn = Worksheets("888").Cells(1, 
Columns.Count).End(xlToLeft).Column 

For x= 1 To LastRow 
Cells(x, 2).Value = 
WorksheetFunction.SumIf(Worksheets("888").Range("A:LastRow"), 
Worksheets("999").Range("A:LastRow"), 
Worksheets("888").Range("LastColumn:LastColumn")) 

Next c 

Я получаю сообщение об ошибке "Невозможно получить свойство SumIf класса функций рабочего листа. Есть мысли о том, как это исправить?

Answer 1

Я не очень понимаю, почему вы хотите использовать макрос, когда формула может сделать работу

поместите ниже в C2 и перетащите вниз формула должна сделать работу

=SUMIF(Sheet2!F:F,A2,Sheet2!H:H)+SUMIF(Sheet3!J:J,A2,Sheet3!L:L)

но если вы настаиваете на макросе,

Worksheets("Sheet1").Range("C2").Value = "=SUMIF(Sheet2!F:F,A2,Sheet2!H:H)+SUMIF(Sheet3!J:J,A2,Sheet3!L:L)"
Worksheets("Sheet1").Range("C2:C7").FillDown