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

Функция ШРИФТИМЯ на VBA поможет определить название шрифта в указанной ячейке Excel

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

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

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

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

Пример

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

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

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

Код на VBA

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

Function ШРИФТИМЯ(ЯЧЕЙКА As Range) As String
    ШРИФТИМЯ = ЯЧЕЙКА.Font.Name
End Function
Надстройка
VBA-Excel
Надстройка для Excel содержит большой набор полезных функций, с помощью которых вы значительно сократите время и увеличите скорость работы с программой.