Excel'de hücre rengine göre grafiği nasıl renklendirirsiniz?

Excel'de standart bir grafik oluşturduğunuzda, örneğin sütun veya çubuk grafik, seriler veya veri noktalarına Excel'in varsayılan renkleri atanır ve bu renkler veri aralığınızdaki dolgu renkleriyle eşleşmeyebilir. Ancak, panolar, raporlar veya veri görselleştirmeleri gibi birçok senaryoda grafik çubuklarınızın kaynak hücrelere uyguladığınız renklerle tam olarak eşleşmesini isteyebilirsiniz. Bu, görsel tutarlılığı korumaya, veriyi bir bakışta yorumlamayı kolaylaştırmaya veya renk kodunu anlam ipucu olarak kullanan kategori gruplamalarını pekiştirmeye yardımcı olabilir. Örneğin, aşağıdaki ekran görüntüsünde gösterildiği gibi, grafiğinizdeki her sütunun özeti tablonuzda uyguladığınız renk kodlamasını yansımasını isteyebilirsiniz. Excel, hücre dolgu renklerini (özellikle manuel olanları) grafik öğelerine otomatik olarak eşlemek için doğrudan yerleşik bir özellik sağlamaz, bu nedenle hücre renginin manuel olarak mı yoksa bir formül veya kurala dayalı olarak mı uygulandığına bağlı olarak farklı yöntemler gereklidir. Aşağıda, çeşitli senaryolarda bu uyumu etkili bir şekilde gerçekleştirmenize yardımcı olacak birden fazla pratik çözüm sunulmaktadır.

VBA kodlarıyla tek veya birden fazla veri serisine dayalı olarak grafiği renklendirme

Harika bir özellik kullanarak tek veya birden fazla veri serisine dayalı olarak grafiği renklendirme

VBA kodlarıyla tek veya birden fazla veri serisine dayalı olarak grafiği renklendirme

Hücre rengine göre tek bir veri serisiyle grafiği renklendirme

Grafik çubuklarınızın ilgili hücrelerinin dolgu rengini devralmasını istiyorsanız ve renk atamalarınız manuel olarak uygulanmışsa (koşullu biçimlendirme veya formüller aracılığıyla değil), VBA'yı kullanarak grafik çubuğu renklerini orijinal hücre renkleriyle senkronize edebilirsiniz. Bu teknik, özellikle görsel eşleştirme netlik veya raporlama standartları açısından önemli olduğunda tek-serili grafikler için çok faydalıdır.

1. İlk önce verilerinizi seçin ve bir çubuk veya sütun grafiği oluşturun. Bunu yapmak için ilgili hücrelerinizi seçin ve Ekle > Sütun veya Çubuk Grafiği Ekle'ye tıklayın. Aşağıdaki ekran görüntüsüne benzer bir varsayılan grafik görmelisiniz:

2. ALT + F11 tuşlarına basarak Microsoft Visual Basic for Applications (VBA) düzenleyicisini açın.

3. VBA penceresinde Ekle > Modül'e tıklayın. Ardından aşağıdaki kodu modül penceresine kopyalayıp yapıştırın. Bu betik, her grafik çubuğunu ilgili hücrenin dolgu rengiyle eşleştirecektir.

VBA kodu: Hücre rengine göre tek bir veri serisiyle grafik çubuklarını renklendirme:

Sub ColorChartColumnsbyCellColor()
'Updateby Extendoffice
    Dim xChart As Chart
    Dim I As Long, xRows As Long
    Dim xRg As Range, xCell As Range
    On Error Resume Next
    Set xChart = ActiveSheet.ChartObjects("Chart 1").Chart
    If xChart Is Nothing Then Exit Sub
    With xChart.SeriesCollection(1)
        Set xRg = ActiveSheet.Range(Split(Split(.Formula, ",")(1), "!")(1))
        xRows = xRg.Rows.Count
        Set xRg = xRg(1)
        For I = 1 To xRows
            .Points(I).Format.Fill.ForeColor.RGB = ThisWorkbook.Colors(xRg.Offset(I - 1, 0).Interior.ColorIndex)
        Next
    End With
End Sub

4. Kodu girdikten sonra, makroyu çalıştırmak için F5'e basın. Grafik çubukları artık kaynak hücrelerinin dolgu renklerini yansıtacaktır, aşağıdaki ekran görüntüsünde gösterildiği gibi anında görsel uygunluk sağlayacaktır:

Bu yöntem, hücre dolgu renklerinin elle ayarlandığı ve sık sık manuel ayarlamalar gerektiren grafikler için avantajlıdır. Ancak, hücre renkleri değişirse, bağlantının dinamik olmadığını unutmayın, bu nedenle grafiği güncellemek için VBA'yı tekrar çalıştırmanız gerekir. Ayrıca, kodun kalıcı olmasını sağlamak için çalışma kitabınızı makro etkin dosya (.xlsm) olarak kaydetmeyi unutmayın.

