Página 1 de 1

Macro p/ célula com "Quebra de Texto"

Enviado: 04 Nov 2019 às 09:56
por EmersonSwistalski
Bom dia!

Tenho a seguinte situação:
Preciso de uma macro para converter uma célula em várias, criei uma planilha de exemplo apenas para demonstração.
Eu gostaria que os valores da célula "E7" fossem transportados para E8, E9, [...]
Já tentei várias coisas, mas sem sucesso. Nesse exemplo é apenas uma situação, na minha planilha real tenho vários casos que preciso "converter"

Re: Macro p/ célula com "Quebra de Texto"

Enviado: 04 Nov 2019 às 11:47
por osvaldomp
Experimente:
Código: Selecionar todos
Sub teste()
 Application.DisplayAlerts = False
 [E7].Justify
 Application.DisplayAlerts = True
End Sub