VBA/Excel/Access/Word/String Functions/UCase

UCase() returns characters uppercase

 
Sub ucaseDemo()
    Dim userName As String
    
    userName = "First Name"
    
    Debug.Print UCase(userName)
End Sub