Change entire column from upper to proper

[Bob]

I know how to do a single entry in a column, but is it
possible to do an entire column at one time?

 

[Peo Sjoblom]

Put the value in A1, press ctrl + shift & down arrow, press ctrl + d
to fill row do the same but instead of down arrow use right arrow and ctrl +
r

 

[Chip Pearson]

Bob,

In a blank column next to your data, enter =PROPER(A1) where A1 is the first
cell of your data, and copy this down as far as you need to go. Then, copy
these cells and do a Paste Special / Values over the original data. Finally,
delete the column with the formulas.

 

[Peo Sjoblom]

Apologize,

never read the subject.

 

[Dennis]

Hers's a macro..

Sub ToProper()
Dim c As Range
Application.ScreenUpdating = False
For Each c In ActiveSheet.UsedRange
If c.HasFormula = False Then
c.Value = StrConv(c.Value, vbProperCase)
End If
Next c
Application.ScreenUpdating = True
End Sub


Dennis
========