Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
184to188
184to188
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Aktuelles Datum

Forumthread: Aktuelles Datum

Aktuelles Datum
22.11.2002 19:00:40
Didi
Hallo Excelfreunde,

wie kann ich mit einem Makro das aktuelle Datum in einer Spalte finden?

Vielen Dank

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Aktuelles Datum
22.11.2002 19:18:38
jinx
Moin, Didi,

dieses Makro als Basis habe ich hier aus dem Forum - es muss also irgendwo im Archiv schlummern.


Sub DatumDidi()
' liest das Datum in Spalte B aus und plaziert den Zellzeiger
' angegebene Quelle: www.i-dietrich.de
Spalte = "B"
    For Each a In ActiveSheet.Range(Spalte & "2:" & Spalte & "366")
        If a = Date Then
            zeile = a.Row
            Exit For
        End If
    Next
On Error Resume Next
Application.Goto ActiveSheet.Cells(zeile, Spalte), True
    If Err.Number <> 0 Then
        MsgBox ("Das aktuelle Datum wurde nicht gefunden.")
    End If
End Sub

 

     Code eingefügt mit Syntaxhighlighter 1.15

cu
jinx
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige