macro to change column to keep only last 5 characters

  • Thread starter Thread starter S Himmelrich
  • Start date Start date
Formula method.

Assuming data in column A, in B1 enter =RIGHT(A1,5) and double-click fill
handle to copy down.

Macro method. You choose the activecell.

Sub trimmit()
Dim rng As Range
Set rng = Range(ActiveCell, Cells(Rows.Count, ActiveCell.Column).End(xlUp))
For Each cell In rng
cell.Value = Right(cell.Value, 5)
Next
End Sub


Gord Dibben MS Excel MVP
 
Back
Top