Forum Discussion
Greg Daughenbaugh
Nov 25, 2017Copper Contributor
Microsoft Excel keeping all cells uppercase
I have a spreadsheet that several people use and would like to keep the text in a particular column always set to upper case. Regardless of case the user enters the data in this column it is saved i...
Haytham Amairah
Nov 25, 2017Silver Contributor
Greg,
This is possible, but with some lines of code!
I have a macro which is fairly good to do this task, to apply it follow these steps:
Step 1: Press Alt+F11 to open the VBA editor as shown in the below screenshot:
Step 2: Double-click on the sheet that contains the column you want.
Step 3: Copy this code to the editor, then close it.
Private Sub Worksheet_Activate() On Error Resume Next Application.ScreenUpdating = False Dim cell As Range For Each cell In Range("$A$1:" & Range("$A$1").SpecialCells(xlLastCell).Address) cell.Value = UCase(cell.Value) Next cell On Error GoTo 0 Application.ScreenUpdating = True End Sub
Step 4: Save the workbook as Macro-Enabled Workbook (*.xlsm).
After that, the macro will trigger each time you activate the worksheet.
NOTE: This macro is applied to column A in sheet1.
SM_Talal
Jul 04, 2019Copper Contributor
HI Haytham,
Hope you are doing well, I need one solution if it is possible;
I want to change a sentence written in a single cell to PROPER Case except the word(s) written in CAPITAL Letter.
For E:g 1,
From, "I love APPLE" To, "I Love APPLE"
For E:g 2,
From, "united arab emirates (UAE)" To, "United Arab Emirates (UAE)"
- Haytham AmairahJul 04, 2019Silver Contributor
Hi,
I've already replied to your separate post.
Regards,
Haytham