WorksheetFunction.SumIfs на основе диапазона с датой и временем

Я пытаюсь создать SumIfs, который суммирует все значения в диапазоне на основе такой даты.

Dim v_date as Date
v_date = Date
result = WorksheetFunction.SumIfs(Range("C3:C100"),Range("A3:A100"),v_date)

Проблема в том, что Range("A3:A100") содержит дату и время, но я хочу фильтровать только по дате. Я пытался добавить подстановочный знак, например v_date & "*", но это не сработало. Результат всегда 0.

3 метода стилизации элементов HTML
3 метода стилизации элементов HTML
Когда дело доходит до применения какого-либо стиля к нашему HTML, существует три подхода: встроенный, внутренний и внешний. Предпочтительным обычно...
Формы c голосовым вводом в React с помощью Speechly
Формы c голосовым вводом в React с помощью Speechly
Пытались ли вы когда-нибудь заполнить веб-форму в области электронной коммерции, которая требует много кликов и выбора? Вас попросят заполнить дату,...
Стилизация и валидация html-формы без использования JavaScript (только HTML/CSS)
Стилизация и валидация html-формы без использования JavaScript (только HTML/CSS)
Будучи разработчиком веб-приложений, легко впасть в заблуждение, считая, что приложение без JavaScript не имеет права на жизнь. Нам становится удобно...
Flatpickr: простой модуль календаря для вашего приложения на React
Flatpickr: простой модуль календаря для вашего приложения на React
Если вы ищете пакет для быстрой интеграции календаря с выбором даты в ваше приложения, то библиотека Flatpickr отлично справится с этой задачей....
В чем разница между Promise и Observable?
В чем разница между Promise и Observable?
Разберитесь в этом вопросе, и вы значительно повысите уровень своей компетенции.
Что такое cURL в PHP? Встроенные функции и пример GET запроса
Что такое cURL в PHP? Встроенные функции и пример GET запроса
Клиент для URL-адресов, cURL, позволяет взаимодействовать с множеством различных серверов по множеству различных протоколов с синтаксисом URL.
0
0
36
1
Перейти к ответу Данный вопрос помечен как решенный

Ответы 1

Ответ принят как подходящий

Предполагая, что v_date является датой, по умолчанию она будет равна полуночи. Поэтому вам нужно фильтровать по >=v_date (полночь) и <v_date+1 (полночь следующего дня).

result = WorksheetFunction.SumIfs(Range("C3:C100"), _
Range("A3:A100"), ">=" & CDbl(v_date), _
Range("A3:A100"), "<" & CDbl(v_date + 1))

Результат по-прежнему 0

horst 24.05.2019 07:44

Как вы объявили v_date? Если это вариант, то это может не сработать. Если это дата, измените код, как отредактировано выше.

user11509084 24.05.2019 10:22

Да, это объявлено как дата, и с вашим обновленным ответом это работает. Спасибо!

horst 24.05.2019 11:03

Другие вопросы по теме