La función VBA de UCASE convierte una cadena de caracteres a mayúsculas.
UCase(texto)
Convertir una cadena a mayúsculas:
Sub UCaseExample() text = "Ref-45-X-876-rt" text = UCase(text) MsgBox text 'Devoluciones: REF-45-X-876-RT End Sub