View Single Post
  #3   Report Post  
Harlan Grove
 
Posts: n/a
Default

"Winsome" wrote...
When there is a column of text how do I change the text in the whole column
to UPPERCASE in one step?


You don't unless you have a macro to do this for you. If no macro, you could
use formulas, but it requires more than one step. To capitalize A1:A1000, if
col X were empty, enter =UPPER(A1) in X1, fill X1 down into X2:X1000, select
X1:X1000, Edit Copy, select A1, Edit Paste Special as values, then clear
X1:X1000.

If you want a macro to do this, the following one will capitalize all cells
containing text constants in the selected range.


Sub uc()
Dim c As Range, r As Range

If Not TypeOf Selection Is Range Then Exit Sub

On Error Resume Next
Set r = Selection.SpecialCells(xlCellTypeConstants, 2)
If Err.Number < 0 Then
Err.Clear
Exit Sub
End If
On Error Goto 0

For Each c In r
c.Value = UCase(c.Value)
Next c
End Sub