Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Альтернатива функции ЕПУСТО для объединённых ячеек
 
Требуется альтернатива функции ЕПУСТО для объединённых ячеек.
Исходные условия:
- в хронологическом порядке есть события от 1 до 6 в течении дня (даты);
- необходимо в объединённой ячейке "ответ" вывести результат "метка",
который будет использоваться как необходимое условие для других расчётов.
Определение "метки" должно происходить при обязательном наличии (отсутствии) парных данных (z и x) события.
В случае отсутствия одного из них результат будет некорректным.

Использование в объединённой ячейке "ответ" функции ЕПУСТО и выбор массива
даёт некорректный результат при последующих  изменениях таблицы и формулы (для наглядности верхняя таблица).
После внесения изменений выводиться сообщение о невозможности ввести формулу массива в объединённую ячейку.
UDF: рассчитать, условно, две функции "середняк_по_количеству" и "середняк_по_значению", требуется корректировка макроса
 
Имеется некая таблица, по данным которой необходимо с помощью макросов рассчитать, условно, две функции "середняк_по_количеству" и "середняк_по_значению". Формулы для расчёта искомых, которые составлены с помощью функций excel, выглядят так

середняк_по_количеству=ЕСЛИОШИБКА(СУММПРОИЗВ(D4:I4;D5:I5)/(СУММ(D5:I5));0)
середняк_по_значению=ЕСЛИОШИБКА(СУММПРОИЗВ(D4:I4;D5:I5)/(СУММ(D4:I4));0)

К сожалению в макросах не силён - прошу помощи.
Начал писать код и затупил
Код
Public Function середняк_по_количеству(события As Range)
Dim v(), i&
  v = события.Value
  For i = 1 To UBound(v, 2)
    середняк_по_количеству = середняк_по_количеству + v(1, i) * v(2, i)
  Next
  середняк_по_количеству = WorksheetFunction.Sum(середняк_по_количеству, 0)
End Function
Требуется, чтобы при использовании функции-макроса достаточно было выбрать диапазон(ы) исходных данных (его размер может меняться).
Если кто может подскажите куда двигаться.
UDF для вычисления и определения максимального значения в диапазоне результатов
 
Имеется таблица1, расчёт и определение максимального значения в которой выполнен макросом пример1. Необходимо подправить макрос пример2, чтобы при использовании функции-макроса достаточно было выбрать диапазон исходных данных (его размер может меняться). Интересен макрос и для таблицы2. Если кто может подскажите.
Макрос: замена в функции поочерёдного выбора значений на диапазон, упростить работу с пользовательской функцией
 
Добрый день. Есть простая пользовательская функция proba1 (vba) позволяющая рассчитать некую формулу на основании рядов данных связанных событиями. Хотелось бы при вводе исходных данных заменить последовательный выбор параметров (их может быть много и количество может меняться) на выбор диапазона (типа A1:K10)
Изменено: pvmail - 18.12.2017 12:38:39
Страницы: 1
Наверх