Hoe een grafiek te kleuren op basis van celkleur in Excel?
Wanneer je een standaardgrafiek maakt in Excel, zoals een kolom- of staafdiagram, worden de reeksen of gegevenspunten toegewezen aan Excel's standaardkleuren, wat mogelijk niet overeenkomt met de vulkleuren in je gegevensbereik. Er zijn echter veel scenario's - zoals dashboards, rapporten of datavisualisaties - waarbij je wilt dat de staafjes in je grafiek exact overeenkomen met de kleuren die je hebt toegepast op de brongcellen. Dit kan helpen om visuele consistentie te behouden, het gemakkelijker maken om gegevens in één oogopslag te interpreteren, of categoriegroeperingen te versterken die kleur gebruiken als een teken voor betekenis. Bijvoorbeeld, je wilt misschien dat elke kolom in je grafiek de kleurcodering weerspiegelt die in je samenvattingstabel is toegepast, zoals te zien is in de onderstaande schermafbeelding. Excel biedt geen direct ingebouwde functie om celvulkleuren (vooral handmatige) automatisch te koppelen aan grafikelementen, dus zijn verschillende methoden vereist, afhankelijk van of de celkleur handmatig is toegepast of op basis van een formule of regel. Hieronder worden meerdere praktische oplossingen aangeboden om je te helpen deze correspondentie effectief te bereiken in verschillende scenario's.
Kleur de grafiek met één of meerdere gegevensreeksen op basis van celkleur met VBA-codes
Kleur de grafiek met één of meerdere gegevensreeksen op basis van celkleur met een geweldige functie
Kleur de grafiek met één of meerdere gegevensreeksen op basis van celkleur met VBA-codes
Kleur de grafiek met één gegevensreeks op basis van celkleur
Als je wilt dat de staafjes in je grafiek de vulkleur van hun bijbehorende cellen overnemen en je kleurtoewijzingen handmatig zijn toegepast (niet via voorwaardelijke opmaak of formules), kun je VBA gebruiken om de staafkleuren van de grafiek te synchroniseren met de originele celkleuren. Deze techniek is vooral nuttig voor grafieken met één reeks, waarbij visuele overeenkomst essentieel is voor duidelijkheid of rapportagestandaarden.
1. Selecteer eerst je gegevens en maak een staaf- of kolomdiagram. Om dit te doen, selecteer je de relevante cellen en klik je op Invoegen > Invoegen Kolom of Staafdiagram. Je zou een standaardgrafiek moeten zien zoals in de onderstaande schermafbeelding:
2. Druk op ALT + F11 om de Microsoft Visual Basic for Applications (VBA)-editor te openen.
3. Klik in het VBA-venster op Invoegen > Module. Kopieer en plak vervolgens de volgende code in het modulevenster. Dit script zal elke grafiekstaaf bijwerken om overeen te komen met de vulkleur van de bijbehorende cel.
VBA-code: Kleur grafiekstaven met één gegevensreeks op basis van celkleur:
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. Nadat je de code hebt ingevoerd, druk op F5 om de macro uit te voeren. De grafiekstaven zouden nu de vulkleuren van de brongcellen moeten weerspiegelen, wat onmiddellijk visuele overeenkomst biedt, zoals te zien is in de volgende schermafbeelding:
Deze methode is voordelig voor grafieken waarbij celvulkleuren handmatig zijn ingesteld en frequente handmatige aanpassingen worden verwacht. Houd er echter rekening mee dat als de celkleuren veranderen, je de VBA opnieuw moet uitvoeren om de grafiek bij te werken, aangezien de koppeling niet dynamisch is. Vergeet ook niet om je werkmap op te slaan als een macro-ingeschakeld bestand (.xlsm) zodat de code blijft bestaan.
Kleur de grafiek met meerdere gegevensreeksen op basis van celkleur
Als je grafiek meerdere gegevensreeksen bevat (bijvoorbeeld verschillende producten over tijd of verschillende categorieën), kun je een vergelijkbare VBA-benadering gebruiken om elk staafsegment of datapunt te koppelen aan de vulkleur van de brongcel. Dit kan helpen om je rapporten visueel uitgelijnd te houden en het gemakkelijk te maken voor kijkers om gegevens tussen het werkblad en de grafiek te kruisverwijzen.
1. Stel je gegevens in en maak een multi-serie staaf- of kolomgrafiek zoals hieronder weergegeven:
2. Druk op ALT + F11 om de VBA-editor te openen.
3. Klik in het VBA-venster op Invoegen > Module en plak de volgende code in:
VBA-code: Kleur grafiekstaven met meerdere gegevensreeksen op basis van celkleur:
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. Voer deze code uit door op F5 te drukken. De reeksen van je grafiek zullen worden bijgewerkt om de celvulkleuren in je gegevensbereik weer te geven, zoals hieronder geïllustreerd:
- De code verwijst standaard naar de grafiek als Chart1. Pas deze aan om overeen te komen met de werkelijke naam van je grafiek indien nodig.
- Deze aanpak ondersteunt ook lijngrafieken, niet alleen staaf- of kolomtypen.
- Als je problemen tegenkomt (zoals geen update of fouten), controleer dan of de gegevensreeksen van je grafiek en het celkleurbereik één-op-één zijn uitgelijnd.
Hoewel deze techniek je volledige controle en flexibiliteit biedt voor handmatig gekleurde gegevens, behandelt het geen gevallen waarin kleur wordt gegenereerd via voorwaardelijke opmaak of automatisch door formules. In die situaties, zie de formule-gebaseerde en voorwaardelijke opmaakoplossingen hieronder voor meer dynamische opties.
Kleur de grafiek met één of meerdere gegevensreeksen op basis van celkleur met een geweldige functie
Hoewel VBA de kleuren van grafieken kan synchroniseren met celvullingen, vereist het het handmatig uitvoeren van code en sommige gebruikers kunnen zich niet op hun gemak voelen met macro's of VBA-beveiligingsmeldingen. Als je op zoek bent naar een meer gestroomlijnde en interactieve aanpak, biedt de functie Verander Grafiekkleur Volgens Celkleur in Kutools voor Excel een efficiënte oplossing. Deze tool past celvulkleuren automatisch toe op de bijbehorende grafikelementen, of je nu één of meerdere gegevensreeksen in je grafiek hebt, en werkt zelfs als je de celkleuren later bijwerkt (een eenvoudige her-toepassing vernieuwt de koppeling).
Na het installeren van Kutools voor Excel ga je als volgt te werk:
1. Voeg de grafiek in die je wilt kleuren. Selecteer de grafiek, ga vervolgens naar Kutools > Grafieken > Grafiektools > Verander Grafiekkleur Volgens Celkleur, zoals te zien is in de onderstaande afbeelding:
2. Klik gewoon op OK in het dialoogvenster dat verschijnt.
3. De grafiek wordt onmiddellijk bijgewerkt om overeen te komen met je celkleuren, zoals te zien is in de volgende voorbeelden:
Kleur de grafiek met één gegevensreeks op basis van celkleur
Kleur de grafiek met meerdere gegevensreeksen op basis van celkleur
Deze functie is ideaal voor iedereen die regelmatig grafiekkleuren automatisch moet laten overeenkomen en een herbruikbare oplossing wil, ongeacht gegevensupdates. Het bespaart aanzienlijk veel tijd in vergelijking met handmatige opmaak of het uitvoeren van macro's, en is vooral handig in samenwerkingsomgevingen waar meerdere personen gegevens of grafiekpresentaties bewerken.
Download en probeer Kutools voor Excel Nu Gratis!
Meer gerelateerde grafieken artikelen:
- Maak Een Staafdiagram Over Een Ander Staafdiagram In Excel
- Wanneer we een gegroepeerd staaf- of kolomdiagram met twee gegevensreeksen maken, worden de staafjes van de twee gegevensreeksen naast elkaar weergegeven. Maar soms moeten we een overlappend of over elkaar heen liggend staafdiagram gebruiken om de twee gegevensreeksen duidelijker te vergelijken. In dit artikel zal ik bespreken hoe je een overlappend staafdiagram in Excel maakt.
- Kopieer Eén Grafiekformaat Naar Anderen In Excel
- Stel dat er meerdere verschillende typen grafieken in je werkblad staan, heb je één grafiek naar wens opgemaakt, en nu wil je deze grafiekopmaak toepassen op andere grafieken. Natuurlijk kun je de andere grafieken handmatig een voor een opmaken, maar dit zal veel tijd kosten. Zijn er snelle of handige manieren om één grafiekformaat naar andere grafieken in Excel te kopiëren?
- Markeer Max En Min Gegevenspunten In Een Grafiek
- Als je een kolomdiagram hebt waarin je de hoogste of kleinste gegevenspunten wilt markeren met verschillende kleuren om ze te laten uitblinken, zoals te zien is in de onderstaande schermafbeelding. Hoe kun je de hoogste en kleinste waarden identificeren en vervolgens de gegevenspunten in de grafiek snel markeren?
- Maak Een Stapdiagram In Excel
- Een stapdiagram wordt gebruikt om veranderingen te tonen die op onregelmatige intervallen plaatsvinden, het is een uitgebreide versie van een lijndiagram. Maar er is geen directe manier om het in Excel te maken. In dit artikel zal ik bespreken hoe je stap voor stap een stapdiagram maakt in een Excel-werkblad.
- Maak Voortgangsbalkdiagram In Excel
- In Excel kan een voortgangsbalkdiagram je helpen om voortgang naar een doel te monitoren, zoals te zien is in de onderstaande schermafbeelding. Maar hoe kun je een voortgangsbalkdiagram maken in een Excel-werkblad?
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen