Skip to main content

Kutools voor Office — Eén Suite. Vijf Tools. Verwezenlijkt Meer.

Hoe kan ik de pictogramsetkleur van voorwaardelijke opmaak in Excel wijzigen?

Author Sun Last modified

Bij het werken met pictogramsets voor voorwaardelijke opmaak in Excel, valt het je misschien op dat elk pictogram standaard gekoppeld is aan een specifieke kleur. Meestal wordt een waarde die groter is dan 67% van alle waarden weergegeven als een groene pijl omhoog. Als de waarde tussen 33% en 67% ligt, wordt er een gele horizontale pijl getoond, en waarden onder de 33% worden aangegeven met een rode pijl omlaag. Deze standaard pictogramkleuren zijn echter vast en kunnen niet eenvoudig worden gewijzigd via de standaard Excel-opties. Wil je deze pictogramsetkleuren wijzigen om ze beter aan je voorkeuren of rapportagestijl aan te passen, zoals te zien is in de onderstaande schermafbeeldingen?

normal icon set arrow right change conditional formatting icon set color

Wijzig de pictogramset voor voorwaardelijke opmaak

VBA aangepaste voorwaardelijke opmaak pictogramset


Wijzig de pictogramset voor voorwaardelijke opmaak

Momenteel biedt Excel geen ingebouwde manier om de kleuren van pictogramsets voor voorwaardelijke opmaak direct te wijzigen. Je kunt echter een creatieve oplossing gebruiken door handmatig symbolen (zoals pijlen) in te voegen en vervolgens voorwaardelijke opmaak toe te passen om hun kleuren naar wens aan te passen. Deze flexibele aanpak stelt je in staat om pictogramkleuren aan je eigen voorkeuren of rapportagestandaarden aan te passen. Deze methode is vooral nuttig in dashboards, visuele rapporten of wanneer bedrijfsbranding kleurcoördinatie vereist.

Hier is hoe je deze methode kunt implementeren, die niet alleen het mogelijk maakt om de kleuren aan te passen, maar ook het selecteren van specifieke pictogramvormen toestaat door gebruik te maken van symbolen uit lettertypen zoals Wingdings3:

1. Selecteer een lege cel naast je gegevenslijst, bijvoorbeeld F2. Voer 67% in in F2, voer 33% in in F3 en 0% in F4. Dit creëert je percentielgrenzen voor de weergave van voorwaardelijke pictogrammen.
prepare the data

2. Voer in cel G2 de volgende formule in om de waarde boven 67% te berekenen. (in dit geval vertegenwoordigt C1:C8 je waarde lijst), sleep daarna de vulgreep naar beneden om elke waarde te berekenen.

=PERCENTILE($C$1:$C$8, F2)

use a formula to calculate the value line above specific value

3. Voeg vervolgens in H2 je eerste pictogram in door te klikken op Invoegen > Symbool. Selecteer in het Symboolvenster Wingdings3 in de Font-keuzelijst, selecteer en voeg een omhoogpijl-symbool in (bijvoorbeeld tekenencode 232) in H2. Dit symbool vertegenwoordigt hoge waarden. Zie screenshots:

click Insert > Symbol    
select an arrow in the dialog box arrow right insert the arrow

4. Herhaal het bovenstaande om een horizontale pijl in H3 en een neerwaartse pijl in H4 in te voegen voor je middelste en lage waarden. Controleer de symboolselectie dubbel om overeen te komen met je beoogde visuele ontwerp.
repeat to insert arrows to each cell

5. Voer nu in kolom B (naast je waarde lijst beginnend bij C1) deze formule in B1 in om een pictogram toe te wijzen op basis van elke waarde. Na het invoeren van de formule, sleep de vulgreep naar beneden om de formule langs je hele lijst met waarden te vullen.

=IF(C1="","",IF(C1>=$G$2,$H$2,IF(C1>=$G$3,$H$3,$H$4)))

