UCase returns a string that is all uppercase
Sub UCaseExample() Debug.Print UCase$("Hello World") 'Prints HELLO WORLD End Sub