Microsoft Office Tutorials and References
In Depth Information
7.7.4 Symbolsatz
Abbildung 7.23
Dreifarbige Skala
7.7.4 Symbolsatz
Statt mit Datenbalken oder Farben können die Größenverhältnisse einer
Reihe von Zahlen auch durch unterschiedliche Symbole verdeutlicht
werden, siehe nachfolgendes Programm:
Sub Symbolsatz()
Dim rg As Range
ThisWorkbook.Worksheets("Tabelle6").Activate
Set rg = Range("A2:A11")
rg.FormatConditions.Delete
' Symbolsatz erzeugen
rg.FormatConditions.AddIconSetCondition
' Symbolsatz ändern
With rg.FormatConditions(1)
.IconSet = ActiveWorkbook.IconSets(1)
.IconCriteria(2).Value = 45
.IconCriteria(3).Value = 90
End With
End Sub
Zur Erläuterung:
Mithilfe der Methode AddIconSetCondition() wird ein Objekt der
Klasse IconSetCondition erzeugt. Dies ist eine bedingte Formatie-
rung in Form eines Symbolsatzes.
AddColorScale()
Der Typ des Symbolsatzes kann verändert werden. Dazu wird der
Eigenschaft IconSet der betreffenden bedingten Formatierung ein Ele-
ment der Auflistung IconSets der aktiven Arbeitsmappe zugewiesen.
IconSet
Search JabSto ::




Custom Search