Проверка наличия русского текста в ячейке Excel

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

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

Функция =ЕКИРИЛЛ(ТЕКСТ) имеет один аргумент

  • ТЕКСТ - строка или ссылка на ячейку, в которой необходимо проверить наличие кириллицы.

Ниже приведен пример работы данной формулы.

Пример

Пример проверки наличия в тексте кириллицы.

Пример 1 функции ЕКИРИЛЛ

Код на VBA

Код функции на VBA для самостоятельного использования 

Public Function ЕКИРИЛЛ(ТЕКСТ As String) As Boolean
    Dim SimbolKirill As String
 
    ТЕКСТ = LCase(ТЕКСТ)
    SimbolKirill = "*[абвгдеёжзийклмнопрстуфхцчшщьыъэюя]*"
 
    If ТЕКСТ Like SimbolKirill Then
        ЕКИРИЛЛ = True
    Else
        ЕКИРИЛЛ = False
    End If
End Function
Надстройка
VBA-Excel
Надстройка для Excel содержит большой набор полезных функций, с помощью которых вы значительно сократите время и увеличите скорость работы с программой.

Рекомендуем к прочтению

Комментарии:

comments powered by Disqus