Como remover/excluir todos os espaços após o último caractere no Excel?
Para excluir todos os espaços após o último caractere (espaços à direita) das células, o que você faria? Este artigo mostrará dois métodos para lidar com isso.
Remover todos os espaços após o último caractere com código VBA
Remova facilmente todos os espaços após o último caractere com o Kutools para Excel
Remover todos os espaços após o último caractere com código VBA
O seguinte código VBA pode ajudá-lo a remover todos os espaços após o último caractere das células.
1. Selecione as células das quais você precisa remover todos os espaços após o último caractere e, em seguida, 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. Em seguida, copie e cole o seguinte código VBA na janela Módulo.
Código VBA: Remover todos os espaços após o último caractere
Sub NoSpaces()
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In xRg
xCell.Value = RTrim(xCell.Value)
Next
Application.ScreenUpdating = True
End Sub3. Pressione a tecla F5 para executar o código; em seguida, uma caixa de diálogo do Kutools para Excel aparecerá. Por favor, selecione o intervalo do qual você precisa remover todos os espaços após o último caractere e, em seguida, clique no botão OK.
Agora, todos os espaços após o último caractere das células selecionadas são removidos imediatamente.
Remova facilmente todos os espaços após o último caractere com o Kutools para Excel
Nesta seção, recomendaremos a você a ferramenta Remover Espaços do Kutools para Excel. Com essa ferramenta, você pode remover não apenas os espaços à direita, mas qualquer tipo de espaço, como espaços à frente ou excessivos, com apenas alguns cliques conforme necessário.
1. Selecione o intervalo de células do qual você precisa remover todos os espaços após o último caractere. Em seguida, clique em Kutools > Texto > Remover Espaços. Veja a captura de tela:
2. Na caixa de diálogo Remover Espaços, selecione a opção Espaços Atrás e, em seguida, clique no botão OK. Veja a captura de tela:
Então, todos os espaços após o último caractere das células selecionadas são removidos de uma vez.
Observação: Se você deseja remover todos os espaços à frente ou outros espaços conforme necessário, selecione a opção correspondente na caixa de diálogo Remover Espaços e aplique a função.
Se você deseja experimentar este utilitário gratuitamente (30 dias), clique para baixá-lo e, em seguida, vá aplicar a operação de acordo com as etapas acima.
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins