Boa tarde depoisteconto

Sempre será uma virgula separando os números?

@carlosrgs

Sim, sempre separados por virgula, e também serão sempre 6 digitos.

Então é simples, não precisa nem de VBA

Se são sempre 6 dígitos, separados por virgulas, então os números variam a cada 7 caracteres

1 - EXT.TEXTO($A$4;1;6)

2 - EXT.TEXTO($A$4;8;6)

3 - EXT.TEXTO($A$4;15;6)

4 - EXT.TEXTO($A$4;22;6)

5 - EXT.TEXTO($A$4;29;6)

Caso mudar a quantidade de caracteres, ai sim talvez precise de VBA!

@carlosrgs

Carlos, obrigado pela sugestão, mas essa rotina de separar os números, fazem parte de outro código mais extenso. De modo que eu gostaria de adicionar uma rotina por VBA.

Valores = Plan1.[A4]

Vlr1 = Mid(Valores, 1, 6)
Vlr2 = Mid(Valores, 8, 6)
Vlr3 = Mid(Valores, 15, 6)
Vlr4 = Mid(Valores, 22, 6)
Vlr5 = Mid(Valores, 29, 6)
MsgBox Vlr1 & "," & Vlr2 & "," & Vlr3 & "," & Vlr4 & "," & Vlr5

Tente adaptar isso, é a função EXT.TEXTO no VBA

@carlosrgs

Obrigado pela sugestão.

Ajudou a clarear a ideia aqui. 😆