Проверка наличия подчеркивания формулой Excel

Функция ЕПОДЧЕРКН проверяет наличие подчеркивания в тексте и возвращает значение ИСТИНА если текст подчеркнут и ЛОЖЬ в противном случае.

Описание функции

Функция =ЕПОДЧЕРКН(ЯЧЕЙКА) возвращает значение ИСТИНА если текст в указанной ячейке подчеркнут и ЛОЖЬ если подчеркивание отсутствует. Функция имеет всего один аргумент.

  • ЯЧЕЙКА - ссылка на ячейку в которой необходимо проверить текст на наличие подчеркивания.

Пример

Проверка подчеркивания в ячейке

Так как изменение шрифта в Excel не влечет за собой пересчет формул, то данная функция не обновляется автоматически! Для обновления данных пользуйтесь пересчетом листа Ctrl + Alt + F9

Код на VBA

Function ЕПОДЧЕРКН(ЯЧЕЙКА As Range) As Boolean
   ЕПОДЧЕРКН = False
 
   Select Case ЯЧЕЙКА.Font.Underline
      Case xlUnderlineStyleSingle
         ЕПОДЧЕРКН = True
      Case xlUnderlineStyleDouble
         ЕПОДЧЕРКН = True
   End Select
End Function
Надстройка
VBA-Excel
Надстройка для Excel содержит большой набор полезных функций, с помощью которых вы значительно сократите время и увеличите скорость работы с программой.