text case

S

SUNIL PATEL

I know about UCASE and LCASE, but can you format the text "PLEASE HELP" to
"Please Help" or even to "Please help" using code.

Sunil
 
M

Myrna Larson

Sub Test()
sText = "PLEASE HELP"
sText2 = Application.Proper(sText) 'Please Help
sText3 = UCase$(Left$(sText, 1)) & LCase$(Mid$(sText, 2)) 'Please help
Debug.Print sText, sText2, sText3
End Sub
 
Top