Ir para o conteúdo principal

Como adicionar espaço entre os caracteres ou cada dígito no Excel?

Supondo que você tenha uma lista de sequências de texto ou números, para adicionar espaço entre os caracteres ou todos os dígitos, o que você pode fazer? Os métodos a seguir podem ajudá-lo a resolver esse problema.

Adicione espaço entre os caracteres ou cada dígito com função definida pelo usuário
Adicione espaço entre caracteres ou cada dígito com o Kutools para Excel


Adicione espaço entre os caracteres ou cada dígito com função definida pelo usuário

Você pode usar a seguinte função definida pelo usuário para adicionar espaço entre os caracteres ou todos os dígitos no Excel.

1. Pressione outro + F11 simultaneamente para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para aplicativos janela, clique em inserção > Módulo. Em seguida, copie e cole o código a seguir na janela Módulo.

Código VBA: adicione espaço entre caracteres ou todos os dígitos
Function AddSpace(Str As String) As String
    Dim i As Long
    For i = 1 To Len(Str)
        AddSpace = AddSpace & Mid(Str, i, 1) & " "
    Next i
    AddSpace = Trim(AddSpace)
End Function

3. Pressione outro + Q chaves para fechar o Microsoft Visual Basic para Aplicações janela e volte para a janela do Excel.

4. Selecione uma célula em branco, insira a fórmula = AddSpace (B2) na barra de fórmulas e, em seguida, pressione o botão Entrar chave.

Neste caso, você pode ver que os espaços são adicionados entre os caracteres da célula B2.

doc adicionar espaço entre os caracteres 1

Note: Para adicionar espaço entre todos os dígitos, altere a referência da célula na fórmula para aquela com os números que você precisa.


Adicione espaço entre caracteres ou cada dígito com o Kutools para Excel

Se o código VBA é complicado para você, você pode tentar o Adicionar texto utilidade de Kutools for Excel. Faça o seguinte.

Antes de aplicar Kutools for Excel, Por favor baixe e instale primeiro.

1. Selecione as células de que você precisa para adicionar espaço entre os caracteres ou todos os dígitos e clique em Kutools > Texto > Adicionar texto. Veja a imagem:

2. No Adicionar texto caixa de diálogo, clique no Texto caixa e pressione o Espaço tecla uma vez para inserir um espaço na caixa de texto e, em seguida, selecione a Apenas adicione a opção.

Para adicionar espaço entre os caracteres:

Escolha 1ª letra é maiúscula / minúscula opção na lista suspensa e, finalmente, clique no OK botão.

Para adicionar espaço entre todos os dígitos:

Escolha O primeiro personagem é um número opção na lista suspensa e, finalmente, clique no OK botão.

doc adicionar espaço entre os caracteres 1

Em seguida, os espaços são adicionados entre os caracteres ou cada dígito das células especificadas.

  Se você quiser ter um teste gratuito (30 dias) deste utilitário, por favor clique para fazer o downloade, em seguida, aplique a operação de acordo com as etapas acima.


Adicione espaço entre caracteres ou cada dígito com o Kutools para Excel


Artigos relacionados:

Melhores ferramentas de produtividade de escritório

Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...

guia kte 201905


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Can you do this example with the formula according to old versions?
This comment was minimized by the moderator on the site
Can you do this example with the formula according to old versions?
This comment was minimized by the moderator on the site
Can you do this example with the formula according to old versions?
This comment was minimized by the moderator on the site
Hi, how can I change the VBA code to have a space between every second and third character (so to group the first 2 characters, then a space)
and subsequently for any additional space I want to add, but not after every character.

Thanks in advance
This comment was minimized by the moderator on the site
AddSpace is an awesome hack. Thanks.I wanted to convert text into columns such that each character was in a different column. Insert text to column was unable to achieve it because characters need to separated. So, I used addspace function from this page and then converted text into columns and it worked. :)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations