Die Methode AddColorScale() wird mit dem Wert 3 für den Parameter Type aufgerufen. Bei der Änderung wird auch die Farbe für das Auflistungselement xlConditionValuePercentile geändert. Beim Perzentil handelt es sich um einen bestimmten mittleren Wert aus der Statistik.
Sub DreiFarbenSkala()
Dim rg As Range
ThisWorkbook.Worksheets("Tabelle6").Activate
Set rg = Range("A2:A11")
rg.FormatConditions.Delete
' DreiFarbenSkala erzeugen
rg.FormatConditions.AddColorScale 3
' DreiFarbenSkala ändern
With rg.FormatConditions(1)
.ColorScaleCriteria(1).Type = _
xlConditionValueLowestValue
.ColorScaleCriteria(1).FormatColor.Color = _
vbGreen
.ColorScaleCriteria(2).Type = _
xlConditionValuePercentile
.ColorScaleCriteria(2).FormatColor.Color = _
vbYellow
.ColorScaleCriteria(3).Type = _
xlConditionValueHighestValue
.ColorScaleCriteria(3).FormatColor.Color = _
vbRed
End With
End Sub
Dreifarbige Farbskala mit VBA in Microsoft Excel
War die Erklärung zu "Dreifarbige Farbskala mit VBA in Microsoft Excel" hilfreich? Jetzt bewerten:
Weitere Erklärungen zu
- Portfolio-Analyse / BCG Matrix
- Wirtschaftskreislauf
- Produktlebenszyklus
- Produktionsfaktoren (VWL)
- Preisstrategien
- Matrixorganisation
- Aufbauorganisation
- Mehrliniensystem
- Rechtsgeschäfte: Form, Nichtigkeit und Anfechtbarkeit
- Bezugsquellenermittlung
- Skaleneffekte
- Rechnungsabgrenzung
- Stablinienorganisation
- Ablauforganisation
- Preisbildung auf den Märkten