Kako hitro združiti sosednje vrstice z enakimi podatki v Excelu?

Recimo, da imate v sosednjih vrsticah delovni list z enakimi podatki, zdaj pa želite združiti iste celice v eno celico, tako da bodo podatki videti urejeni in lepi. Kako hitro in priročno združiti sosednje vrstice z enakimi podatki? Danes vam bom predstavil nekaj hitrih načinov za rešitev tega problema.

Spojite sosednje vrstice istih podatkov s kodo VBA

Spojite sosednje vrstice istih podatkov z Kutools za Excel

Odklopite celice in jih v Excelu napolnite s podvojenimi vrednostmi

Spojite sosednje vrstice istih podatkov s kodo VBA

Seveda lahko iste podatke združite z Spoji in centriraj ukaz, če pa je treba celic združiti na stotine, bo ta metoda zamudna. Tako vam lahko naslednja koda VBA pomaga pri enostavnem združevanju istih podatkov.

1. Držite tipko ALT + F11 in odpre tipko Microsoft Visual Basic za aplikacije okno.

2. Kliknite Vstavi > Moduliin v mapo prilepite naslednji makro Moduliokno.

Sub MergeSameCell()
'Updateby Extendoffice
Dim Rng As Range, xCell As Range
Dim xRows As Integer
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
xRows = WorkRng.Rows.Count
For Each Rng In WorkRng.Columns
    For i = 1 To xRows - 1
        For j = i + 1 To xRows
            If Rng.Cells(i, 1).Value <> Rng.Cells(j, 1).Value Then
                Exit For
            End If
        Next
        WorkRng.Parent.Range(Rng.Cells(i, 1), Rng.Cells(j - 1, 1)).Merge
        i = j - 1
    Next
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. Nato pritisnite F5 tipko za zagon te kode, se na zaslonu prikaže pogovorno okno za izbiro obsega, s katerim želite delati. Oglejte si posnetek zaslona:

4. Nato kliknite OK, se bodo isti podatki v stolpcu A združili. Oglejte si posnetek zaslona:

Spojite sosednje vrstice istih podatkov z Kutools za Excel

Z Združi iste celice uporabnost Kutools za Excel, lahko enake vrednosti hitro združite v več stolpcih z enim klikom.

Po namestitvi Kutools za Excel, lahko naredite naslednje:

1. Izberite stolpce, za katere želite združiti sosednje vrstice z enakimi podatki.

2. Kliknite Kutools > Spoji in razdeli > Spoji iste celice, glej posnetek zaslona:

3. In potem so bili isti podatki v izbranih stolpcih združeni v eno celico. Oglejte si posnetek zaslona:

Kliknite za prenos Kutools za Excel in brezplačno preskusno različico zdaj!

Če želite izvedeti več o tem, obiščite to stran Spoji iste celice lastnost.

Predstavitev: Združite iste celice v eno celico ali odstranite, da zapolnite podvojene vrednosti: