Du kan identifisere og velge alle sammenslåtte celler i aktive regnearket ved Finn-kommandoen med følgende:
Trinn 1: Klikk på Home > > Finn & Velg > > Finn for å åpne Søk og erstatt dialogboksen. Du kan også åpne Søk og erstatt dialogboksen med å trykke Ctrl + H nøkler
Trinn 2:. Klikk Format-knappen i dialogboksen. Se følgende skjermbilde.
Hvis du ikke kan finne ut Format-knappen, klikker du på valgknappen første
Trinn 3: I spratt opp Finn Format dialogboksen, bare sjekk Slå sammen celler alternativet i Text kontroll delen under kategorien Justering, og klikk OK
Trinn 4:. Nå kan du gå tilbake til Finn og erstatt dialogboksen klikk Finn alle-knappen
Trinn 5:. Alle sammenslåtte celler er listet nederst i denne dialogboksen. Velg alle finne resultater med å holde nede Ctrl eller Skift-tasten.
Nå er alle sammenslåtte celler i aktive arket er valgt når du velger alle å finne resultater. Se følgende skjermbilde.
Hvis du ønsker å bare identifisere, finne og velge sammenslåtte celler i et utvalg, må du velge området første
Identifisere fusjonert celler med VBA
VBA 1: Identifiser sammenslåtte celler
Trinn 1:. Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vindu
Trinn 2: Klikk Sett > > Modul, og lim inn følgende makroen i modulen Window. Trinn 3: Trykk F5 for å kjøre denne makroen Dette Macro vil markere alle sammenslåtte celler i aktive regnearket, kan du se følgende skjermbilde. VBA 2: identifisere sammenslåtte celler Trinn 1: Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vindu Trinn 2:. Klikk på Insert > > Modul, og lim inn følgende makroen i modulen Window. Trinn 3:. Trykk F5 for å kjøre denne makroen Dette VB makro vil liste alle sammenslåtte celler i en dukker opp dialogboksen. Se følgende skjermbilde: Kutools for Excel Select sammenslåtte celler verktøyet vil hjelpe deg identitet, finne og valgte alle sammen celler i et utvalg med bare ett klikk. Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. Få den nå Når du har valgt området som du ønsker å velge sammenslåtte celler i, klikker du bare på Kutools >. ≫ Velg Verktøy > > Velg sammenslåtte celler, det vil velge alle sammenslåtte celler i utvalget umiddelbart.
Sub FindMerged2 ()
Dim c As Range
For hver c I ActiveSheet.UsedRange
Hvis c.MergeCells Så
c.Interior.ColorIndex = 36
End If
Neste
End Sub
Sub FindMerged4 ()
Dim c As Range
Dim sMsg As String
sMsg = ""
For hver c I ActiveSheet.UsedRange
Hvis c.MergeCells Da
Hvis sMsg = "" Then
sMsg = "Sammenslåtte regnearkceller : "& vbCr
End If
sMsg = sMsg & Erstatt (c.Address, "$", "") & vbCr
End If
Neste
Hvis sMsg = "" Så
sMsg = "Ingen sammenslåtte regnearkceller."
End Hvis
MsgBox sMsg
End Sub
Identifisere og velge alle sammenslåtte celler med Kutools for Excel