Makrocode für Ändern der Zellenfarben

Computer: Software & Programmierung Office Software
1

Liebe Leute!
Folgendes Problem: Ich habe im Büro eine Excel-Tabelle für Abwesenheiten der KollegInnen gebastelt. Nun möchte ich die Zellen von Samstag und Sonntag in einer anderen Farbe darstellen.
Auf Deutsch, z.B:
Wenn in Spalte A Sa oder So dann in der jeweiligen Zeile „grau“, sonst „weiß“.
Im voraus bereits herzlichen Dank für die Mühe
Kurt.

2

Servus Kurt,

das geht mit FORMAT - BEDINGTE FORMATIERUNG

  1. In Spalte A (die mit Sa So usw.) die Zelle A1 markieren,
    BEDINGTE FORMATIERUNG aufrufen und dort in Bedingung 1 „Formel ist“ auswählen und rechts davon ins freie Feld eintragen
    "=$A1=„Sa“, dann den Knopf FORMAT … anklicken und die gwüschte Farbe bei MUSTER auswählen.

  2. Den Knopf HINZUFÜGEN >> anklicken (eine neue Bedingung wird geöffnet!) und dort wieder „Formel ist“ auswählen, eintragen von "=$A1=„So“ und wieder mit FORMAT … die Farbe auswählen.
    Jetzt OK drücken.

  3. Die Zelle A1 anklicken, Doppelklick auf den BESEN? oder PINSEL?(Format übertragen) bis der Schalter dauerhaft markiert bleibt (wird dann hell unterlegt) und mit gedrückter linker Maustaste über die Zellen der Spalte A ziehen, die Du formatieren willst.

  4. Das gleich Spiel (Punkte 1 bis 3) für Spalte B, falls Du dort das Zagesdatum stehen hast.

Bitte sehrr, bitte gleich! (Hans Moser?)

gruss moritzbock

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

3

Hallo Moritzbock
Danke für die prompte Antwort.
Kurt

ps: Bitte sehrr, bitte gleich! (Hans Moser?) = Hans Moser

4

Noch ein Zusatz zu ‚bedingte Formatierung‘
Moin Kurt,

die bedingte Formatierung ist ein gar lustiges Instrument, hat aber auch sein Tücken :wink:

  • Sie überlagert z.B. immer die lokal eingestellte Formatierung, was z.B. bei Rahmen störend wirken kann.

  • Sie hat leider nur drei Ebenen.

  • Man kann auch gleich den ganzen gewünschten Bereich markieren und formatieren (ohne Pinsel-Besen bzw- Besen-Pinsel), muß dann aber drauf achten, daß man bei der Referenzierung die Dollarzeichen richtig setzt - sonst grübelt man sich schwach, warum da nur Mist rauskommt. Diese Zeichen dienen ja dazu, eine Spalte bzw. Zeile beim „rüberziehen“ der Formate auf andere Zellen festzuhalten. GGf. mal einen Blick in die Hilfe werfen unter dem Stichwort „relative Bezüge“ oderso.

  • Bedingte Formatierungen sind erstmal „unsichtbar“, das heißt, wenn die Bedingung nicht erfüllt ist, hat die Zelle ein „ganz normales“, manuell eingestelltes Format. Da kann man schon mal vergessen, so ein Format zu ändern. Und man kann übersehen, daß Excel beim Einfügen bzw. Löschen von Zellen/Zeilen/Spalten schon mal die bedingte Formatierung ignoriert, so daß diese sich u.U. plötzlich auf zusätzliche Bereiche erstreckt.
    Hier muß man den folgenden Menüpunkt kennen:
    "Bearbeiten/Gehe zu…/Speziell…" Dort kann man rechts unten entweder „alle“ auswählen - dann werden alle „kontaminierten“ Zellen ausgewählt - oder „gleiche“ - dann werden alle ausgewählt, die die gleiche bedingte Formatierung haben wie die aktuelle Zelle.

So, das noch mit auf den Weg - Hineise, die aus meinem Excel-Leben gegriffen sind :wink:

Viele Grüße aus Köln,
Kristian

5

Geht auch als Makrocode (Ändern der Zellenfarben)

Servus Kurt,

das geht mit FORMAT - BEDINGTE FORMATIERUNG

siehe da (als Beispiel):

Sub FarbeWechsel()
Dim Zelle As Range

For Each Zelle In Selection

If Zelle.Value = "Sa" Or Zelle.Value = "So" Then

Zelle.Interior.ColorIndex = 15

End If

Next Zelle

End Sub

gruss moritzbock