Freigeben über

VBA Zelle farblich hervorheben

Anonym
2022-10-20T12:58:49+00:00

Hallo zusammen,

ich würde gerne die Zelle in "Zeile 12" farblich hervorheben, die an dem entsprechenden Tag angesteuert wird.

Private Sub Worksheet_Activate()

Dim c As Range

Set c = Range("12:12").Find(What:=Date)

ActiveWindow.ScrollColumn = c.Column

End Sub

Danke im Voraus und

Viele Grüße

Andreas

Microsoft 365 und Office | Excel | Für Zuhause | Windows

Gesperrte Frage. Diese Frage wurde aus der Microsoft-Support-Community migriert. Sie können darüber abstimmen, ob sie hilfreich ist, aber Sie können keine Kommentare oder Antworten hinzufügen oder der Frage folgen.

0 Kommentare Keine Kommentare

Antwort, die vom Frageautor angenommen wurde

  1. Anonym
    2022-10-20T15:14:05+00:00

    Hallo Andreas,

    das machst du am besten mit der bedingten Formatierung. Wenn du es mit VBA machst, bleibt die Farbe bestehen. Oder du musst zusätzlich zum Einfärben der neuen Zelle die eingefärbte Zelle wieder ohne Farbe erscheinen lassen.

    Markiere J12 bis zum Ende der Datumswerte in Zeile 12 => Bedingte Formatierung =>Neue Regel => Formel zur Ermittlung und gebe ein

    =J12=HEUTE()

    und weise die gewünschte Farbe zu.

    Claus

    Eine Person fand diese Antwort hilfreich.
    0 Kommentare Keine Kommentare

2 zusätzliche Antworten

Sortieren nach: Am hilfreichsten
  1. Anonym
    2022-10-20T16:23:15+00:00

    Hallo Andreas,

    wenn du "Öffnen mit.." auswählst, kannst du unten angeben, dass das immer so sein soll.

    Du kannst das aber auch über Standardapps einstellen.

    Claus

    0 Kommentare Keine Kommentare
  2. Anonym
    2022-10-20T16:11:36+00:00

    Danke Claus,

    funktioniert bestens.

    Claus, weißt Du ob man ein Programm, wie Excel als Standard Programm einstellen kann?

    Ich habe Excel für Mac (arbeite auf einem MacbookPro) und über Parallels Windows Office 365.

    Ich möchte zukünftig mit Excel nur noch über Parallels Windows arbeiten.

    Ich muss sonst immer mit rechte Maustaste "Öffnen mit.......... " arbeiten. Etwas nervig.

    Danke und

    Viele Grüße

    Andreas

    0 Kommentare Keine Kommentare