Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Cleans up every selected cell

Sub FixTextInAllCells()          Dim Cell          For Each Cell In Selection              Cell.Value = Application.WorksheetFunction.Proper(Cell.Value)          Next      End Sub