Proper- Formula for whole document?

[Jeff]

Maybe try this?

Assume your data is on "Sheet1", go to sheet2
in Cell A1 type in =PROPER(Sheet1!A1); then
grab the cell handles (select A1 on sheet2 and
put your cursor over the lower right corner - the
cursor turns into a plus + sign) and drag it
across as far as you need. then in the same fashion
drag down.

It's quick and easy.

-----Original Message-----
I need help!!! I have a whole Excel worksheet all in

caos and need it to be in "Proper"- Cap first letter of
each word. I need to apply it to the WHOLE document, not
just whole cell. Please tell me how to input a formula
that will do that for me. Thank you!

 

[Guest]

Dear Jeff

YOU ARE A GOD!!!!! THANK YOU!!!!!!! THANK YOU!!!!!! THANK YOU!!!!!!

 

[David McRitchie]

Just a word of caution. Many spreadsheets have formulas in them.
Use of the worksheet function as described will convert formulas to
values. But then you do have to watch what you are doing no matter
what you do anyway.

You could use a smaller more conventional version without
the special capitalizations, if you have to type it manually..
But I would install the full versions on the laptop when you get
a chance. The material on the webpage allows you to run it
as a macro for a selection, or to invoke the inner macro from
another macro for any range actually wanted not necessarily
the current selection.

Sub Proper_shortversion()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Dim Cell as Range
On Error Resume Next 'In case no cells in selection
For Each Cell In Intersect(Selection, _
Selection.SpecialCells(xlConstants, xlTextValues))
Cell.Formula = StrConv(Cell.Formula,vbProperCase)
Next
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub