I have tried this code shown now:
I am trying to get proper capitalization. Say, PCASE(JAMES) = James, then PCASE(MCDONALD) = McDonald.Code:Public Function PCase(anyText) As String PCase = StrConv(anyText, vbProperCase) If Left(PCase, 2) = "Mc" Then PCase = "Mc" & UCase(Mid(PCase, 3, 1)) & Mid(PCase, 3) End If Debug.Print "PCase = " & PCase End Function
What I am getting is
PCASE =
and nothing more.
I am unsure where my error is.
Any help appreciated.
Thanks in advance.
Respectfully,
Lou Reed