Como substituir vírgulas por novas linhas (Alt + Enter) em células no Excel?

Como mostra a captura de tela à esquerda, como substituir vírgulas por novas linhas dentro de células no Excel? Os métodos neste artigo podem ajudá-lo.

Substituir vírgulas por novas linhas com a função Localizar e Substituir
Substituir vírgulas por novas linhas com código VBA

Substituir vírgulas por novas linhas com a função Localizar e Substituir.

Você pode aplicar a função Localizar e Substituir para substituir todas as vírgulas nas células selecionadas por novas linhas. Por favor, siga os passos abaixo.

1. Selecione as células onde você substituirá todas as vírgulas por novas linhas. Em seguida, clique em Página Inicial > Localizar e Selecionar > Substituir. Veja a captura de tela:

Observação: Você também pode pressionar as teclas Ctrl + H juntas para abrir a caixa de diálogo Localizar e Substituir.

2. Na caixa de diálogo Localizar e Substituir que se abre e na aba Substituir, você precisa:

3. Em seguida, aparecerá uma caixa de aviso do Microsoft Excel, por favor, clique no botão OK.

4. Feche a caixa de diálogo Localizar e Substituir.

Agora todas as vírgulas foram substituídas por novas linhas nas células selecionadas.

Desbloqueie a Magia do Excel com o Kutools AI

• Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
• Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
• Codificação VBA: Escreva e implemente código VBA sem esforço.
• Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
• Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.

Potencialize suas capacidades no Excel com ferramentas alimentadas por IA. Baixe Agora e experimente uma eficiência como nunca antes!

Substituir vírgulas por novas linhas com código VBA

Esta seção apresentará um código VBA para substituir todas as vírgulas nas células selecionadas por novas linhas. Por favor, siga os passos abaixo.

1. Selecione as células contendo as vírgulas que você precisa substituir por novas linhas, depois pressione simultaneamente as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Na janela Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Depois copie e cole o código VBA na janela Código. Veja a captura de tela:

Código VBA: Substituir todas as vírgulas nas células selecionadas por novas linhas

Sub ReplaceComma()
Dim rngCell As Range
  For Each rngCell In Selection
    rngCell.Value = Replace(rngCell, ",", vbLf)
  Next
End Sub

3. Pressione a tecla F5 ou clique no botão Executar para executar o código. Então, todas as vírgulas nas células selecionadas serão substituídas por novas linhas imediatamente.

Artigo relacionado:

• Como substituir a última vírgula por 'e' em células no Excel?
• Como dividir o conteúdo de células de várias linhas em linhas/colunas separadas no Excel?
• Como colocar várias linhas de texto em uma célula no Excel?