Tip:

  • C1: Verwijzing naar je waardecel.
  • G2: is de 67%-waardegrens.
  • H2: Symbool (pijl) weergegeven voor de hoogste waarden.
  • G3: is de 33%-waardegrens.
  • H3: Pijl voor middelmatige waarden.
  • G4: is de waarde onder 33%.
  • H4: Pijl voor lage waarden.
type a formula and fill it to other cells

 

6. Markeer het bereik met de pijlen (bijvoorbeeld cellen B1:B8), en stel vervolgens het lettertype van deze cellen in op Wingdings3. Deze stap zorgt ervoor dat de pijlen correct worden weergegeven als symbolen in plaats van willekeurige letters of tekens.
format font of these cells as Wingdings3

7. Om de pijlen te kleuren volgens je gewenste kleurenschema, selecteer het pictogrambereik, ga naar Start > Voorwaardelijke opmaak > Nieuwe regel. Dit opent het dialoogvenster om opmaakvoorwaarden te creëren voor je aangepaste pictogrammen.
click Home > Conditional Formatting > New Rule

8. Kies in het Nieuwe opmaakregel dialoogvenster Gebruik een formule om te bepalen welke cellen moeten worden opgemaakt. Voer deze formule in om je hoogste waarden te richten: =$C1>=$G$2. Klik op Opmaak, ga naar het tabblad Lettertype en selecteer je gewenste kleur voor de omhoogpijlen (bijvoorbeeld rood voor nadruk).
set options in the dialog box

Tip: Controleer dubbel of je absolute en relatieve celverwijzingen correct zijn om ervoor te zorgen dat de opmaak zoals bedoeld wordt toegepast, vooral als je voorwaarden kopieert naar andere bereiken.

9. Klik OK twee keer om deze nieuwe opmaak toe te passen. Je omhoogpijlen moeten nu verschijnen in de gekozen kleur.
the up arrows have been formatted with red color

10. Herhaal het proces voor de horizontale en neerwaartse pijlen, gebruikmakend van de volgende formules in het dialoogvenster Nieuwe Regel:

Horizontale pijlen opmaken:

=AND($C1<$G$2,$C1>=$G$3)

Neerwaartse pijlen opmaken:

=$C1<$G$3

Voeg verschillende kleuren toe voor elk type pijl naar wens.

repeat to set rule for other arrows
all arrows are changed to the color you set

 

Daarnaast kun je het uiterlijk verder fijn afstellen door handmatig de lettertypekleur van de pijlen te wijzigen op elk moment via de Lettertypekleur knop onder het Start tabblad. Dit is handig voor het snel aanpassen van kleuren zonder de onderliggende voorwaardelijke regels te wijzigen.
format the font color of arrows to another color by Font Color

Door deze stappen te volgen, kun je pictogramsets simuleren met aangepaste kleuren, wat helpt om je rapporten visueel onderscheidender en beter afgestemd op je behoeften te maken. Deze tijdelijke oplossing is het meest geschikt wanneer je volledige controle nodig hebt over pictogramkleuren of wanneer je moet voldoen aan de esthetische eisen van een rapport. Houd er echter rekening mee dat deze aanpak extra kolommen en zorgvuldig formulebeheer vereist; pictogramuitlijning kan verschillen van de standaard ingebouwde pictogramsets.

Als je een oplossing nodig hebt die naadlozer werkt met ingebouwde pictogrammen, of als je meer geavanceerde pictogramaanpassingen wilt (zoals het gebruik van afbeeldingen of volledig nieuwe pictogrammen), raadpleeg dan de hieronder beschreven VBA-alternatief.

VBA-code - Maak een aangepaste pictogramset voor voorwaardelijke opmaak (door de gebruiker gedefinieerde afbeeldingen of kleuren)

