Посчитать количество дней, которые не выделены жирным

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Посчитать количество дней, которые не выделены жирным - Мир MS Excel

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

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

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Посчитать количество дней, которые не выделены жирным (Формулы/Formulas)

Посчитать количество дней, которые не выделены жирным

anna

Дата: Пятница, 14.09.2018, 15:05 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 108

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

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

Добрый день.

Подскажите, возможно ли посчитать количество дней по принципу (все дни невыделенные жирным и цветным)?

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

Ответить

Pelena

Дата: Пятница, 14.09.2018, 17:34 | Сообщение № 2

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

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

Сообщений: 19184

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

Замечаний: ±

Excel 365 & Mac Excel

Здравствуйте.
Можно пользовательской функцией. Макросы должны быть разрешены
[vba]

Код

Function СчетЧерных(rng As Range)
    Application.Volatile
    Dim cl As Range
    For Each cl In rng
        If cl.Font.Color = 0 And cl.Font.Bold = False And cl <> "" Then СчетЧерных = СчетЧерных + 1
    Next cl
End Function

[/vba]

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

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

Страница 1 из 1
1