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

Você sabe como encontrar e selecionar todas as células mescladas no Excel? Aqui estão três maneiras engenhosas de identificar e selecionar rapidamente todas as células mescladas em uma seleção ou intervalo no Excel.

Identifique e selecione todas as células mescladas com o comando Localizar

Selecione e conte rapidamente todas as células mescladas com o Kutools para Excel

Identifique todas as células mescladas com código VBA

Identifique e selecione todas as células mescladas com o comando Localizar

Você pode identificar e selecionar todas as células mescladas na planilha ativa usando o comando Localizar seguindo os passos abaixo:

1. Clique em Página Inicial > Localizar e Selecionar > Localizar para abrir a caixa de diálogo Localizar e Substituir. Você também pode abrir a caixa de diálogo Localizar e Substituir pressionando as teclas Ctrl + F.

2. Clique no botão Formatar na caixa de diálogo, (Se você não encontrar o botão Formatar, clique no botão Opções para expandir a caixa.) veja a captura de tela:

3. Na caixa de diálogo Formato de Localização que aparece, marque apenas a opção Mesclar Células na seção Controle de Texto sob a aba Alinhamento e clique em OK.

4. Agora você volta à caixa de diálogo Localizar e Substituir, clique no botão Localizar Tudo. Todas as células mescladas são listadas na parte inferior desta caixa de diálogo. Selecione todos os resultados encontrados mantendo a tecla Shift pressionada.

Agora, todas as células mescladas na planilha ativa são selecionadas quando você seleciona todos os resultados encontrados. Veja a captura de tela:

Dicas: Se você quiser apenas identificar, encontrar e selecionar células mescladas em uma seleção, precisará selecionar o intervalo primeiro.

Selecione e conte todas as células mescladas com o Kutools para Excel

A ferramenta Selecionar Células Mescladas do Kutools para Excel ajudará você a identificar, encontrar e selecionar todas as células mescladas em uma seleção com apenas um clique.

Após instalar o Kutools para Excel, faça o seguinte:( Baixe agora gratuitamente o Kutools para Excel! )

1. Selecione o intervalo de dados onde deseja selecionar as células mescladas.

2. Clique em Kutools > Selecionar > Selecionar Células Mescladas, veja a captura de tela:

3. E todas as células mescladas na seleção serão selecionadas de uma vez, e o número de células mescladas será contado também, veja a captura de tela:

Identifique todas as células mescladas com código VBA

VBA 1: Identifique e destaque todas as células mescladas

1. Mantenha pressionadas as teclas ALT + F11, e isso abrirá a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo, e cole a seguinte macro 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. Pressione a tecla F5 para executar esta macro. Todas as células mescladas na planilha ativa serão identificadas e destacadas, veja a captura de tela:

VBA 2: Identifique e liste todas as células mescladas

1. Mantenha pressionadas as teclas ALT + F11, e isso abrirá a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo, e cole a seguinte macro 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. Pressione a tecla F5 para executar esta macro, todas as células mescladas serão listadas em uma caixa de diálogo que aparece. Veja a captura de tela:

Artigos relacionados