Excel'de hücreleri nasıl ayırıp yinelenen değerlerle doldurabilirsiniz?

Eğer bir çalışma sayfasında birçok birleştirilmiş hücre varsa ve şimdi bu birleştirilmiş hücreleri ayırmak ve aşağıdaki ekran görüntülerinde gösterildiği gibi orijinal değerleri aşağıya otomatik olarak doldurmak istiyorsanız, bu görevi hızlıca nasıl halledebilirsiniz?

Git Özel Komutu ile hücreleri ayırma ve yinelenen verilerle doldurma

VBA kodu ile hücreleri ayırma ve yinelenen verilerle doldurma

Bir tıklamayla hücreleri ayırma ve yinelenen verilerle doldurma

Git Özel Komutu ile hücreleri ayırma ve yinelenen verilerle doldurma

Git Özel komutunu kullanarak hücreleri ayırabilir ve değerleri aşağıya doldurabilirsiniz. Ancak bu yöntem biraz uğraştırıcıdır, lütfen aşağıdaki adımları izleyin:

1. Birleştirilmiş hücre içeren sütunları seçin.

2. Ana Sayfa > Birleştir ve Ortala > Hücreleri Ayır'ı tıklayın. Ekran görüntüsüne bakın:

3. Ve birleştirilmiş hücreler ayrılmış olup yalnızca ilk hücre orijinal değerlerle doldurulacaktır. Ardından aralığı tekrar seçin.

4. Ardından Ana Sayfa > Bul ve Seç > Git Özel'i tıklayın. Git Özel iletişim kutusunda Boşluklar seçeneğini işaretleyin. Ekran görüntüsüne bakın:

5. Ve ardından Tamam'ı tıklayın, aralıktaki tüm boş hücreler seçilecektir. Daha sonra = yazın ve klavyedeki Yukarı ok tuşuna basın. Ekran görüntüsüne bakın:

6. Ardından Ctrl + Enter tuşlarına basın, tüm boş hücreler orijinal birleştirilmiş verilerle doldurulacaktır. Ekran görüntüsüne bakın:

VBA kodu ile hücreleri ayırma ve yinelenen verilerle doldurma

Aşağıdaki VBA kodu ile hücreleri hızlıca ayırabilir ve değerleri aşağıya doldurabilirsiniz.

1. ALT + F11 tuşlarını basılı tutun ve Microsoft Visual Basic for Applications penceresi açılacaktır.

2. Ekle Insert > Module'ü tıklayın ve aşağıdaki makroyu Module penceresine yapıştırın.

Sub UnMergeSameCell()
'Upadateby Extendoffice
Dim Rng As Range, xCell As Range
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each Rng In WorkRng
    If Rng.MergeCells Then
        With Rng.MergeArea
            .UnMerge
            .Formula = Rng.Formula
        End With
    End If
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. Ardından bu kodu çalıştırmak için F5 tuşuna basın, çalışılacak bir aralık seçmek için bir iletişim kutusu görüntülenecektir, ekran görüntüsüne bakın:

4. Tamam'ı tıklayın, ardından birleştirilmiş hücreler ayrılacak ve orijinal birleştirilmiş değerler aşağıya otomatik olarak doldurulacaktır.

Bir tıklamayla hücreleri ayırma ve yinelenen verilerle doldurma

Kutools for Excel'in Birleştirilmiş Hücreleri Ayırma aracı ile, hücreleri tek bir tıklamayla ayırabilir ve yinelenen verilerle doldurabilirsiniz, bu yöntem çok basit ve kullanışlıdır.

Kutools for Excel'i yükledikten sonra şu adımları izleyebilirsiniz:

1. Ayırıp verileri aşağıya doldurmak istediğiniz sütunları seçin.

2. Kutools > Birleştir ve Böl > Hücreleri Ayır ve Değerleri Doldur'u tıklayın, ekran görüntüsüne bakın:

3. Ve birleştirilmiş hücreler hemen ayrılmış ve yinelenen değerlerle doldurulmuş olacaktır. Ekran görüntülerine bakın:

Kutools for Excel ile hücreleri ayırma ve yinelenen verilerle doldurma

İlgili makale:

Excel'de aynı veriye sahip bitişik satırları birleştirme