simple question

[excel smurf]

is there a way to capitalize text without retyping the text and without using the upper function? like perhaps a macro?

 

[Jim North]

like:

<pre>
Sub Uppercase()
' Loop to cycle through each cell in the specified range.
For Each x In Range("A1:A5")
' Change the text in the range to uppercase letters.
x.Value = UCase(x.value)
Next
End Sub
</pre>

 

[lenze]

Download Chip Pearson's Case Converter add-in

http://www.cpearson.com/excel/download.htm

 

[excel smurf]

thanks for the tips, greatly appreciated!!!!

 

[ChrisUK]

Can't see why you'd want to do this but here you go ..

x = Cells(1, 1).Value
z = ""
For y = 1 To Len(x)
If (Asc(Mid(x, y, 1)) > 96 And Asc(Mid(x, y, 1)) < 124) Then
z = z & Chr(Asc(Mid(x, y, 1)) - 32)
Else
z = z & Mid(x, y, 1)
End If
Next

Cells(2, 1).Value = z

 

[kskinne]

ASAP utilities is another add-in that you can download - it contains an option for converting a range of cells to upper case, lower case, proper, etc. - in addition it has many other utilities that I have found to be very useful. You can download it for free at

http://www.asap-utilities.com

HTH
kevin

 

[Joe Was]

This contains three ways of doing it by code. JSW

http://www.mrexcel.com/board/viewtopic.php?topic=21389&forum=2