changing case
Jeff,
Dim cell As Range
For Each cell In Range("A1:A5")
cell.Value = UCase(cell.Value)
Next cell
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
"Jeff" wrote in message
...
Lets say column A has the data below:
Row1: john SMITH
Row2: Jane DOE
Row3: tom brown
Row4: john doe
Row5: TOM smith
What I need is VBA code to select the range above and
change all letters to uppper-case. Thanks
|