Note: The other languages of the website are Google-translated. Back to English

Como mesclar todas as outras linhas / células no Excel?

Se você tem uma lista de dados e deseja combinar todas as outras linhas ou células deles, conforme mostrado a seguir, você sabe como fazer isso? No Excel, você pode usar fórmula ou VBA para mesclar todas as outras linhas ou células.


Mesclar todas as outras linhas / células com a fórmula no Excel

Mesclar todas as outras linhas / células com VBA

Guia Office Habilite a edição e navegação com guias no Office e torne seu trabalho muito mais fácil ...
O 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 tudo mais usados ​​ou complexos aos seus favoritos e reutilize-os rapidamente no futuro.
  • Mais de 20 recursos de texto: Extrair número da string de texto; Extraia ou remova parte dos textos; Converta números e moedas para palavras em inglês.
  • Ferramentas de mesclagem: Várias pastas de trabalho e planilhas em um; Mesclar várias células / linhas / colunas sem perder dados; Mesclar linhas duplicadas e soma.
  • Ferramentas de divisão: Divida os dados em várias folhas com base no valor; Uma pasta de trabalho para vários arquivos do Excel, PDF ou CSV; Uma coluna para várias colunas.
  • Colar Ignorando Linhas ocultas / filtradas; Contagem e soma por 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 planilha; tipo por semana, dia, frequência e muito mais; filtros por negrito, fórmulas, comentário ...
  • Mais de 300 recursos poderosos; Funciona com Office 2007-2021 e 365; Suporta todos os idiomas; Fácil implantação em sua empresa ou organização.

seta azul bolha direita Mesclar todas as outras linhas / células com a fórmula no Excel

Selecione uma célula em branco e digite =OFFSET(A$1,(ROW()-1)*2,0)&" "&OFFSET(A$1,((ROW()-1)*2)+1,0) (A $ 1 indica os primeiros dados em sua lista, você pode alterá-los conforme necessário) e pressione a tecla Enter. Em seguida, arraste a alça de preenchimento para preencher o intervalo necessário para aplicar esta fórmula. Veja a imagem:



seta azul bolha direita Mesclar todas as outras linhas / células com VBA

Se você está acostumado a usar o VBA, também pode executar o VBA abaixo para mesclar linhas alternadas.

1. Segure ALT pressione e pressione F11 no teclado para abrir um Microsoft Visual Basic para aplicativos janela.

2. Clique inserção > Móduloe copie o VBA para o módulo.

VBA: mesclar todas as outras linhas / células

Sub CombineCells()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
For i = 1 To InputRng.Rows.Count Step 2
    For j = 1 To InputRng.Columns.Count
        OutRng.Value = InputRng.Cells(i, j).Value & InputRng.Cells(i + 1, j).Value
        Set OutRng = OutRng.Offset(0, 1)
    Next
    Set OutRng = OutRng.Offset(1, (InputRng.Columns.Count * -1))
Next
End Sub         

 

3. Clique Opere para executar o código VBA, e um KutoolsforExcel A caixa de diálogo aparece para você selecionar um intervalo de células que deseja mesclar com as outras linhas. Veja a imagem:


4. Clique OK, outra caixa de diálogo é exibida para você selecionar uma única célula para obter o resultado mesclado. Veja a imagem:


5. Clique OK, e você pode ver o resultado:



Artigos relativos:

Comentários (0)
Ainda não há classificações. Seja o primeiro a avaliar!
Não há comentários postados aqui ainda
Deixe o seu comentário
Postando como convidado
×
Avalie esta postagem:
0   Personagens
Locais sugeridos

Siga-nos

Copyright © 2009 - www.extendoffice.com. | Todos os direitos reservados. Distribuído por ExtendOffice. | | | Mapa do site
Microsoft e o logotipo do Office são marcas comerciais ou marcas registradas da Microsoft Corporation nos Estados Unidos e / ou em outros países.
Protegido por Sectigo SSL