Een beperking van standaard Excel is dat je de kleur van ingebouwde pictogramsets in voorwaardelijke opmaak niet direct kunt wijzigen. Om dit te omzeilen, kun je VBA gebruiken om programmatisch vormen of afbeeldingen (zoals gekleurde pictogrammen of aangepaste afbeeldingen) in cellen in te voegen op basis van celwaarden. Deze techniek is vooral effectief wanneer je pictogrammen in elke kleur of stijl wilt weergeven, wat gaat voorbij de ingebouwde Excel-opties.

1. Klik op Ontwikkelhulpprogramma's > Visual Basic om de VBA-editor te openen. Klik in het nieuwe Microsoft Visual Basic for Applications-venster op Invoegen > Module, en kopieer en plak de volgende code in de nieuwe module:

Sub CustomConditionalIcons()
    Dim rng As Range
    Dim cell As Range
    Dim ws As Worksheet
    Dim upIcon As String, midIcon As String, downIcon As String
    Dim upColor As Long, midColor As Long, downColor As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set ws = ActiveSheet
    Set rng = Application.InputBox("Select data range for custom icons", xTitleId, Selection.Address, Type:=8)
    
    ' Define Unicode symbols to use as icons (can replace with other symbols or images if desired)
    upIcon = ChrW(9650) ' ▲ Up triangle
    midIcon = ChrW(9651) ' △ Mid triangle
    downIcon = ChrW(9660) ' ▼ Down triangle
    
    ' Define colors (RGB)
    upColor = RGB(0, 176, 80) ' Green
    midColor = RGB(255, 192, 0) ' Yellow
    downColor = RGB(255, 0, 0) ' Red
    
    ' Remove existing shapes/icons from the range
    Dim sh As Shape
    For Each sh In ws.Shapes
        If Not Intersect(sh.TopLeftCell, rng) Is Nothing Then
            If Left(sh.Name, 13) = "CustomIconSet" Then
                sh.Delete
            End If
        End If
    Next
    
    ' Loop through cells and add custom icons
    For Each cell In rng
        If IsNumeric(cell.Value) Then
            Dim percentile67 As Double, percentile33 As Double
            percentile67 = Application.WorksheetFunction.Percentile(rng, 0.67)
            percentile33 = Application.WorksheetFunction.Percentile(rng, 0.33)
            
            Dim iconText As String
            Dim iconColor As Long
            
            If cell.Value >= percentile67 Then
                iconText = upIcon
                iconColor = upColor
            ElseIf cell.Value >= percentile33 Then
                iconText = midIcon
                iconColor = midColor
            Else
                iconText = downIcon
                iconColor = downColor
            End If
            
            ' Insert icon as a TextBox shape
            Dim iconShape As Shape
            Set iconShape = ws.Shapes.AddTextbox(msoTextOrientationHorizontal, cell.Left + 2, cell.Top + 2, cell.Width - 4, cell.Height - 4)
            iconShape.TextFrame.Characters.Text = iconText
            
            With iconShape.TextFrame2.TextRange.Font
                .Size = cell.Font.Size
                .Fill.ForeColor.RGB = iconColor
                .Name = cell.Font.Name
            End With
            
            iconShape.Name = "CustomIconSet" & cell.Address(0, 0)
            iconShape.Line.Visible = msoFalse
            iconShape.TextFrame.HorizontalAlignment = xlHAlignCenter
            iconShape.TextFrame.VerticalAlignment = xlVAlignCenter
            iconShape.Placement = xlMoveAndSize
        End If
    Next
End Sub

2. Voer vervolgens de macro uit door op F5 te drukken (of klik op de Run button knop). Wanneer gevraagd, selecteer het bereik waar je je aangepaste pictogrammen wilt weergeven. De macro zal gekleurde pictogrammen invoegen, gebruikmakend van tekstvakken, op basis van elke celwaarde ten opzichte van de percentielen van de groep.

