Office: (Office 2010) Design / Farben / VBA

Hat vielleicht schon jemand herausgefunden, ob bzw. wie Farbeinstellungen à la "Access-Design 2" per VBA ausgelesen werden können bzw. ob diese als Konstanten verfügbar sind?

Hintergrund: Ich möchte einer ActiveX Komponente gleiche Farbeinstellungen verpassen und diese nicht ändern müssen, wenn Änderungen an Formularen vorgenommen werden.

Schade eigentlich, dass selbst Access14 noch einen Farbmix aus Long, Hex und RGB mitbringt (na wenigstens ist das Modul zur Umrechnung so nicht umsonst).

Lg, LeMa

:)

 

Hallo
Hilft mein anhang ?

 

Praktisches Tool. Die Umrechnung der Farbwerte ist aber nicht mein Problem.
Neben der normalen Farbzuweisung hat Access14 auch die Möglichkeit, Designfarben (oder als was auch immer das läuft) zuzuweisen. Als Textfarbe eines Feldes steht dann da nicht ein Zahlenwert, sondern z.B. "Text für Systemmenü".
Ich würde nun gerne per VBA diese Farbe auslesen um sie z.B. einem Treeview zuweisen zu können.
In Deinem Modul1 (Collection CNum) stellst Du ja einige Sachen in der Richtung an die mir noch nicht klar sind.

Lg, LeMa

 

\@ LeMa

Weiss einem Element die Farbe wie z.B. "Access-Design 2" zu und lies dann im Anschluß über die Eigenschaft BackColor den Long-Wert aus. Den kannst Du dann wiederum bei anderen Steuerlementen als Farbeigenschaft zu weisen.

Das ist die einzige Möglichkeit die mir bekannt ist.

Gruß

Rainer

 

Ja, sieht so aus. Hatte nur gehofft, dass ich da was übersehen hätte.
Die BackTint Eigenschaft ist neu, mal sehen, was damit geht...

 

Diese Farbbezeichnungen sind, wie alle lokalisierten Oberflächentexte, in der Resourcen-DLL msain.dll zu finden (office14\1031\).
Daraus kann man sie auch per API auslesen, wie die angehängte Demo zeigt.
> Im Modul die Funktion MakeColorsTable aufrufen und danach die Tabelle tblAccColors inspizieren. *wink.gif*
Funktioniert mit A2007 und A2010.
Allerdings sind die Resourcen in beiden Versionen ziemlich unterschiedlich angelegt und müssen deshalb auch anders behandelt werden.
Kann auch sein, dass sich die Resourcen-Nummern in zukünftigen Versionen oder ServicePacks ändern und der Code dann angepasst werden muss.

Ansonsten ist die Demo nichts weiter, als eine Spielerei. *wink.gif*

Ciao, Sascha

 

Oh. Coole Spielerei aber ^^
Danke jedenfalls - für meinen Fall echt nützlich. Ich speichere sowieso immer schon Farbcodes in einer Tabelle ab und Dein Modul kann da die internen Bezeichnungen gleich d'ranhängen. *Smilie
Farbwerte haben über verschiedene Versionen ja auch schon einige Wandlungen erfahren...

Die Design-Geschichte habe ich noch nicht wirklich kapiert. Während in A07 noch "etwas passiert" ist wenn ich einem Formular probeweise ein Design zugewiesen habe, tut sich in A10 optisch gar nichts (außer dass Access die nicht sichtbaren Änderungen dann speichern will). Die Hilfe dazu ist auch noch recht bescheiden.
Ich bin kein Freund von optischem Firlefanz (und A10 tendiert ja ohnehin vom Stil her zu "schlicht und einfach") aber im Bezug auf Corporate Design wär einiges von der Idee her recht verlockend.