La función VBA LCASE convierte una cadena de caracteres a minúsculas.
LCase(texto)
Usando la función LCase para convertir una cadena a minúsculas:
Sub LCaseExample1() text = "Example@MOONEXCEL.com.ua" text = LCase(text) MsgBox text 'Devoluciones: example@moonexcel.com.ua End Sub
Usando la función LCase para verificar si una cadena está en minúsculas:
Sub LCaseExample2() nickname = "Treecher_21" 'Comprobamos si el apodo (nickname) es igual a su valor convertido a minúsculas If nickname = LCase(nickname) Then MsgBox "Sí, todos los caracteres de alias están en minúsculas." Else MsgBox "No, el apodo contiene letras mayúsculas." 'Este resultado se mostrará End If End Sub