You could run a macro like the following to do that:
Sub UpperCase()
For Each oCell In ActiveSheet.UsedRange
oCell.Formula = UCase(oCell.Formula)
Next oCell
End Sub
NOTE: This preserves any formulae on the worksheet, whereas changing:
oCell.Formula = UCase(oCell.Formula)
to:
oCell.Value = UCase(oCell.Value)
would convert any formula to their results (in upper case)
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.