Extraer Codigo de una celda y separarlos en otra celdas

[psycho99killer]

Hola , amigos de excel como se puede separar un codigo de 10 digitos en celda de 2 de 2 .

tengo  miles de codigos que tengo que separar para poder filtrar ya que en cada  2 digitos hace referencia a una marca o familia etc. .

no se si me explico bien , pero le dejo un ejemplo de como quedaría en el archivo que adjunto .

       A                        B       C     D    E       F

CATO025926           CA    TO  02   59   26

CATO095921           CA   TO   09    59   21 

CATO055922          CA   TO   05    59    22

 

MUCHAS GRACIAS POR SU GENTIL AYUDA.

SEPARAR CODIGO.xlsm

[Gerson Pineda]

Te adjunto 3 alternativas, entre otras

Con formula, power query y Vba

 

Saludos 

Dividir celda a columna_GP.xlsm

[psycho99killer]

Hola, Gerson muchas gracias por el tiempo despejar mis dudas.

vere lo de power query, es muy interesante las 3 formas de dividir una celda.

doy por resuelto el tema.

muchas gracias maestro.

 

[Antoni]

Te dejo una solución con macro:

Sub Separa()
Application.ScreenUpdating = False
For x = 2 To Range("A" & Rows.Count).End(xlUp).Row
   For y = 1 To 9 Step 2
      Cells(x, (y + 3) / 2) = Mid(Range("A" & x), y, 2)
   Next
Next
End Sub

 

[psycho99killer]

Muchas gracias sr. Antoni.

me sirvió también su código .

le agradezco su ayuda.

saludos