Make sure your Excel has the Developer Tab enabled following this tutorial.
I explain how you can do this below step by step!
What does it do?
Removes spaces at the start and end from your selection
Copy Source Code:
Sub RemoveExtraSpacesFromSelection() Dim range As Range Dim cell As Range Set range = Selection 'loop through each cell and trim them For Each cell In range If Not IsEmpty(cell) Then cell = Trim(cell) End If Next cell End Sub
These are our text that we want to clean up:
STEP 1: Go to Developer > Code > Visual Basic
STEP 2: Paste in your code and Select Save. Close the window afterwards.
STEP 3: Let us test it out!
Open the sheet containing the data. Go to Developer > Code > Macros
Make sure your text and macro are both selected. Click Run.
With just one click, all of the unneeded extra spaces are all removed!
How to Remove Extra Spaces from Selection Using Macros In Excel