KutoolsforOffice — Uma solução, cinco ferramentas poderosas.Fazer mais com menos esforço.

Como identificar e selecionar todas as células mescladas no Excel?

AutorApoio Técnico Data de Modificação

Sabe como localizar e selecionar todas as células mescladas no Excel? Eis três formas engenhosas de identificar e selecionar rapidamente todas as células mescladas numa seleção ou intervalo no Excel.

identificar e selecionar todas as células unidas

Identifique e selecione todos os Mesclado com o comando Localizar

Selecione e conte rapidamente todos os Mesclado com o Kutools para Excel

Identifique todos os Mesclado com código VBA


Identifique e selecione todos os Mesclado com o comando Localizar

Pode identificar e selecionar todos os Mesclado na folha ativa utilizando o comando Localizarcom os seguintes passos:

1. Clique em Base > Localizar e Selecionar > Localizar para abrir a caixa de diálogo Localizar e Substituir. Também pode abrir a caixa de diálogo Localizar e Substituir premindo as teclas Ctrl + F.

2. Clique no botão Formatona caixa de diálogo (se não conseguir encontrar o botão)Formato, clique no botão Opções para expandir a caixa de diálogo). Veja a captura de ecrã:

Clique no botão Formatar na caixa de diálogo

3. Na caixa de diálogo que surge, no separador Alinhamento, na secção Controlo de texto, marque apenas a opção Células Mescladas em Formato de Localização e clique em OK.

marque a opção Unir Células na caixa de diálogo

4. Volte agora à caixa de diálogo Localizar e Substituir e clique no botão Localizar tudo. Todos os elementos mesclados são listados na parte inferior desta caixa de diálogo. Selecione todos os resultados encontrados, mantendo premida a tecla Shift.

Agora, todos os Mesclados da Planilha Ativa são selecionados ao selecionar todos os resultados encontrados. Veja a captura de ecrã:

todas as células unidas são selecionadas ao selecionar todos os resultados encontrados

Dicas: Se quiser identificar, localizar e selecionar células mescladas apenas numa seleção, comece por selecionar o intervalo.


Selecione e conte todos os Mesclado com Kutools para Excel

A funcionalidade Kutools para Excel Selecionar Células Mescladas ajuda-o a identificar, localizar e selecionar todas as células mescladas numa seleção com apenas um clique.

Kutools para Exceloferece mais de 300 funcionalidades avançadas para simplificar tarefas complexas, impulsionando a criatividade e a eficiência.Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados descomplicada.Informações detalhadas sobre Kutools para Excel...         Teste gratuito...

Após instalar o Kutools para Excel, siga os passos seguintes:()Transferência gratuita do Kutools para Excel agora!)

1. Selecione o intervalo de dados em que pretende selecionar as células mescladas.

2. Clique em Kutools > Selecionar > Selecionar Células Mescladas. Veja a captura de ecrã:

Clique em Kutools > Selecionar > Selecionar Células Unidas

3. Todos os elementos 'Mesclado na seleção' foram selecionados de uma só vez, incluindo também a contagem do número de elementos Mesclados. Veja a captura de ecrã:

todas as células unidas estão selecionadas

Dica: Para utilizar esta funcionalidade, deve instalar primeiro o Kutools para Excelclique para transferir e experimentar gratuitamente durante 30 diasagora.

Identifique todos os Mesclado com código VBA

VBA 1: Identifique e realce todos os Mesclado

1. Mantenha premidas as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic para Aplicações.

2. Clique em Inserir > Módulo e cole a macro seguinte na janela do Módulo.

Sub FindMergedcells()
'updateby Extendoffice
Dim x As Range
For Each x In ActiveSheet.UsedRange
If x.MergeCells Then
x.Interior.ColorIndex = 8
End If
Next
End Sub

3. Prima a tecla F5 para executar esta macro. Todas as células mescladas na folha ativa são identificadas e realçadas. Veja a captura de ecrã:

código VBA para destacar todas as células unidas

VBA 2: Identifique e liste todos os Mesclado

1. Mantenha premidas as teclas ALT + F11e abra a janela Microsoft Visual Basic para Aplicações.

2. Clique em Inserir>Móduloe cole a macro seguinte na janela do Módulo.

Sub ListMergedcells()
'updateby Extendoffice
Dim x As Range
Dim sMsg As String
sMsg = ""
For Each x In ActiveSheet.UsedRange
If x.MergeCells Then
If sMsg = "" Then
sMsg = "Merged cells:" & vbCr
End If
sMsg = sMsg & Replace(x.Address, "$", "") & vbCr
End If
Next
If sMsg = "" Then
sMsg = "No merged cells."
End If
MsgBox sMsg
End Sub

3. Prima a tecla F5 para executar esta macro; todos os mesclados são listados numa caixa de diálogo que surge. Veja a captura de ecrã:

código VBA para listar todas as células unidas