Como remover espaços extras nas células no Excel?
Quando importa dados para o Excel a partir de uma fonte externa — Intervalo de Origem —, estes incluem frequentemente espaços extra. Se não pretende esses espaços desnecessários, como os remove? Neste artigo, apresentamos algumas formas eficazes de remover espaços extras nas células.
Remover espaços extras com TRIM no Excel
Remover espaços extras com VBA
Remover espaços extras com Kutools para Excel
Remover espaços extras com TRIM no Excel
No Excel, pode remover espaços extra com a função TRIM. Siga estes passos:
Passo 1. Introduza a fórmula =TRIM(A1) na célula B1, adjacente à célula A1; veja a imagem:
Passo 2. Prima a tecla Enter e selecione B1; depois, arraste a alça de preenchimento sobre o intervalo de células ao qual pretende aplicar esta fórmula. Todos os espaços extra entre caracteres foram removidos do intervalo. Veja a imagem:
Dica—: 1. Como são fórmulas, ao copiá-las e colá-las noutros locais, deve colá-las como valores.
Remover espaços extras com VBA
Com VBA, pode também remover espaços extra.
1. Mantenha premida a tecla ALT e prima F11 no teclado para abrir uma janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e copie o código VBA para o módulo.
VBA: Remover espaços extras:
Sub TrimExcessSpaces()
'Update 20130815
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 = Application.WorksheetFunction.Trim(Rng.Value)
Next
End Sub
3. Clique no botão Executar ou prima a tecla F5 para executar o VBA. Irá surgir uma caixa de diálogo a solicitar que selecione o intervalo do qual pretende remover os espaços em excesso; veja a imagem:
4. Depois, clique em OK; os espaços extra foram removidos das células. Veja a imagem:
Remover espaços extras com Kutools para Excel
Se tiver o Kutools para Excel instalado, com a função Remover Espaços pode remover espaços extras de forma rápida e fácil.
Kutools para Excel inclui mais de 300 ferramentas práticas para o Excel. Experimente gratuitamente e sem limitações durante 30 dias! Obtenha já
Aplique a função Remover Espaços clicando em Kutools > Texto > Remover Espaços.
Passo 1. Selecione o intervalo de células no qual pretende remover os espaços extra.
Passo 2. Clique em Kutools > Texto > Remover Espaços e será apresentada uma caixa de diálogo. Veja a imagem:
Passo 3. Marque a opção Todos os Espaços Extras na secção Tipo de Espaço.
Passo 4. Clique em Ok ou em Aplicar para remover todos os espaços extra nas células.
Kutools para Excel's Remover Espaçostambém permite remover apenas Espaços à Frente, Espaços Atrás, espaços iniciais e finais ou todos os espaços.Clique aqui para saber mais sobre Remover Espaços.
Artigos relacionados:
- Remover Espaços Atrás das células
- Remover Espaços à Frente nas células
- Remover Espaços entre caracteres e números dentro das células
- Remover espaços iniciais e Espaços Atrás
- Remover indentações dentro das células
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