GoFuckYourself.com - Adult Webmaster Forum - View Single Post - how to create 1st letter of every word capital ?

PromoterX · 09-08-2011, 08:35 PM

Code:

Sub Proper_Case()

'This will make the first letter of the text within any selection of 
'cells uppercase.

For Each x In Selection
x.Value = Application.Proper(x.Value)
Next

End Sub

Why re-invent the wheel.... codes out there for the taking people.

09-08-2011, 08:35 PM
PromoterX Confirmed User Industry Role: Join Date: Sep 2010 Posts: 949	Code: Sub Proper_Case() 'This will make the first letter of the text within any selection of 'cells uppercase. For Each x In Selection x.Value = Application.Proper(x.Value) Next End Sub Why re-invent the wheel.... codes out there for the taking people.