Opmerkingen:
  • Als je gegevens veranderen, voer de macro opnieuw uit om de pictogrammen bij te werken of te vernieuwen. Gebruikers moeten macros inschakelen om deze functie te laten werken. Vormen kunnen handmatig of met macrocode worden verwijderd voor hergebruik.
  • Houd er rekening mee dat het uitvoeren van deze code je waarden zal overschrijven met pictogrammen—zorg ervoor dat je je gegevens backupt voordat je doorgaat.

Deze VBA-aanpak is uitermate veelzijdig—pictogrammen, kleuren en vormen zijn volledig aanpasbaar, waardoor het geschikt is voor expertdashboards waar merkrichtlijnen of publiek zeer specifieke visuele signalen vereisen.

Samenvattend hebben ingebouwde Excel-pictogramsets vaste kleuren, maar verschillende alternatieve technieken stellen je in staat om aangepaste, kleurrijke pictogrammen toe te passen op je spreadsheets. Kies de handmatige symbool- en voorwaardelijke opmaakoplossing voor volledige lay-outcontrole; gebruik VBA om elke afbeelding of symbool met programmeerbare kleuren te plaatsen; Elke aanpak heeft zijn eigen voordelen en overwegingen, waardoor je de beste oplossing voor je specifieke data visualisatiebehoeften kunt vinden.

a screenshot of kutools for excel ai

Ontdek de Magie van Excel met Kutools AI

  • Slimme Uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak diagrammen – allemaal aangestuurd door eenvoudige commando's.
  • Aangepaste Formules: Genereer op maat gemaakte formules om uw workflows te versnellen.
  • VBA-codering: Schrijf en implementeer VBA-code moeiteloos.
  • Formule-uitleg: Begrijp complexe formules gemakkelijk.
  • Tekstvertaling: Overbrug taalbarrières binnen uw spreadsheets.
Verhoog uw Excel-mogelijkheden met AI-aangedreven tools. Download Nu en ervaar een ongekende efficiëntie!

Beste productiviteitstools voor Office

🤖 Kutools AI Assistent: Transformeer data-analyse door: Intelligente uitvoering |Code genereren |Aangepaste formules maken |Gegevens analyseren en grafieken genereren |Kutools functies aanroepen
Populaire functies: Dubbele waarden markeren | Verwijder lege rijen | Kolommen of cellen samenvoegen zonder gegevensverlies |   Afronden zonder formule...
Super ZOEKEN: Meervoudig-criteria opzoeken | Meervoudige waarde opzoeken | Meervoudig-blad opzoeken | Fuzzy Match....
Geavanceerde keuzelijst: Keuzelijst snel maken | Afhankelijke keuzelijst | Meervoudige selectie in keuzelijst....
Kolombeheer: Specifiek aantal kolommen toevoegen | Kolommen verplaatsen | Zichtbaarheidsstatus van verborgen kolommen wisselen | Bereik & kolommen vergelijken...
Uitgelichte functies: Rasterfocus | Ontwerpweergave | Verbeterde formulebalk | Werkboek- & Werkbladbeheer | AutoTekstbibliotheek | Datumkiezer | Gegevens samenvoegen | Cellen coderen/decoderen | E-mail verzenden via lijst | Superfilter | Speciaal filter (filter cellen met vetgedrukt/cursief/doorhalen...)...
Top15 gereedschapssets:12 teksttools (Tekst toevoegen, Specifieke tekens verwijderen, ...) | 50+ grafiek typen (Gantt-diagram, ...) | 40+ praktische formules (Leeftijd berekenen op basis van geboortedatum, ...) | 19 invoegtools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...) | 12 conversietools (Omzetten naar woorden, Valutaconversie, ...) | 7 Samenvoeg- & splitsgereedschappen (Geavanceerd samenvoegen van rijen, Cellen splitsen, ...) | ... en meer
Gebruik Kutools in je voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en meer dan40 andere talen!

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.

Excel Word Outlook Tabs PowerPoint
  • 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