VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Aktuelle Geburtstage beim Öffnen der Arbeitsmappe anzeigen

Gruppe

Feature

Bereich

Bedingt

Thema

Aktuelle Geburtstage beim Öffnen der Arbeitsmappe anzeigen

Problem

Wie kann ich erreichen, daß mir beim Öffnen einer Arbeitsmappe die Zellen mit aktuellen Geburtstagen gelb und die mit Werten bis eine Woche vorher als Vorwarnung blau hinterlegt werden?

Lösung

Formel A für die bedingte Formatierung: =UND(MONAT(D1)=MONAT(HEUTE());TAG(D1)=TAG(HEUTE()))




StandardModule: basMain

Sub WechselKurse()
   Range("B4").Value = Date
   Range("B5").Value = Time
   Worksheets("Tabelle2").QueryTables(1).Refresh
End Sub

Sub EinAusblenden()
   Worksheets("Tabelle2").Visible = True
   'Worksheets("Tabelle2").Visible = xlVeryHidden
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Feature und Bedingt