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:
Danach haben Besucher gesucht
- dreifarbigfeskala erstellen
Weitere Erklärungen zu Skriptsprachen
- Dateien suchen und auflisten mit VBA in Microsoft Excel
- Zellen löschen mit VBA in Microsoft Excel
- Zeitintervall addieren mit VBA in Microsoft Excel
- Zellen zählen mit VBA in Microsoft Excel
- Datei speichern unter mit VBA in Microsoft Excel
- SmartArt mit VBA in Microsoft Excel
- Zeitdifferenz berechnen mit VBA in Microsoft Excel
- Export von Datensätzen mit VBA in Microsoft Excel
- Versenden einer Arbeitsmappe mit VBA in Microsoft Excel
- Einheitenumrechnung mit VBA in Microsoft Excel
- Dreifarbige Farbskala mit VBA in Microsoft Excel
- Erstellen einer Serien-E-Mail mit VBA in Microsoft Excel
- Methode Application.InputBox mit VBA in Microsoft Excel
- VBA-Makro per Schaltfläche ausführen
- Import von Datensätzen mit VBA in Microsoft Excel