Определение наименования шрифта в ячейке Excel

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

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

Формула =ШРИФТИМЯ(ЯЧЕЙКА) возвращает наименование шрифта в указанной ячейки. Имеет только один аргумент:

• Ячейка - Ссылка на ячейку, шрифт которой необходимо определить

Пример

Простой пример определения шрифта в указанной ячейке

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

Код на VBA

Код достаточно простой и не требует разъяснений.

Function ШРИФТИМЯ(ЯЧЕЙКА As Range) As String
    ШРИФТИМЯ = ЯЧЕЙКА.Font.Name
End Function