Ir para o conteúdo principal

Como adicionar texto no meio das células selecionadas no Excel?

Suponha que você tenha uma lista de dados composta com uma letra inicial G e outros números, e agora você deseja adicionar outra letra D após a primeira letra G à lista inteira. Veja a captura de tela abaixo.

Como você pode fazer para conseguir isso? Pois adicionar a letra às células uma a uma parece uma perda de tempo durante o seu trabalho. Neste artigo, mostraremos como adicionar texto no meio de células selecionadas no Excel com métodos eficientes.

Adicionar texto no meio das células selecionadas com fórmula
Adicionar texto no meio das células selecionadas com código VBA
Adicione texto no meio das células selecionadas com o Kutools para Excel


Adicionar texto no meio das células selecionadas com fórmula

Nesta seção, forneceremos a fórmula para adicionar texto no meio das células selecionadas. Faça o seguinte.

1. Este método deve ser feito com uma coluna de ajuda. Selecione a célula em branco adjacente aos dados originais, aqui eu seleciono a célula B2.

2. Copie e cole a fórmula = ESQUERDA (A2,1) & "D" e MID (A2,2,100) na barra de fórmulas e, em seguida, pressione o botão Entrar chave. Veja a imagem:

Notas:

  • 1). Na fórmula, o número 1 significa que o texto será adicionado após o primeiro caractere da célula.
  • 2). Os números 2 e 100 indicam que os caracteres do segundo ao centésimo da célula original serão adicionados após o novo texto inserido.
  • 3). Se você quiser adicionar texto após o segundo caractere, altere o número 1 para 2 e 2 para 3 na fórmula.
  • 4). E o caractere “D” é o texto que você adicionará à célula. Altere-o com base nas suas necessidades.

3. Selecione a célula B2, arraste o indicador de preenchimento para baixo até a célula que deseja cobrir com esta fórmula. Você pode ver que o texto é adicionado no meio das células em toda a lista.

Tips: Além da fórmula acima, você também pode aplicar esta fórmula = REPLACE (A2,2,0, "D"), (o número 2 indica o local onde você deseja inserir o texto, e a letra D refere-se ao texto que você precisa adicionar, você pode alterá-los de acordo com sua necessidade) e pressione a tecla Enter para obter o resultado.


Adicione texto no início ou no final de todas as células selecionadas no Excel:

Kutools para Excel's Adicionar texto O utilitário pode adicionar rapidamente o texto especificado no início ou no final das células em uma seleção no Excel.
Baixe agora a trilha gratuita completa de 30 dias do Kutools para Excel!


Adicionar texto no meio das células selecionadas com código VBA

Além disso, você pode adicionar texto no meio das células selecionadas com o código VBA.

1. Pressione outro + F11 para abrir o Aplicativos Microsoft Visual Basic janela.

2. Clique inserção > Módulo. Em seguida, copie e cole o código VBA abaixo no editor de código.

Código VBA: adicione texto a uma lista de dados após o primeiro caractere

Sub AddString()
	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 = VBA.Left(Rng.Value, 1) & "D" & VBA.Mid(Rng.Value, 2, VBA.Len(Rng.Value) - 1)
	Next
End Sub

3. Pressione F5 chave para executar o código, e no pop-up Kutools para Excel caixa de diálogo, selecione o intervalo ao qual deseja adicionar texto e, finalmente, clique no OK botão.

Agora, o texto especificado é adicionado após o primeiro caractere das células selecionadas.

Note: No código acima, você irá inserir um valor específico após o primeiro caractere dentro da célula, você pode alterar o número 1 e 2 para o número 2 e 3 se adicionar o texto após o segundo caractere neste script VBA.Left (Rng.Value, 1) & "D" e VBA.Mid (Rng.Value, 2, VBA.Len (Rng.Value) - 1), e a letra D é o novo texto que você deseja inserir.


Adicione texto no meio das células selecionadas com o Kutools para Excel

Temos que admitir que os dois métodos acima são inconvenientes para nós. Aqui vou te mostrar o Adicionar texto utilidade de Kutools for Excel, com este utilitário, você pode especificar facilmente a posição do meio da lista e, em seguida, adicionar o texto certo a essa posição da lista inteira ao mesmo tempo.

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

1. Selecione a lista à qual deseja adicionar texto no meio das células e clique em Kutools > Texto > Adicionar texto. Veja a imagem:

2. No Adicionar texto caixa de diálogo, digite o texto que deseja adicionar às células no Texto caixa, especifique a posição onde deseja adicionar o texto, marcando o Especificar opção (aqui eu insiro o número 1) e clique no botão OK botão. (Você pode visualizar instantaneamente o resultado da adição na caixa à direita)

Note: Para adicionar texto em várias posições da célula selecionada de uma vez, você pode especificar as posições com separação por vírgula Especificar caixa. Veja a imagem:

Agora, o texto especificado é adicionado após a primeira letra na lista selecionada.

  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 texto no meio das células selecionadas com o Kutools para Excel


Artigo relacionado:.

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
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...

Descrição


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 (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Boa tarde, tudo bem ?

Eu testei as duas fórmulas e não funcionaram. Inclusive testei também no mesmo cenário descrito no texto e também não funcionou. Poderia verificar se falta algo na fórmula do excel ?
This comment was minimized by the moderator on the site
Tive o mesmo problema, mas segui pela resposta que enviaram aqui, a formula para o excel em português seria =ESQUERDA(A2;1) & "D" & EXT.TEXTO(A2;2;100)

A parte da fórmula que dá o erro seria o "MID" que precisa ser substituído por "EXT.TEXTO"
This comment was minimized by the moderator on the site
Hi Matheus C.,
If you are using the Excel version in a different language than English, please convert the formula from English to the language you are currently using.
You can translate the formula in this page: https://de.excel-translator.de/translator/
This comment was minimized by the moderator on the site
Hi Vick,
The formula provided in the post can only be applied in English system environment Excel. If you have Excel in a different language than English, please convert the formula from English to the language you are currently using.
It seems that you are using the Excel in Portuguese language system. You need to change the commas in the formula to semicolons.
You can translate the formula in this page: https://de.excel-translator.de/translator/
This comment was minimized by the moderator on the site
TRIMAKASIH KAK, SANGAT MEMBANTUUUU
This comment was minimized by the moderator on the site
This seems complicated. For the originally stated problem why not just do a search for G and replace all with GD?
This comment was minimized by the moderator on the site
Because you might want to insert a specific character at a certain index of the string. What if they weren't all G's? This was just to provide an example of how it works.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations