Код для кнопки

[ruavia3]

Только данные подставляются как-то странно. Можно сделать подставление целиком недели, при наличии данных?

[SAS888]

Можно. Но тогда от условия 3 ничего зависеть не будет. Посмотрите вложение (оптимизированное). Что не так?
P.S. Если выбирать данные за всю неделю то большую часть кода можно вообще выбросить, а в строках 14 и 17 прописать соответствующие формулы.

[ruavia3]

Не работает.
3 условие - уникальное условие, которое не повторяется, но с помощью него выбирается определенный №. Условия 1 и 2 могут и даты в столбце А на закладке "Данные" могут повторяться.
К примеру, на определенном предприятии(усл.1) , у определенного начальника (усл.2) работает сотрудник (усл.3).
Нужно с помощью формы, выбирать неделю(по факту выбирается день на календаре, а на Sheet1 заполняется диапазон C3:O9 в разбивке по дням)
Выбираем предприятие (усл.1), выбираем начальника (усл.2), а в Combobox3 - выбираем из списка, соответствующих условиям 1 и 2 сотрудников, нужного.

В итоге. Мы получаем детальную неделю по сотруднику, в стр. 14 среднее за неделю по сотрудникам, которые подчиняются начальнику, в стр.17 среднее за неделю по предприятию.


Возможное заполнение листа "данные" в приложенном примере.

[SAS888]

Давайте разберемся. Что не работает? Как должно быть?
Сейчас из листа "данные" выбираются и заносятся в лист "Sheet1" данные за всю неделю, не зависимо от условий (а как нужно? Вы сами просили "за всю неделю"). Затем, на основании условий, в строках 14 и 17 вычисляется среднее арифметическое по столбцам, в зависимости от условий. В строке 14 - ср. ариифм. только тех данных, которые удовлетворяют условиям 1 и 2. В строке 17 - ср. ариифм. данных, которые удовлетворяют условию 1. А как должно быть? И при чем здесь тогда условие 3?

[ruavia3]

Все правильно, насчет 14 и 17 стр. А вот условие 3 как раз нужно для правильного заполнения диапазона Sheet1.(C3:O9). Диапазон заполняется данными из листа "Данные", согласно №, т.к. за одну и туже неделю может работать несколько сотрудников, а нам нужно выбрать для рассмотрения только одного.

p.s. на листе Sheet1. данные за неделю идут в разбивке по дням. В ячейках A3:А9 - идет обозначение дней. При работе макроса даты в этом диапазоне почему-то затираются.

[SAS888]

Изначально, я так и сделал. Но Вы сказали, что

данные подставляются как-то странно. Можно сделать подставление целиком недели, при наличии данных?

Вот я и сделал вывод данных за неделю, не зависимо от условий.
Если Вы упорно не хотите говорить, как Вам все-таки нужно, попробую догадаться сам:
1. Выбираем дату в календаре. В результате получаем нужную рабочую неделю.
2. Согласно условиям ( с 1 по 3) выбираем все строки из листа "данные". Получаем 4 условия. 1... 3 - условия из формы, 4 - диапазон дат (выбранная неделя).
Если все так, то из представленных Вами данных будет выбрано не более 1 строки, т.к. условие 3 - уникально. Так было сделано изначально. По-видимому, Вам нужно что-то другое. Может все-таки скажите, что именно?

[ruavia3]

Я понял ошибку. условие 3 уникально только в одной дате, т.е. в другой день недели этот же номер может встретиться еще раз.

[SAS888]

Посмотрите следующее вложение. В строках 14 и 17 вычисляется ср. арифм. по условиям за всю неделю, а в строки с 1 по 9 заносятся данные, удовлетворяющие всем 3-м условиям в диапазоне выбранной недели.

[ruavia3]

Разбираю код)

[SAS888]

Можно. В одном из предыдущих вариантов, я в столбец "A" заносил дату найденной (удовлетворяющей 3-м условиям) строки. Теперь этого нет. Можно записать [С3:O9].ClearContents