Klasse LegendKey (Excel VBA)

Die Klasse LegendKey stellt ein Legendensymbol in einer Diagrammlegende dar.

Die wichtigste Prozedur der Klasse LegendKey ist Delete

Set

Um eine LegendKey -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim lky as LegendKey
Set lky = ActiveChart.Legend.LegendEntries(1).LegendKey

Klassen Variablen vom Typ LegendKey können mit der Prozedur LegendEntry.LegendKey festgelegt werden

Methoden

Dies ist die Hauptmethode der Klasse LegendKey

Delete - Löscht das Objekt.

ActiveChart.Legend.LegendEntries(1).LegendKey.Delete

Andere Methoden

ClearFormats - Löscht die Formatierung des Objekts.

Eigenschaften

Format Gibt das ChartFormat -Objekt zurück.

Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveChart.Legend.LegendEntries(1).LegendKey.Format

Height Gibt einen Double -Wert zurück, der die Höhe des Objekts in Punktendarstellt.

Dim dblHeight As Double
dblHeight = ActiveChart.Legend.LegendEntries(1).LegendKey.Height

InvertIfNegative True , wenn Microsoft Excel das Muster im Element invertiert, wenn es eine negative Zahl entspricht.

ActiveChart.Legend.LegendEntries(1).LegendKey.InvertIfNegative = True

Left Gibt einen Double -Wert zurück, der den Abstand (in Punkt) vom linken Rand des Objekts zum linken Rand des Diagrammbereichs darstellt.

Dim dblLeft As Double
dblLeft = ActiveChart.Legend.LegendEntries(1).LegendKey.Left

MarkerBackgroundColor Legt die Hintergrundfarbe des Markers als RGB -Wert fest oder gibt den entsprechenden Farb Indexwert zurück.

ActiveChart.Legend.LegendEntries(1).LegendKey.MarkerBackgroundColor = RGB(0,0,255)'blue

MarkerBackgroundColorIndex Zurückgeben oder festlegen die Hintergrundfarbe Markierung als Indexwert in der aktuellen Farbpalette oder als eine der folgenden XlColorIndex -Konstanten: XlColorIndexAutomatic oder xlColorIndexNone wird.

ActiveChart.Legend.LegendEntries(1).LegendKey.MarkerBackgroundColorIndex = xlColorIndexAutomatic

MarkerForegroundColor Legt die Vordergrundfarbe des Markers als RGB -Wert fest oder gibt den entsprechenden Farb Indexwert zurück.

ActiveChart.Legend.LegendEntries(1).LegendKey.MarkerForegroundColor = RGB(0,0,255)'blue

MarkerForegroundColorIndex Zurückgeben oder festlegen die Vordergrundfarbe von Datenpunkten als Indexwert in der aktuellen Farbpalette oder als eine der folgenden XlColorIndex -Konstanten: XlColorIndexAutomatic oder xlColorIndexNone wird.

ActiveChart.Legend.LegendEntries(1).LegendKey.MarkerForegroundColorIndex = xlColorIndexAutomatic

MarkerSize Gibt die Größe der Datenmarkierung in Punktzurück oder legt Sie fest.

ActiveChart.Legend.LegendEntries(1).LegendKey.MarkerSize =

MarkerStyle Gibt die Art der Markierung für einen Datenpunkt oder für eine Datenreihe in einem Liniendiagramm, Punkt (XY)-Diagramm oder Netzdiagramm zurück oder legt sie fest.

ActiveChart.Legend.LegendEntries(1).LegendKey.MarkerStyle = xlMarkerStyleAutomatic

Parent Gibt das übergeordnete Objekt für das angegebene Objekt zurück.

Dim objParent As Object
Set objParent = ActiveChart.Legend.LegendEntries(1).LegendKey.Parent

PictureType Gibt einen XlChartPictureType -Wert zurück, der angibt, wie Bilder auf einem Legendenschlüssel angezeigt werden, oder legt diesen fest.

ActiveChart.Legend.LegendEntries(1).LegendKey.PictureType =

PictureUnit2 Gibt oder die Einheit für jede Grafik des Diagramms festgelegt, wenn die PictureType -Eigenschaft auf XlStackScale festgelegt ist (ist das nicht der Fall, wird diese Eigenschaft ignoriert).

ActiveChart.Legend.LegendEntries(1).LegendKey.PictureUnit2 =

Shadow Gibt einen Boolean-Wert zurück, der bestimmt, ob das Objekt einen Schatten aufweist, oder legt diesen Wert fest.

ActiveChart.Legend.LegendEntries(1).LegendKey.Shadow = True

Smooth True, Wenn die Kurve Glättung für das Legendensymbol aktiviert ist.

ActiveChart.Legend.LegendEntries(1).LegendKey.Smooth = True

Top Gibt einen Double -Wert zurück, der den Abstand (in Punkt) vom oberen Rand des Objekts zum Anfang der Zeile 1 (auf einem Arbeitsblatt) oder zum oberen Bereich des Diagrammbereichs (in einem Diagramm) darstellt.

Dim dblTop As Double
dblTop = ActiveChart.Legend.LegendEntries(1).LegendKey.Top

Width Gibt einen Double -Wert zurück, der die Breite des Objekts in Punktdarstellt.

Dim dblWidth As Double
dblWidth = ActiveChart.Legend.LegendEntries(1).LegendKey.Width