Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

.ThemeColorScheme.Load

Forumthread: .ThemeColorScheme.Load

.ThemeColorScheme.Load
01.01.2009 22:00:00
Sonnenpeter
Hallo,
ich bin gerade dabei die Color Schemen zu durchforsten.
Leider erhalte ich beim aufzeichnen des Makros für das Colorschema "Larissa"
eine Fehler.

Sub Makro9()
ActiveWorkbook.Theme.ThemeColorScheme.Load ( _
"C:\Programme\Microsoft Office\Document Themes 12\Theme Colors\Aspect.xml")
ActiveWorkbook.Theme.ThemeColorScheme.Load ( _
"C:\Programme\Microsoft Office\Document Themes 12\Theme Colors\Solstice.xml")
 ActiveWorkbook.Theme.ThemeColorScheme.Load() '### Fehler bei Larissa
End Sub


Was ist zu tun um Larissa zu laden?
Gruß Sonnenpeter

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: .ThemeColorScheme.Load
02.01.2009 16:26:08
Sonnenpeter
Hallo nochmal,
hier geht wohl nichts?
Im WWW habe auch auch keine Lösung gefunden.
Gruß Sonnenpeter
AW: .ThemeColorScheme.Load
02.01.2009 17:31:00
Herbert
Hi,
Lariisa ist eingebaut, kann nicht gelöscht werden und muss demnach auch nicht geladen werden,
kann es auch nicht, da darauf kein Zugriff besteht weil es gar nicht als xlm existiert.
Alternativ kannst du das als benutzerdefiniertes Schema speichern, dann funktioniert Load auch wieder.
mfg Herbert
Anzeige
AW: .ThemeColorScheme.Load
02.01.2009 18:31:35
Sonnenpeter
Hallo,
und Danke für die Info.
Im Grunde ging es mir darum Larissa über ein Makro einzustellen bzw. zu laden.
Gibt es da einen Weg?
Gruß Sonnenpeter
AW: .ThemeColorScheme.Load
02.01.2009 18:48:27
Herbert
Hi,
habs doch geschrieben, Larissa als benutzderfiniertes Schema speichern.
mfg Herbert
;
Anzeige

Infobox / Tutorial

Color Schemes in Excel: .ThemeColorScheme.Load richtig nutzen


Schritt-für-Schritt-Anleitung

Um ein benutzerdefiniertes Farbschema in Excel mit activeworkbook.theme.themecolorscheme.load() zu laden, folge diesen Schritten:

  1. Öffne den Visual Basic for Applications (VBA) Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Erstelle ein neues Modul:

    • Klicke mit der rechten Maustaste auf "VBAProject (DeinWorkbookName)" und wähle „Einfügen“ > „Modul“.
  3. Füge den folgenden Code ein:

    Sub LadeFarbschema()
       ActiveWorkbook.Theme.ThemeColorScheme.Load ( _
       "C:\Programme\Microsoft Office\Document Themes 12\Theme Colors\Aspect.xml")
       ActiveWorkbook.Theme.ThemeColorScheme.Load ( _
       "C:\Programme\Microsoft Office\Document Themes 12\Theme Colors\Solstice.xml")
    End Sub
  4. Speichere das Modul und schließe den VBA-Editor.

  5. Führe das Makro aus:

    • Gehe zurück zu Excel, drücke ALT + F8, wähle „LadeFarbschema“ und klicke auf „Ausführen“.

Häufige Fehler und Lösungen

  • Fehler beim Laden von Larissa: Wenn du versuchst, das Farbschema "Larissa" mit activeworkbook.theme.themecolorscheme.load() zu laden und eine Fehlermeldung erhältst, könnte das daran liegen, dass "Larissa" bereits eingebaut ist und nicht als XML-Datei existiert.

    Lösung: Speichere es zunächst als benutzerdefiniertes Schema. Danach kannst du versuchen, es wie oben beschrieben zu laden.


Alternative Methoden

Falls das Laden eines Farbschemas über das Makro nicht funktioniert, gibt es eine alternative Methode:

  1. Manuelles Speichern:

    • Gehe zu „Seitenlayout“ > „Farben“ und wähle „Neue Farben erstellen“.
    • Speichere dein benutzerdefiniertes Farbschema, welches später relativ einfach über VBA geladen werden kann.
  2. VBA-Anpassung:

    • Du kannst auch eine benutzerdefinierte Funktion erstellen, die das Farbschema automatisch anwendet, anstatt es manuell zu laden.

Praktische Beispiele

Hier ist ein einfaches Beispiel, wie du ein benutzerdefiniertes Farbschema mit Makros anwenden kannst:

Sub AnwendenFarbschema()
    Dim themePath As String
    themePath = "C:\Programme\Microsoft Office\Document Themes 12\Theme Colors\MeinFarbschema.xml"

    ActiveWorkbook.Theme.ThemeColorScheme.Load (themePath)
End Sub

Ersetze MeinFarbschema.xml mit dem Namen deines tatsächlichen Schemas.


Tipps für Profis

  • Organisiere deine Farbschemata: Halte alle benutzerdefinierten Farbschemata in einem zentralen Ordner, damit du sie einfach finden und laden kannst.
  • Dokumentiere deine Makros: Stelle sicher, dass du Kommentare in deinem VBA-Code hinzufügst, um die Funktionsweise zu erklären, besonders wenn du das Makro mit anderen teilst.
  • Teste in verschiedenen Excel-Versionen: Vergewissere dich, dass dein Makro in verschiedenen Versionen von Excel funktioniert, um Kompatibilitätsprobleme zu vermeiden.

FAQ: Häufige Fragen

1. Wo finde ich die XML-Dateien für die Farbschemata? Die XML-Dateien für die Farbschemata findest du in der Regel im Installationsverzeichnis von Microsoft Office unter "Document Themes".

2. Kann ich ein Farbschema direkt über die Excel-Oberfläche ändern? Ja, du kannst Farbschemata auch direkt über die Registerkarte „Seitenlayout“ ändern, ohne VBA zu verwenden.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige