Dica: outros idiomas são traduzidos pelo Google. Você pode visitar o English versão deste link.
Entrar
x
or
x
x
Registre-se
x

or

Como combinar o conteúdo de múltiplas células sem perder dados no Excel?

Podemos combinar as células e seus conteúdos no Microsoft Excel com freqüência. No entanto, você descobre a maneira mais fácil de combinar o conteúdo celular? Aqui vamos falar sobre como combinar conteúdos celulares no Excel de forma fácil e rápida.

Combine células múltiplas em uma célula com código VBA

Combine várias células em uma célula com o Kutools para Excel sem perder dados


Combine facilmente duas colunas em uma (combine primeiro e último nome) no Excel:

O Combinar colunas ou linhas de utillity de Kutools for Excel pode ajudá-lo a combinar facilmente células de colunas selecionadas em uma. Por exemplo, você pode combinar rapidamente o nome e o sobrenome em uma célula de nome completo com as configurações, conforme mostrado na captura de tela abaixo.

Kutools for Excel: com mais de 200 complementos úteis do Excel, grátis para tentar sem limitação nos dias 60. Baixe e teste grátis agora!

Guia do Office Habilitar Edição e Navegação por Guias no Office e Facilitar seu Trabalho ...
Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%
  • Reutilizar qualquer coisa: Adicione as fórmulas, gráficos e outras coisas mais usadas ou complexas aos seus favoritos e reutilize-os rapidamente no futuro.
  • Mais do que recursos de texto 20: Extrair número da string de texto; Extrair ou remover parte de textos; Converta números e moedas em palavras em inglês.
  • Mesclar Ferramentas: Várias pastas de trabalho e folhas em um; Mesclar várias células / linhas / colunas sem perder dados; Mesclar linhas duplicadas e soma.
  • Ferramentas de divisão: Dividir dados em várias folhas com base no valor; Uma pasta de trabalho para vários arquivos Excel, PDF ou CSV; Uma coluna para várias colunas.
  • Colar pulando Linhas ocultas / filtradas; Contagem e Soma pela cor de fundo; Envie emails personalizados para vários destinatários em massa.
  • Super Filtro: Crie esquemas de filtro avançados e aplique a qualquer folha; tipo por semana, dia, frequência e mais; filtros por negrito, fórmulas, comentário ...
  • Mais de recursos poderosos do 300; Funciona com o Office 2007-2019 e 365; Suporta todos os idiomas; Fácil implantação em sua empresa ou organização.

Combine células múltiplas em uma célula com código VBA


O código VBA a seguir pode ajudá-lo a combinar várias células em uma célula e você pode aplicar o código com as seguintes etapas:

1. Clique Developer > Visual Basic, Uma nova Microsoft Visual Basic para aplicativos a janela será exibida, clique em inserção > Móduloe insira o seguinte código no módulo:

Sub MergeOneCell()
'Updateby20140128
Dim Rng As Range
Dim WorkRng As Range
Dim Sigh As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Sigh = Application.InputBox("Symbol merge", xTitleId, "", Type:=2)
xOut = ""
Application.DisplayAlerts = False
For Each Rng In WorkRng
    xOut = xOut & Rng.Value & Sigh
Next
With WorkRng
    .Merge
    .Value = VBA.Left(xOut, VBA.Len(xOut) - 1)
End With
Application.DisplayAlerts = True
End Sub

2. Então clique doc-multiply-calculation-3 botão para executar o código. Uma caixa de diálogo aparece para você selecionar um intervalo para trabalhar com o VBA. Ver capturas de tela:

3. Clique Ok, outra caixa de diálogo é exibida para que você especifique o seperator. Ver captura de tela:

doc combina conteúdos de células 2

4. Clique Ok, então o conteúdo da célula no intervalo selecionado é combinado em uma célula. Ver captura de tela:

doc combina conteúdos de células 3


Combine várias células em uma célula com o Kutools para Excel sem perder dados

Se você tem Kutools for Excel instalado, você pode combinar conteúdos celulares de várias colunas ou linhas convenientemente sem usar fórmulas.

Kutools for Excel : com mais do que 300 úteis add-ins do Excel, livre para tentar sem limitação nos dias 60.

1. Selecione as células que deseja juntar os dados. E aplique este utilitário clicando Kutools > Combinar.

2. No Combine colunas ou linhas caixa de diálogo, especifique as opções que você precisa. Ver captura de tela:

  • (1.) Selecione Combine em uma única célula para Para combinar as células selecionadas de acordo com as seguintes opções;
  • (2.) Especifique um separador para os dados combinados. Você pode separar cada conteúdo com espaço, nada, ponto e vírgula ou texto específico. E você também pode exibir o conteúdo combinado em uma nova linha.

doc combina conteúdos de células 5

3. Então clique OK or Candidatura, todos os dados em várias células foram mesclados em uma célula. Ver captura de tela:

Nota: Esse utilitário também pode ajudar a combinar células de colunas selecionadas. Você pode combinar o primeiro e o último nome em uma única célula de nome completo, como mostrado abaixo.

Então você pode ver os primeiros nomes e sobrenomes são combinados e localizados nas células de nome completo.

Gorjeta.Se você quiser ter uma versão gratuita deste utilitário, acesse baixe o software livremente primeiro, e depois vá para aplicar a operação de acordo com as etapas acima.


Artigos Relacionados


Demo: Combine / Misture várias células em uma sem perder dados

Kutools for Excel: com mais de 200 complementos úteis do Excel, grátis para tentar sem limitação nos dias 60. Baixe e teste grátis agora!


Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Inserir rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de endereços e enviar e-mails ...
  • Bar Super Fórmula (facilmente editar várias linhas de texto e fórmula); Layout de leitura (leia e edite facilmente grandes números de células); Colar para intervalo filtrado...
  • Mesclar células / linhas / colunas sem perder dados; Conteúdo de células divididas; Combinar linhas / colunas duplicadas... Prevenir Células Duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Exclusivo Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros de trabalho; Seleção aleatória ...
  • Cópia exata Múltiplas Células sem alterar a referência da fórmula; Criar automaticamente referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair texto, Adicionar texto, remover por posição, Remover espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salve e aplique esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro especial por negrito, itálico ...
  • Combinar pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Dividir dados em várias planilhas; Lote Converter xls, xlsx e PDF...
  • Mais de recursos poderosos do 300. Suporta Office / Excel 2007-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Recursos completos Avaliação gratuita de um dia de 30.
kte tab 201905

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

  • Ativar edição e leitura com guias no 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!
fundo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    jennifer · 3 years ago
    my earlier query is about this vba:Sub MergeOneCell()
    'Updateby20140128
    Dim Rng As Range
    Dim WorkRng As Range
    Dim Sigh As String
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
    Sigh = Application.InputBox("Symbol merge", xTitleId, ",", Type:=2)
    xOut = ""
    Application.DisplayAlerts = False
    For Each Rng In WorkRng
    xOut = xOut & Rng.Value & Sigh
    Next
    With WorkRng
    .Merge
    .Value = VBA.Left(xOut, VBA.Len(xOut) - 1)
    End With
    Application.DisplayAlerts = True
    End Sub
    Between, what does the type here, "8" & "2" refers to
  • To post as a guest, your comment is unpublished.
    jennifer · 3 years ago
    how repeat the process if i have 4 different reference and need to combine them one after the other
  • To post as a guest, your comment is unpublished.
    TJ · 4 years ago
    Awesome! Greatly helps! Thank you so much!
  • To post as a guest, your comment is unpublished.
    priya · 4 years ago
    how to merge 2 cell ex:-[a1:41.00] [B1:kWh] [C1:041.00 kWh]
  • To post as a guest, your comment is unpublished.
    Tom · 5 years ago
    Thanks very much - was a big help!
  • To post as a guest, your comment is unpublished.
    Romilla W · 6 years ago
    Thamks a lot for the code. Was very helpful.
  • To post as a guest, your comment is unpublished.
    Damon R · 6 years ago
    Very helpful thank you took me a while to find it but was just what I needed. Note in the VBA code if you want to seperate data with a semicolon, comma or some other charater in the "delim = " "
    " field put you charater betwen the quotes example: delim = ";".

    Thanks again.