Office: (Office 2010) Alternative zur Bedingten Formatierung (Zelle einfärben bei Text Zeichen) VBA?

Hallo Zusammen
Wollte mich erst mal bedanken, konnte schon viele Tipps aus dem Forum gebrauchen, jedoch komme ich zurzeit nicht weiter.

Habe ein folgendes Problem, ich möchte eine Zelle einfärben wenn zu Beispiel dieser Wert erscheint „HJ9“ und eine andere Farbe bei „HJ10“ und so weiter. Bedinge Formatierung klappt ganz gut, jedoch bei ca. 36000 Zellen und bei beinahe 100 verschieden Zeichen/Werten, ein Ding der Unmöglichkeit unmöglich. Mein Office 2010 Excel koliert ja schon bei 2600 Zellen.

Um genau zu sein, hole ich die Daten mittels Datenüberprüfung Liste (eine Art von Dropdown.) Mit dem Entwicklung Tool „Steuerelement“ einfügen, kann ich zwar einfärben, aber dann der Verweis die Daten nicht abgleichen. Was mich auch nicht weiter bringt.

Hab schon mit Bild Verlinkung versucht, ist jedoch noch umständlicher und bring das Excel bei 600 Bild Verlinkungen zum Kollabieren.

Gibt es eine Alternative zur Bedingen Formatierung? Vielleicht in VBA? Schon einiges gelesen und versucht umzusetzen, ist jedoch ein absolutes Minenfeld und bekomme nonstop Bugs.

Wenn mir da vielleicht weiterhelfen könnte, passenden Code oder Tipps wo ich was Finde zum Nachlesen, wäre ich sehr dankbar.

Grüsse Rasta

:)

 

Hallo Rasta,

du solltest nicht einzelne Zelle formatieren sondern Bereiche.
Ersatz bedingte Formatierung

 

Hallo Rasta,

ich habe dir mal eine Variante für VBA erstellt, die du mit weiteren Formaten und Farben weiter ergänzen kannst.

Bitte gehe den gesamten Code durch und versuche alle Schritte nachzuvollziehen, damit du weißt, was du benutzt.
Falls du zu einzelnen Stellen Fragen hast, kannst du diese gerne hier stellen.

VG
Santa

 

Hallo,

hab auch noch eine Lösung mit Dict+Array+Union().

 

Hallo Hajo_Zi, Mc Santa und xlph

Besten Dank für eure Antworten und Lösungswege. Sind alle sehr interessant und habe sie ausprobiert. Mit Mc Santa hatte ich etwas Mühe durchzusteigen, war aber wahrscheinlich nur etwas müde, dass ich es nicht gleich kapiert hatte. Von Hajo_Zi, die Webseite hat sehr viele interessante Lösungswege, hab ich mir gemerkt, wenn ich mich an etwas anderes heran wagen möchte.

Die Code Lösung von Xlph gefällt mir sehr gut, da muss ich nicht in den Code eingreifen, wenn ich eine andere Farbe setzen möchte. Speichern, schliessen und neu öffnen, ist die Farbe schon übernommen. Mit dem kann ich ganz gut leben.

Für alle Lösungen und Beispiel Dateien, möchte ich mich sehr herzlich bei euch bedanken.


Alle funktionieren wunder bar, bis auf ein kleines, wenn ich eine Bedingte Formatierung (Farbe) im Excel direkt gemacht hab, wird die neue Farbe nicht übernommen.

Bei der Bedingen Formatierung: (Formel: „=WOCHENTAG(AC$8;2)>5“) auf Zellen angewandt =$PO$8:$PP$9;$GN$8:$HQ$9;$BK$8:$CM$9;$CQ$8:$..../ Sa. Und So. wird mir in einer Farbe angezeigt. Wenn ich jede Lösungen von euch anwende, werden mir alle Wochentage bis auf Samstag oder Sontag. Farblich übernommen, würde jedoch die im Sa. und So. mit einschliessen. In dem Sinne, dass die Bedingte Formatierung von Excel vorübergehenden mit den m Wert Farblich übernommen wird. Gibst in Vba auch so eine einfache Lösung wie beim dieser Formel von Excel?

Grüsse Rasta

 

Hallo,


1. Bedingte Formatierung überlagert die eigentliche ZellFormatierung

2. Bedingte Formatierung ist immer schneller als ein VBA-Code
Vorteile beim VBA-Code: Kontrolle über Start der Formatierung.

Die Bedingte Formatierung wird bei vielen Aktionen mehrmals ausgelöst.

!Langsames Excel (2) - Bedingte Formatierung

Vielleicht ist eine Kombination die Lösung, das müsste man testen.

Lad die Datei hoch.

 

Musste die Datei Kastrieren, war viel zu gross um sie hochzuladen. Aber diese wenigen Tabellenblätter sollten genügen, da ich mein Problem hier lösen möchte.

Es sind nur wenige Dienste drauf, insgesamt handelt sich um beinahe 100 verschiede Einheiten.
Daher kommt eine Beginget Formatierung mit Verweis kaum in Frage. (überladet die Rams)

Ohne Farbe würde dies auch gehen, jedoch nur dann müsste man sich alle Dienste merken. Welche Tages und welche die in der Nacht oder sogar am WE/Feiertage sind.

Hab deine Lösung von Dic eingesetzt, bin richtig begeistert. Ohne in den Code einzugreifen die Farbe zu ändern, ist richtig fantastisch. Um ehrlich zu sein, versuche ich sogar komplett auf Excel bedinge Formatierung verzichten. Hab auch gelesen, dass die Excel eigne Bedingte Formatierung immer an erster Stelle kommt und die VBA Bedingte Formatierung erst als 2. Stelle zugreift. Daher müsste ich wohl die Excel eigne Bedingte Formatierung komplett in VBA lösen, oder sehe ich das falsch?

NB. Wenn du interessante Bücher kennst, VBA in Excel mit Dic, möchte gerne mehr erfahren und auch verstehen wie es aufgebaut ist.