Hücre rengine göre birden fazla veri serisiyle grafiği renklendirme

Grafik birden fazla veri serisi içeriyorsa (örneğin, zaman içinde birkaç ürün veya farklı kategoriler), her çubuk segmentini veya veri noktasını kaynak hücrenin dolgu rengiyle eşlemek için benzer bir VBA yaklaşımı kullanabilirsiniz. Bu, raporlarınızı görsel olarak hizalamanıza yardımcı olur ve izleyicilerin çalışma sayfası ile grafik arasında veri çapraz referansını kolaylaştırır.

1. Verilerinizi hazırlayın ve aşağıdaki gibi çoklu seri çubuk veya sütun grafiği oluşturun:

2. ALT + F11 tuşlarına basarak VBA düzenleyicisini açın.

3. VBA penceresinde Ekle > Modül'e tıklayın ve aşağıdaki kodu yapıştırın:

VBA kodu: Hücre rengine göre birden fazla veri serisiyle grafik çubuklarını renklendirme:

Sub CellColorsToChart()
'Updateby Extendoffice
    Dim xChart As Chart
    Dim I As Long, J As Long
    Dim xRowsOrCols As Long, xSCount As Long
    Dim xRg As Range, xCell As Range
    On Error Resume Next
    Set xChart = ActiveSheet.ChartObjects("Chart 1").Chart
    If xChart Is Nothing Then Exit Sub
    xSCount = xChart.SeriesCollection.Count
    For I = 1 To xSCount
        J = 1
        With xChart.SeriesCollection(I)
            Set xRg = ActiveSheet.Range(Split(Split(.Formula, ",")(2), "!")(1))
            If xSCount > 4 Then
                xRowsOrCols = xRg.Columns.Count
            Else
                xRowsOrCols = xRg.Rows.Count
            End If
            For Each xCell In xRg
                .Points(J).Format.Fill.ForeColor.RGB = ThisWorkbook.Colors(xCell.Interior.ColorIndex)
                .Points(J).Format.Line.ForeColor.RGB = ThisWorkbook.Colors(xCell.Interior.ColorIndex)
                J = J + 1
            Next
        End With
    Next
End Sub

4. Bu kodu çalıştırmak için F5'e basın. Grafik serileriniz aşağıdaki gibi gösterilen veri aralığınızda hücre dolgu renklerini yansıtacak şekilde güncellenecektir:

Bu teknik, manuel olarak renklendirilmiş veriler için tam kontrol ve esneklik sağlarken, renkler koşullu biçimlendirme veya formüllerle otomatik olarak oluşturulduğunda durumları ele almaz. Bu gibi durumlarda, daha dinamik seçenekler için aşağıda açıklanan formül tabanlı ve koşullu biçimlendirme çözümlerine bakın.

Harika bir özellik kullanarak tek veya birden fazla veri serisine dayalı olarak grafiği renklendirme

VBA, grafik renklerini hücre dolgularıyla senkronize edebilir, ancak manuel olarak kod çalıştırma gerektirir ve bazı kullanıcılar makrolar veya VBA güvenlik uyarılarıyla rahat hissetmeyebilir. Daha akıcı ve interaktif bir yaklaşıma ihtiyacınız varsa, Kutools for Excel'deki Hücre Rengine Göre Grafik Rengini Değiştir özelliği etkili bir çözüm sunar. Bu araç, grafiğinizde tek veya birden fazla veri serisi olsa bile hücre dolgu renklerini ilgili grafik öğelerine otomatik olarak uygular ve hücre renklerini daha sonra güncellerseniz bile (basit bir yeniden uygulama eşleştirmeyi yenileyecektir).

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

1. Renklendirmek istediğiniz grafiği ekleyin. Grafiği seçin, ardından Kutools > Grafikler > Grafik Araçları > Hücre Rengine Göre Grafik Rengini Değiştir yolunu izleyin, aşağıdaki resimde gösterildiği gibi:

2. İstendiğinde, ekrana gelen iletişim kutusunda Tamam'a tıklayın.

3. Aşağıdaki örneklerde gösterildiği gibi, grafik hemen hücre renklerinizi eşleştirecek şekilde güncellenecektir:

Hücre rengine göre tek bir veri serisiyle grafiği renklendirme

Hücre rengine göre birden fazla veri serisiyle grafiği renklendirme

Bu özellik, grafik renklerini otomatik olarak eşleştirmeniz gereken ve veri güncellemelerinden bağımsız olarak tekrar kullanılabilir bir çözüm arayan herkes için idealdir. Manuel biçimlendirme veya makrolar çalıştırma ile karşılaştırıldığında önemli ölçüde zaman kazandırır ve birden fazla kişinin veri veya grafik sunumlarını düzenlediği işbirlikçi ortamlarda özellikle faydalıdır.

Kutools for Excel Ücretsiz Deneme ve İndirme İçin Tıklayın!

Daha fazla ilgili grafik makalesi: