Выделить ячейку с примечанием

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

Выделить ячейку с примечанием (Иное/Other)

Shakal07

Дата: Суббота, 16.08.2025, 12:39 | Сообщение № 1

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

Ранг: Участник

Сообщений: 62

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

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

Excel 2k3;2k7;2k10;2k13;2k19

Здравствуйте

Подскажите способ как с помощью условного форматирования выделять ячейки с примечанием.
Имеется большая пополняемая таблица. При вводе данных, если значение вызывает сомнение, добавляется для такой ячейки примечание с описанием проблемы.
Данные в ячейках содержат (текст, числа, формулы).
В таблице используется автофильтр. Примечания постоянно "убегают".
Маленький треугольник в правом верхнем углу незаметен (теряется).
Поэтому постала задача как-то выделять ячейки с такими примечаниями другим фоном.
Имеется пользовательская функция которая возвращает значения "Истина" или "Ложь"
[vba]

Код

Function Примечание(Ячейка As Range)
    Set x = Ячейка.Comment
    If Not x Is Nothing Then
        x = True
    Else
        x = False
    End If
    Примечание = x
End Function

[/vba]
Условное форматирование планируется применять как целой таблице так и к отдельным диапазонам

Спасибо за помощь
С уважением

Ответить

i691198

Дата: Суббота, 16.08.2025, 16:46 | Сообщение № 2

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

Ранг: Обитатель

Сообщений: 429

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

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

2016

Цитата Shakal07, 16.08.2025 в 12:39, в сообщении № 1 (

)

как с помощью условного форматирования выделять ячейки с примечанием

Не получится, УФ может работать только с значениями ячеек. Тут только VBA.

Ответить

DrMini

Дата: Суббота, 16.08.2025, 18:09 | Сообщение № 3

Группа: Модераторы

Ранг: Старожил

Сообщений: 2069

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

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

Excel LTSC 2024 RUS

Здравствуйте Shakal07.
Есть вариант без макроса:
Чтобы выделить на листе Excel все ячейки с примечаниями, можно использовать сочетание клавиш Ctrl+Shift+O. Потом на "Главная" выбираете "Цвет заливки" и всё.
Если этот вариант не приемлем, то могу перенести вашу тему в "Вопросы по VBA".

Ответить

Pelena

Дата: Суббота, 16.08.2025, 18:21 | Сообщение № 4

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

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

Сообщений: 19532

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

Замечаний: ±

Excel 365 & Mac Excel

Можно сделать УФ с формулой

Код

=Примечание(A1)

где Примечание - это Ваша функция.
НО создание примечания не вызывает пересчет/обновление. Поэтому подкрасится новая ячейка с примечанием только при изменении на листе или нажатии F9