View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Bob Phillips
 
Posts: n/a
Default Change case of text

No, that is a word-processor function. In Excel you would have to create it.
I have a UDF that does sentence case. I am sure it could easily be adapted
to act like Word's F3

Public Function SentenceCase(ByVal para As String) As String
Dim oRegExp As Object
Dim oMatch As Object
Dim oMatches As Object

para = LCase(para)
Set oRegExp = CreateObject("VBScript.RegExp")
oRegExp.Pattern = "^[a-z]|\.( )*[a-z]"
oRegExp.Global = True
Set oMatches = oRegExp.Execute(para)
For Each oMatch In oMatches
With oMatch
Mid(para, .FirstIndex + 1 + .Length - 1, 1) = _
UCase(Mid(para, .FirstIndex + 1 + .Length - 1, 1))
End With
Next oMatch
SentenceCase = para
End Function

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Ferd" wrote in message
...
Is there a 'change case' shortcut found in Excel, similar to the one found

in
Office Word - under format?