Can I change a worksheet with all lowercase to uppercase?
--
Deborah Motte

Hello Deborah
How about a little macro to do this?
Sub ChangeIntoUpper()
For Each c In ActiveSheet.UsedRange
c.Value = UCase(c.Value)
Next c
End Sub

HTH
Cordially
Pascal

"workingwoman" a écrit dans le
message de news: ...
Can I change a worksheet with all lowercase to uppercase?
--
Deborah Motte

I would alter this macro as such.

Sub ChangeIntoUpper()
For Each c In ActiveSheet.UsedRange
c.Formula = UCase(c.Formula)
Next c
End Sub

Otherwise, if there are any formulas in the range, they would be changed to
values only.


Gord Dibben MS Excel MVP

On Fri, 14 Sep 2007 15:17:22 +0200, "papou"
wrote:

Hello Deborah
How about a little macro to do this?
Sub ChangeIntoUpper()
For Each c In ActiveSheet.UsedRange
c.Value = UCase(c.Value)
Next c
End Sub

HTH
Cordially
Pascal

"workingwoman" a écrit dans le
message de news: ...
Can I change a worksheet with all lowercase to uppercase?
--
Deborah Motte

workingwoman

You could try upper(). This could be kind of a pain as you would have to
mirror the document. The macro, if works(I don't do VBA), is probably better.

God Bless

Frank Pytel

"workingwoman" wrote:

Can I change a worksheet with all lowercase to uppercase?
--
Deborah Motte