Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Convert text to all caps
Is there any way to convert all text, in the range B3:M2500, to all capital
letters from within a macro? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Convert text to all caps
Hi,
Right click your sheet tab, view code and paste this in and run it Sub standard() Set myrange = Range("B3:M2500") For Each c In myrange c.Formula = UCase(c.Formula) Next End Sub Mike "Patrick C. Simonds" wrote: Is there any way to convert all text, in the range B3:M2500, to all capital letters from within a macro? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Convert text to all caps
Sub tst()
Dim rng As String Range("b3").Select Nex: Do Until ActiveCell.Row = 2501 col = Mid(ActiveCell.Address, 2, 1) rng = ActiveCell.Value ActiveCell.Value = UCase(rng) ActiveCell.Offset(1, 0).Activate Loop ActiveCell.Offset(-2498, 1).Activate If col = "N" Then End GoTo Nex End Sub "Patrick C. Simonds" wrote: Is there any way to convert all text, in the range B3:M2500, to all capital letters from within a macro? |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Convert text to all caps
Hi Patrick
For Each c in Range("B3:M2500").SpecialCells(xlCellTypeConstants ,xlTextValues) c.Value = UCase(c.Value) Next c Richard "Patrick C. Simonds" wrote in message ... Is there any way to convert all text, in the range B3:M2500, to all capital letters from within a macro? |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Convert text to all caps
Hi,
I hope there are no formula in the range, if there are this converts them to values. Mike "dmoney" wrote: Sub tst() Dim rng As String Range("b3").Select Nex: Do Until ActiveCell.Row = 2501 col = Mid(ActiveCell.Address, 2, 1) rng = ActiveCell.Value ActiveCell.Value = UCase(rng) ActiveCell.Offset(1, 0).Activate Loop ActiveCell.Offset(-2498, 1).Activate If col = "N" Then End GoTo Nex End Sub "Patrick C. Simonds" wrote: Is there any way to convert all text, in the range B3:M2500, to all capital letters from within a macro? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Convert to Caps | New Users to Excel | |||
fix all caps text to first letter caps | Excel Discussion (Misc queries) | |||
How do convert an entire column of text in Excel to all caps? | Excel Discussion (Misc queries) | |||
HOW DO I CONVERT NORMAL TEXT INTO ALL CAPS? | Excel Worksheet Functions | |||
How can I convert all Caps to first letter caps in Excel? | Excel Worksheet Functions |