Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Macro not working in 2007
I had the below macro to change text into Uppercase in Excel 2003 but now in
2007 it doesn't work. It seems to get stuck on the For Each x. Can anyone tell me why? Thanks Rick Sub Uppercase() ' Loop to cycle through each cell in the specified range. For Each x In Range(Selection, Selection.End(xlDown)) ' Change the text in the range to uppercase letters. x.Value = UCase(x.Value) Next End Sub |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Macro not working in 2007
Hi Rick
What is the error message? But never mind, obviously the code is correct, so i would think this is probably due to the missing declaration of x. In which case amend: Sub Uppercase() ' Loop to cycle through each cell in the specified range. Dim x As Range For Each x In Range(Selection, Selection.End(xlDown)) ' Change the text in the range to uppercase letters. x.Value = UCase(x.Value) Next x End Sub HTH Cordially Pascal "Rick" a écrit dans le message de news: ... I had the below macro to change text into Uppercase in Excel 2003 but now in 2007 it doesn't work. It seems to get stuck on the For Each x. Can anyone tell me why? Thanks Rick Sub Uppercase() ' Loop to cycle through each cell in the specified range. For Each x In Range(Selection, Selection.End(xlDown)) ' Change the text in the range to uppercase letters. x.Value = UCase(x.Value) Next End Sub |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Macro not working in 2007
Thanks that fixed it. It seems strange because the macro used to work as it
was. "papou" wrote: Hi Rick What is the error message? But never mind, obviously the code is correct, so i would think this is probably due to the missing declaration of x. In which case amend: Sub Uppercase() ' Loop to cycle through each cell in the specified range. Dim x As Range For Each x In Range(Selection, Selection.End(xlDown)) ' Change the text in the range to uppercase letters. x.Value = UCase(x.Value) Next x End Sub HTH Cordially Pascal "Rick" a écrit dans le message de news: ... I had the below macro to change text into Uppercase in Excel 2003 but now in 2007 it doesn't work. It seems to get stuck on the For Each x. Can anyone tell me why? Thanks Rick Sub Uppercase() ' Loop to cycle through each cell in the specified range. For Each x In Range(Selection, Selection.End(xlDown)) ' Change the text in the range to uppercase letters. x.Value = UCase(x.Value) Next End Sub |
#5
Posted to microsoft.public.excel.misc
|
|||
|
|||
Macro not working in 2007
Rick
Just a head's up. Are you aware that your macro will wipe out any formulas you may have in the range? Maybe a change.............? Sub Uppercase() ' Loop to cycle through each cell in the specified range. Dim x As Range For Each x In Range(Selection, Selection.End(xlDown)) ' Change the text in the range to uppercase letters. If Not x.HasFormula Then x.Value = UCase(x.Value) End If Next x End Sub Gord Dibben MS Excel MVP On Wed, 1 Oct 2008 01:30:01 -0700, Rick wrote: Thanks that fixed it. It seems strange because the macro used to work as it was. "papou" wrote: Hi Rick What is the error message? But never mind, obviously the code is correct, so i would think this is probably due to the missing declaration of x. In which case amend: Sub Uppercase() ' Loop to cycle through each cell in the specified range. Dim x As Range For Each x In Range(Selection, Selection.End(xlDown)) ' Change the text in the range to uppercase letters. x.Value = UCase(x.Value) Next x End Sub HTH Cordially Pascal "Rick" a écrit dans le message de news: ... I had the below macro to change text into Uppercase in Excel 2003 but now in 2007 it doesn't work. It seems to get stuck on the For Each x. Can anyone tell me why? Thanks Rick Sub Uppercase() ' Loop to cycle through each cell in the specified range. For Each x In Range(Selection, Selection.End(xlDown)) ' Change the text in the range to uppercase letters. x.Value = UCase(x.Value) Next End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
F2 Key not working in Excel 2007 | Excel Discussion (Misc queries) | |||
Working Between Excell 2003 & 2007 | Excel Worksheet Functions | |||
Watch Window not working in 2007 | Setting up and Configuration of Excel | |||
Excel 2007 - sum function not working | Excel Worksheet Functions | |||
Excel 2007 Macro Help (Excel 2003 not working in 2007) | Excel Discussion (Misc queries) |