PDA

Vollständige Version anzeigen : Laufzeitfehler 91: Apnpassung von Standard-Farben


jens.schoeffel
15.07.2014, 08:41
In in einer Excel-Datei wird beim Sarten folgendes Makro gestartet, mit dem ich Standardfarben anpasse:

Sub Farbe1()
ActiveWorkbook.Colors(35) = RGB(204, 255, 204)
End Sub

Sobald die Excel-Datei von einem Kollegen das erste Mal neu gestartet wird, erscheint die Fehlermeldung: :mad:

Laufzeitfehler 91
Objektvariable oder with-Blockvariable nicht festgelegt.

Die Fehlermeldung kommt aber nur beim ersten Start; klickt man die Fehlermeldung mit Abbrechen ab und startet die Excel-Datei später erneut, kommt keine Fehlermeldung.

Hat jemand eine Idee, was den Fehler auslöst und wie man das beseitigen kann?

Das ist insofern wichtig, als viele Kollegen die Datei nutzen und ich regelmäßig Anpassungen vornehme und die Fehlermeldung dann wieder nach erneutem Speichern regelmäßig wieder auftaucht.

Vielen lieben Dank für Hinweise,
Gruß Jens

Hajo_Zi
15.07.2014, 09:31
Hallo Jens,

es soll doch nur für eine Datei. Die Farbpalette kannst Du doch für eine Datei über Optionen anpassen oder sehe ich das falsch.
Ich habe zur Zeit keine Version vor 2007 an. Ab 2007 sollte man ja nicht mit Index arbeiten da über 4 Mio. Farben.

<img src="http://Hajo-Excel.de/images/grusz1.gif" align="middle" height="40" alt="Grußformel"><a href="http://Hajo-Excel.de/index.htm"><img border="0" src="http://Hajo-Excel.de/images/logo_hajo3.gif" align="middle" height="40" alt="Homepage"></a>

Nepumuk
15.07.2014, 09:51
Hallo Hajo,

nicht untertreiben, es sind 256*256*256 = 16.777.216 Farben. :boah:

jens.schoeffel
15.07.2014, 10:13
Hallo Hajo,

ich passe insgesamt 4 Systemfarben an:

Sub Farbe1()
'hellgrün
ActiveWorkbook.Colors(35) = RGB(204, 255, 204)
'hellgelb
ActiveWorkbook.Colors(36) = RGB(255, 255, 153)
'rosa
ActiveWorkbook.Colors(38) = RGB(238, 210, 238)
'hellgrau
ActiveWorkbook.Colors(15) = RGB(221, 221, 221)
End Sub


Der Sinn ist / soll sein, dass exakt dieselben Farben von allen Anwendern genutzt werden und über ein Menü die Farbpallette anch Wünschen der Anwender umgestellt werden kann. Das funktioniert aber nur, wenn die Ausgangsfarbe exakt bekannt ist. Daher stelle ich diese über das Makro in der Ausgangslage ein.

Gruß Jens

Hajo_Zi
15.07.2014, 10:16
Hallo Jens,

wenn u es machst, ist es doch für die Datei geändert, also braucht es nicht nochmal gemacht werden. Siehe auch ersten Beitrag.

<img src="http://Hajo-Excel.de/images/grusz1.gif" align="middle" height="40" alt="Grußformel"><a href="http://Hajo-Excel.de/index.htm"><img border="0" src="http://Hajo-Excel.de/images/logo_hajo3.gif" align="middle" height="40" alt="Homepage"></a>