Функция VBA LCASE преобразует строку символов в нижний регистр.
LCase(текст)
Использование функции LCase для преобразования строки в нижний регистр:
Sub LCaseExample1() text = "Example@MOONEXCEL.com.ua" text = LCase(text) MsgBox text 'Возвращает: example@moonexcel.com.ua End Sub
Использование функции LCase для проверки, есть ли строка в нижнем регистре:
Sub LCaseExample2() nickname="Treecher_21" 'Проверяем, равен ли псевдоним (nickname) его значению, преобразованному в нижний регистр If nickname = LCase(nickname) Then MsgBox "Да, все символы псевдонима в нижнем регистре." Else MsgBox "Нет, псевдоним содержит заглавные буквы." 'Отобразится этот результат End If End Sub