You can run a macro, open the wb, press alt + F11,
click insert>module and paste in the following
Sub PropCase()
Application.DisplayAlerts = False
Dim R As Range
For Each R In Selection.Cells
If R.HasFormula Then
R.Formula = "=PROPER(" & Mid(R.Formula, 2) & ")"
Else
R.Value = Application.Proper(R.Value)
End If
Next
Application.DisplayAlerts = True
End Sub
beware of line wrapping
press alt + Q to close the VBE, select the taxt and press alt + F8 and
double click the macro name
Regards,
Peo Sjoblom