Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
19.04.2024 13:58:02
Set Worksheet geht im O365 aber im Excel 2016 nicht
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1736to1740
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1736to1740
1736to1740
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ThemeColor Variable für Chart

ThemeColor Variable für Chart
29.01.2020 09:43:49
KaEmGe
Hallo,
ich versuche gerade ein variabel gestaltetes Diagramm zu formatieren.
Jede SeriesCollection soll immer die gleiche Farbe erhalten.
Nun scheitere ich daran "msoThemeColorAccent" in eine Variable umzusetzen, finde aber auch keine Antworten im Netz, die ich für mich umbauen kann.
Versucht habe ich:
    [...]    For i = 1 To .SeriesCollection.Count
Dim ThemeColor As Long
>>> Funktioniert nicht

Kann mich jemand in die richtige Richtung schubsen?

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ThemeColor Variable für Chart
29.01.2020 09:58:22
Nepumuk
Hallo,
msoThemeColorAccentX ist eine Konstante die einen bestimmten Zahlenwert zurück gibt. Die kannst du nicht als String behandeln und zusammenbauen. Schau dir das mal im Objektkatalog an.
Gruß
Nepumuk
AW: ThemeColor Variable für Chart
29.01.2020 09:58:42
Daniel
Hi
das geht auch nicht.
man kann in VBA Variablennamen nicht wie Textstrings zusammensetzen, sondern muss sie immer vollständig hinschreiben.
du müsstest das hier dann wirklich komplett ausprogrammieren:
Select Case i
Case 1: ThemeColor = msoThemeColorAccent1
Case 2: ThemeColor = msoThemeColorAccent2
Case 3: ThemeColor = msoThemeColorAccent3
usw
End Select
du könntst hier aber ausnutzen, dass die msoThemColorAccentX-Konstanten jeweils einen Wert haben, der parallel zur Nummerierung mit ansteigt: 
 msoThemeColorAccent1 = 5
msoThemeColorAccent2 = 6
msoThemeColorAccent3 = 7
usw
und dann schreiben: 
ThemeColor = i + 4

Gruß Daniel
Anzeige
AW: ThemeColor Variable für Chart
29.01.2020 10:06:21
KaEmGe
Ich danke euch beiden, hatte jetzt schon überlegt ein Array mit den RGG-Werten anzulegen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige