Como converter retorno de carro em vírgula no Excel?
Talvez tenha várias células cujos valores estão separados por quebras de linha e precise agora de localizar todas essas quebras e substituí-las por vírgulas ou outros caracteres, tal como ilustrado na seguinte captura de ecrã. Como pode converter rápida e facilmente todas as quebras de linha em vírgulas ou noutros caracteres numa folha de cálculo?
Converter Retorno de Carro em vírgulas com fórmula
Converter Retorno de Carro em vírgulas com a função Localizar e Substituir
Converter Retorno de Carro em vírgulas com código VBA
Converter Retorno de Carro em vírgulas com fórmula
A seguinte fórmula simples pode ajudá-lo a substituir os retornos de carro por vírgulas ou outros caracteres com facilidade.
1. Introduza esta fórmula numa célula vazia junto aos seus dados:=SUBSTITUTE(A1,CHAR(10),",") (A1 indica a célula em que pretende substituir o Retorno de Carro, e a vírgula entre aspas é o caractere que pretende utilizar; pode alterá-la conforme necessário). Veja a captura de ecrã:
2. Em seguida, arraste a alça de preenchimento para o intervalo ao qual pretende aplicar esta fórmula e obterá o seguinte resultado: os retornos de carro foram substituídos por vírgulas.
Converter Retorno de Carro em vírgulas com a função Localizar e Substituir
A função Localizar e Substituir também permite converter todas as quebras de linha em vírgulas de uma só vez. Siga estes passos:
1. Selecione o intervalo de dados que pretende converter do retorno de carro.
2. Clique em Base > Localizar e Selecionar > Substituir ou utilize o atalho Ctrl + H para abrir a caixa de diálogo Localizar e Substituir. Veja a captura de ecrã:
3.Na caixa de diálogo Localizar e Substituir, no campo Localizar, prima as teclas Ctrl + J, e no campo Substituir por, introduza os caracteres pretendidos; neste caso, introduzirei a vírgula (),), veja a captura de ecrã:
4. Em seguida, clique no botão Substituir Tudo e aparecerá uma caixa de aviso a indicar quantas substituições foram efetuadas. Veja a captura de ecrã:
5. Depois, clique em OK e feche a caixa de diálogo Localizar e Substituir; todos os retornos de carro foram substituídos por vírgulas.
Converter Retorno de Carro em vírgulas com código VBA
Se tem interesse em VBA, posso mostrar-lhe um código que resolve esta tarefa.
1. Prima as teclas ALT + F11 e abrir-se-á a janela Microsoft Visual Basic para Aplicações.
2. Clique em Inserir > Módulo e cole o seguinte código na janela do Módulo.
Código VBA: Converter Retorno de Carro em vírgulas
Sub ReplaceCarriage()
'Update 20141023
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Rng.Value = Replace(Rng.Value, Chr(10), ",")
Next
End Sub
3. Em seguida, prima a tecla F5 para executar este código e aparecerá uma caixa de aviso a solicitar que selecione o intervalo de dados que pretende utilizar. Veja a captura de ecrã:
4. Em seguida, clique em OK e os retornos de carro foram imediatamente convertidos em vírgulas.
Nota:
No código acima, pode substituir a vírgula "," dentro do script Rng.Value = Replace(Rng.Value, Chr([[PH_43]]), ",") por quaisquer outros caracteres que desejar.
Artigos relacionados:
Como remover rapidamente quebras de linha no Excel?
Como dividir células em várias colunas ou linhas por retorno de carro?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos