Встроенная функция Excel не работает в коде VBA - В чем моя ошибка? - PullRequest
1 голос
/ 12 июня 2019

Я пытаюсь суммировать все значения предопределенного диапазона ячеек. Однако этот диапазон был определен только строками (например, searchRngQue = строки от 5 до 10). Теперь я попробовал следующее, чтобы извлечь номера строк из диапазона и добавить соответствующий столбец, чтобы определить точные ячейки, из которых должна быть рассчитана сумма. Однако код дает мне ошибку времени выполнения 1004: «Ошибка приложения или объекта»

Другая проблема заключается в том, что методы .End (xlUp / xlDown) не возвращают первую / последнюю строку диапазона. Что я должен использовать вместо этого? Кто-нибудь может показать мне, чего мне не хватает ?! Заранее большое спасибо!

sumQue = Application.WorksheetFunction.Sum(.Range(.Cells(searchRngQue.End(xlUp).Row, 8) & ":" & .Cells(searchRngQue.End(xlDown).Row, 8)))

1 Ответ

4 голосов
/ 12 июня 2019

Вы хотели это сделать:

sumQue = Application.WorksheetFunction.Sum(.Range(.Cells(searchRngQue.End(xlUp).Row, 8), .Cells(searchRngQue.End(xlDown).Row, 8)))

При работе с Range(Cells(1,1), Cells(100,1)) в качестве разделителя используется ,, а не :

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...