Jump to content

About This File

Buenas noches

 

Estimados

 

En esta oportunidad les dejo a su alcance un código para separar una cadena de texto o números que este pegados, insertando el símbolo (-)

 

Ejemplo:

Cadena original     : aaaaaaaaa

Cadena resultante : aaa-aaa-aaa

Se puede crear una lista de cadenas bien sea texto o números o los dos a la vez. Siempre que estén pegados. Igualmente funciona si está separado pero la idea es aplicarlo según sea el caso.

La idea es, ademas de conocerla es obtener otra alternativa cuando querramos hacerlo por medio de VBA y no bajo formatos personalizados.

Una vez intenté hacerlo por medio del formato personalizado pero no funcionaba con letras y números.

si alguien conocer de un mejor modo, estaré muy atento a su comentario.

P.D. Funciona cada tres letras, si gustan pueden cambiar a cuatro concatenando el código : 

& Mid(.Cells(Lin, 1), (I + 3), 1) 

'Y el Step lo incrementan a 4

Mis respetos para todos.


User Feedback

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now

There are no reviews to display.

×
×
  • Create New...

Important Information

Privacy Policy