график с автоматическим подсчетом ячеек по цвету

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

график с автоматическим подсчетом ячеек по цвету (Формулы/Formulas)

bizon84k

Дата: Среда, 04.01.2023, 15:24 | Сообщение № 1

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

Ранг: Прохожий

Сообщений: 4

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

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

2019

Всем доброго дня! Помогите пожалуйста в создании таблицы с графиком дежурств на кассе, с автоматическим подсчетом часов на кассе за день и за месяц. К примеру, я составляю график на завтра-и смены на каждого сотрудника автоматически считаются и вносятся в отдельный столбец "Кол-во часов на кассе" и также вносятся на отдельный лист как в дневную графу, так и в графу за месяц "Итого". Как подсчитать ячейки желтого цвета с помощью VBA я нашел, но вот с автоматическим подсчетом беда( Возможно задача не сложная, но не могу справиться с ней( выручайте

К сообщению приложен файл: 0086318.xlsm (16.0 Kb)

Ответить

gling

Дата: Среда, 04.01.2023, 17:03 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2563

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

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

2010

Цитата bizon84k, 04.01.2023 в 15:24, в сообщении № 1 (

)

Как подсчитать ячейки желтого цвета с помощью VBA я нашел

Если это на каждом листе посчитаете, то для каждого дня, на листе "Месяц" воспользуйтесь формулой

Код

=ЕСЛИОШИБКА(ВПР($A2;ДВССЫЛ("'"&ТЕКСТ(B$1;"Д")&"'!A1:M20");13;);)

К сообщению приложен файл: 4246892.xlsm (16.5 Kb)

ЯД-41001506838083

Сообщение отредактировал gling - Среда, 04.01.2023, 17:29

Ответить

Gustav

Дата: Среда, 04.01.2023, 17:17 | Сообщение № 3

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

Ранг: Участник клуба

Сообщений: 2797

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

Замечаний: ±

начинал с Excel 4.0, видел 2.1

bizon84k, что Вам мешает не просто красить ячейку жёлтым, а вводить туда какой-нибудь осязаемый символ, например, 1? Тогда не надо писать функции на VBA и преодолевать их способность не всегда пересчитываться.

Можно сделать жёлтыми и шрифт, и заливку, чтобы внешне была видна только заливка. В идеале нужно просто настроить условное форматирование (УФ) - делаете для условия "значение = 1", как уже сказано, шрифт и заливку одним цветом (жёлтым). И дальше вводите только единички в нужные клетки, и они автоматически становятся жёлтыми, не отображая саму единичку. Зато кол-во часов на кассе подсчитывается с помощью элементарной функции СУММ, без какого-либо VBA.

Умеете с УФ работать?