Сумма знач. ячеек в колонке при условии заливки других яч.

Дата: Пятница, 21.07.2023, 14:25 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 30

Репутация: 0 ±

Замечаний: 20% ±

Excel 2016

Возможно ли суммировать значения в колонке В, при условии если в других колонках ячейки выделены заливкой. Т.е. если в колонках D,E,F,G.... закрашены ячейки, по типу графика, то суммируются только значения из колонки B... Сложно сформулировать, пример прикрепил

К сообщению приложен файл: 2783746.xlsx (10.5 Kb)

Дата: Пятница, 21.07.2023, 14:32 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Цитата dmtgrs, 21.07.2023 в 14:25, в сообщении № 1 (

)

суммировать значения в колонке В, при условии если в других колонках ячейки выделены заливкой

Формулами это невозможно сделать

ЮMoney:41001419691823 | WMR:126292472390

Дата: Пятница, 21.07.2023, 14:34 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 30

Репутация: 0 ±

Замечаний: 20% ±

Excel 2016

а если макросом? Продублировать тему в VBA?

Дата: Пятница, 21.07.2023, 14:35 | Сообщение № 4

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Цитата dmtgrs, 21.07.2023 в 14:25, в сообщении № 1 (

)

суммировать значения в колонке В

В столбце В в файле только два числа - 8 и 4

ЮMoney:41001419691823 | WMR:126292472390

Дата: Пятница, 21.07.2023, 14:38 | Сообщение № 5

Группа: Пользователи

Ранг: Новичок

Сообщений: 30

Репутация: 0 ±

Замечаний: 20% ±

Excel 2016

Эти числа могут меняться и строчек по факту больше. Нужно чтобы эти числа складывались при условии, если закрашены ячейки с днями и сумма выводилась под каждым днем "Колич чел"

Сообщение отредактировал dmtgrs - Пятница, 21.07.2023, 14:55

Дата: Пятница, 21.07.2023, 14:41 | Сообщение № 6

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Сколько должно получится в Вашем примере?

[p.s.]"Количество" пишется с одной "л"[/p.s.]

ЮMoney:41001419691823 | WMR:126292472390

Дата: Пятница, 21.07.2023, 14:47 | Сообщение № 7

Группа: Пользователи

Ранг: Новичок

Сообщений: 30

Репутация: 0 ±

Замечаний: 20% ±

Excel 2016

Если закрашены D3 и D4 то в D5=B3+B4, если закрашено только D4 то D5=0+B4, если закрашено только D3 то D5=B3+0, если вообще ничего не закрашено, то D5=0

Сообщение отредактировал dmtgrs - Пятница, 21.07.2023, 14:48

Дата: Пятница, 21.07.2023, 14:58 | Сообщение № 8

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Да, это только макросом

Цитата dmtgrs, 21.07.2023 в 14:34, в сообщении № 3 (

)

Продублировать тему в VBA?

Не надо, решение будет выложено здесь
В разделе по VBA темы создаются только тогда, когда заведомо решение нужно на VBA

ЮMoney:41001419691823 | WMR:126292472390

Дата: Пятница, 21.07.2023, 15:25 | Сообщение № 9

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Цитата dmtgrs, 21.07.2023 в 14:34, в сообщении № 3 (

)

макросом

[vba]

Код

Sub dmtgrs()
Dim rR As Range, FRow&
FRow = WorksheetFunction.Match("Коллич человек", Columns(3), 0)
    For Each rR In Range("d3:bd4")
        If rR.Interior.Color <> 16777215 Then rR.Offset(FRow - rR.Row, 0) = rR.Offset(FRow - rR.Row, 0) + Cells(rR.Row, 2)
    Next rR
End Sub

[/vba]

К сообщению приложен файл: 20230721_dmtgrs.xls (49.0 Kb)

ЮMoney:41001419691823 | WMR:126292472390

Дата: Пятница, 21.07.2023, 15:48 | Сообщение № 10

Группа: Пользователи

Ранг: Новичок

Сообщений: 30

Репутация: 0 ±

Замечаний: 20% ±

Excel 2016

Огромное спасибо!