Hello,

Than you for your help! The code works great!

jfcby

wrote:
Try:

Sub TestData()
Dim MyCell As Range
For Each MyCell In Selection
If Left(MyCell.Value, 2) = "CO" Then
MyCell.Value = Right(MyCell.Value, Len(MyCell.Value) - 2) & "CO"
End If
Next
End Sub

Alan

jfcby wrote:
Hello,

I have 100 worksheets with 3 columns of data and 1 row to 500 rows. In
column C my data looks like so
125
252
CO125
CO314
MECH
MECH2

This is my question -
How can I change my data in the cells with CO125 or CO314 to look like
this 125CO or 314CO?

I've searched for code to help me but I've been unsuccessful! Please
Help!

Thank you for help,
jfcby