Excel’de birleştirilmiş hücreler için satırları nasıl renklendirirsiniz?

Büyük veri kümelerinde verileri daha kolay taramak için alternatif satırları farklı bir renkle biçimlendirmek son derece yararlıdır. Ancak bazen verilerinizde bazı birleştirilmiş hücreler olabilir. Aşağıdaki ekran görüntüsünde gösterildiği gibi, birleştirilmiş hücreleri içeren satırları da farklı bir renkle alternatif olarak vurgulamak istiyorsanız, bu sorunu Excel’de nasıl çözebilirsiniz?

Koşullu Biçimlendirme Kullan ile Birleştirilmiş için alternatif satırları renklendirme

Birleştirilmiş için VBA koduyla alternatif satırları renklendirme

---

Koşullu Biçimlendirme Kullan ile Birleştirilmiş için alternatif satırları renklendirme

Excel’deki güçlü Koşullu Biçimlendirme Kullan özelliği, bu görevi mümkün olduğunca hızlı bir şekilde tamamlamanıza yardımcı olur. Lütfen aşağıdaki adımları uygulayın:

1. Alternatif olarak, renklendirmek istediğiniz Birleştirilmiş Hücreleri içeren Veri Aralığını seçin ve ardından şuna tıklayın: Giriş > Koşullu Biçimlendirme Kullan > Yeni Kural, ekran görüntüsüne bakın:

2. Açılan Yeni Biçimlendirme Kuralı iletişim kutusunda aşağıdaki işlemleri yapın:

• Seçin Biçimlendirmek için hangi hücrelerin seçileceğini belirlemek üzere bir formül kullanınseçeneğini Kural Türü Seçinlistesinden;
• Ardından şu formülü girin: =MOD(COUNTA($A$2:$A2),2)=0 kutusuna, ardından Bu formül doğru olduğunda değerleri biçimlendir metin kutusuna.
• Not: A2, Veri Aralığı'nızın ilk hücresidir.

3. Ardından, Biçim düğmesine tıklayarak Hücre Biçimini Ayarla iletişim kutusuna gidin. Dolgu sekmesinden satırları vurgulamak istediğiniz rengi seçin; ekran görüntüsüne bakın:

4. İletişim kutularını kapatmak için Tamam düğmesine tıklayın. Belirttiğiniz renkle birleştirilmiş içeren satırlar doldurulacaktır; ekran görüntüsüne bakın:

5. Ardından tekrar şuna tıklayın: Giriş > Koşullu Biçimlendirme Kullan > Yeni Kural ve Yeni Biçimlendirme Kuralı iletişim kutusunu açmak için aşağıdaki işlemleri yapın:

• Seçin Biçimlendirmek için hangi hücrelerin seçileceğini belirlemek üzere bir formül kullanınseçeneğini Kural Türü Seçinlistesinden;
• Ardından şu formülü girin:=MOD(COUNTA($A$2:$A2),2)=1kutusuna Bu formül doğru olduğunda değerleri biçimlendirmetin kutusuna.
• Sonra, satırları vurgulamak istediğiniz başka bir renk seçmek için Biçim düğmesine tıklayın.
• Not:A2Veri Aralığı'nizin ilk hücresidir.

6. Ardından, Tamam ve Tamam düğmelerine tıklayarak iletişim kutularını kapatın. Artık aşağıdaki ekran görüntüsünde gösterildiği gibi, Veri Seç aralığının “Birleştirilmiş” temel alınarak iki farklı renkle alternatif olarak gölgelendirildiğini görebilirsiniz:

---

Birleştirilmiş için VBA koduyla alternatif satırları renklendirme

Normal Koşullu Biçimlendirme Kullan dışında, Birleştirilmiş için alternatif satır renklerini kolayca uygulamak amacıyla bir VBA kodu da kullanabilirsiniz.

1. ALT + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

2. Ardından Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu Modül penceresine yapıştırın.

VBA kodu: Birleştirilmiş için alternatif satırları renklendirme

Sub Kutools_AlternateColor()
'Update by ExtendOffice
Dim xRg As Range
Dim xCRg As Range
Dim xIRg As Range
Dim xC1, xC2 As Integer
Dim xR1 As Integer
Dim xCnt As Long
Dim xLColor, xDCR1, xDCR2 As Long
Set xRg = Application.InputBox("Please select the data range:", "KutoolsforExcel", "", Type:=8)
If TypeName(xRg) = "Nothing" Then Exit Sub
Set xCRg = Application.InputBox("Please select the column with the merged cells:", "KutoolsforExcel", "", Type:=8)
If TypeName(xCRg) = "Nothing" Then Exit Sub
Set xIRg = Intersect(xRg, xCRg)
If xIRg Is Nothing Then
MsgBox "the data range doesn't contain merged cells"
Exit Sub
End If
xC1 = xRg.Column
xC2 = xIRg.Column
xR1 = xRg.Row
xLColor = RGB(221, 235, 247)
xDCR1 = RGB(221, 235, 247)
xDCR2 = RGB(250, 232, 222)
xRw = 0
Do
xLColor = xDCR1 + xDCR2 - xLColor
xCnt = Cells(xRw + xR1, xC2).MergeArea.Rows.Count
Cells(xRw + xR1, xC1).Resize(xCnt, xRg.Columns.Count).Interior.Color = xLColor
xRw = xRw + xCnt
Loop While xRw < xRg.Rows.Count - 1
End Sub

3. Ardından, bu kodu çalıştırmak için F5 tuşuna basın. İlk açılan kutuda kullanmak istediğiniz Veri Aralığı’nı seçin; ekran görüntüsüne bakın:

4. İkinci uyarı kutusunda, birleştirilecek sütunu seçin; ekran görüntüsüne bakın:

5. Ardından Tamam düğmesine tıklayın. Satırlar, aşağıda gösterildiği gibi, birleştirilmiş temele göre alternatif olarak gölgelendirilir:

---

Video: Birleştirilmiş için alternatif satırları renklendirme

---

Daha fazla ilgili makale: