Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1868to1872
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Linie im Diagramm einfärben

Linie im Diagramm einfärben
17.02.2022 14:05:08
tursiops
Hallo!
Ich möchte mit VBA eine Linie im meinem Diagramm einfärben.
Per Makrorecorder wird das für die einzelnen Farben/Situationen langsam etwas mühselig.
Könnte mir jemand helfen diesen Code zu optimieren:

Sub Makro6()
ActiveSheet.ChartObjects("Diagramm 1").Activate
ActiveChart.FullSeriesCollection(1).Select
With Selection.Format.Line
.Visible = msoTrue
.ForeColor.RGB = RGB(0, 150, 255)
.Transparency = 0
End With
End Sub
Idealerweise sollte der Code die aktuelle Hintergrundfarbe die Zelle M14 im gleichen Arbeitsblatt auslesen und verwenden.
Ich habe es vielfach selbst versucht und bin gescheitert :(

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Linie im Diagramm einfärben
17.02.2022 14:11:38
Nepumuk
Hallo tursiops,
teste mal:

Public Sub ColorLine()
ActiveSheet.ChartObjects("Diagramm 1").Chart.SeriesCollection(1).Format.Line.ForeColor.RGB = Cells(14, 13).Interior.Color
End Sub
Gruß
Nepumuk
AW: Linie im Diagramm einfärben
17.02.2022 14:18:37
tursiops
Hallo!
Das klappt perfekt, vielen Dank!
Man, was habe ich mich gequält - und nun ist es EINE Code-Zeile...
Ich bin begeistert!
Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige