Replace specific character in specific position

[BMR]

I have a list of SKUs in a column and need to replace a specific number in a specific place of a cell.

A SKU is 5 digits followed by 4 letters. Ex - 25642BKLG

I need anything that has a 5 in the 2nd position to have that 5 replaced with a 2.

So 25642 would need to be changed to 22642.


For clarification, consider the following SKU list.

21526AABB
21527AABB
22627AABB
22628AABB
23647AABB
25627AABB -----> 22627AABB
25628AABB -----> 22628AABB
27665AABB
29110AABB

 

[West Man]

Try: =IF(MID(A2,2,1)="5",LEFT(A2,1)&"2"&RIGHT(A2,7),A2)

 

[MickG]

Try this:-

[COLOR="Navy"]Sub[/COLOR] MG22Jul54
[COLOR="Navy"]Dim[/COLOR] Rng [COLOR="Navy"]As[/COLOR] Range, Dn [COLOR="Navy"]As[/COLOR] Range
[COLOR="Navy"]Set[/COLOR] Rng = Range(Range("A1"), Range("A" & Rows.Count).End(xlUp))
[COLOR="Navy"]For[/COLOR] [COLOR="Navy"]Each[/COLOR] Dn [COLOR="Navy"]In[/COLOR] Rng
    [COLOR="Navy"]If[/COLOR] Mid(Dn, 2, 1) = 5 [COLOR="Navy"]Then[/COLOR]
        Dn.Characters(2, 1).Text = 2
    [COLOR="Navy"]End[/COLOR] If
[COLOR="Navy"]Next[/COLOR] Dn
[COLOR="Navy"]End[/COLOR] [COLOR="Navy"]Sub[/COLOR]

Regards Mick