Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
184to188
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
184to188
184to188
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

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

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)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige