Nach einem Datum suchen



Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Nach einem Datum suchen
von: Flo
Geschrieben am: 25.06.2002 - 10:38:17

Hallo zusammen,


Ausgangssituation:

In meinem ersten Tabellenblatt habe ich das aktuelle Datum mit der HEUTE-Formel in einer Zelle stehen. Diese Arbeitsmappe enthält jedoch noch weitere 53 Tabellenblätter. In jedem Blatt stehen fünf Datum, also 1 Woche (daher auch die 53 Tabellenblätter).


Problemstellung:

Nun möchte ich mit einem Makro genau in dieses Tabellenblatt springen, das das aktuelle Datum enthält.

Ich bin für jeden Hinweis dankbar,

Flo

nach oben   nach unten

Re: Nach einem Datum suchen
von: M@rkus
Geschrieben am: 25.06.2002 - 11:58:22

Dieses Makro sucht das heutige Datum in Tabelle1:


Sub gehe_zu_heute()

Dim heute As Date
Dim zelle As Range

Sheets("Tabelle1").Select
heute = Fix(Now)
    For Each zelle In ActiveSheet.UsedRange
    If zelle.Value = heute Then
       zelle.Activate
    Exit For
    End If
Next zelle
End Sub

Gruss Markus



 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Nach einem Datum suchen"