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

Stand (Datum) automatisch anpassen

Forumthread: Stand (Datum) automatisch anpassen

Stand (Datum) automatisch anpassen
16.03.2020 11:23:27
Uli
Moin,
eine Frage: Ich habe eine große Tabelle, die ich übers Jahr ein paar mal anpassen muss. Ganz oben steht bei mir immer: Stand: 15.02.2020 (Beispiel). Wenn ich jetzt etwas in der Tabelle ändere, kann ich dann per Formel den Stand automatisch auf das heutige Datum bekommen?
Vielen Dank im Voraus
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Stand (Datum) automatisch anpassen
16.03.2020 11:35:26
Joachim
mit =heute() bekommst Du immer das aktuelle Datum.
Also auch dann, wenn nichts geändert wird.
Mit einer Formel kommst Du meines Erachtens nicht weiter, ,da musst Du mit VBA ran.
Wenn's Dir hilft: Die Tastenkombination STRG + Punkt schreibt das aktuelle Datum in die Zelle, dann geht es händisch schneller.
Gruß
Anzeige
AW: Stand (Datum) automatisch anpassen
16.03.2020 11:36:14
Günther
Moin Uli,
automatisch bei Änderung geht imho nur per VBA.
Ich empfehle dir, in die entsprechende Zelle zu gehen und per Strg-. (Punkt) das aktuelle Datum eintragen zu lassen. Und wenn das Wort "Stand: " in die gleiche Zelle soll, dann geht das über das Benutzerdefinierte Zahlenformat.
Gruß
Günther
Anzeige
AW: Stand (Datum) automatisch anpassen
16.03.2020 11:41:01
UweD
Hallo
wenn was geändert wurde, dann muss die Datei zwangsweise gespeichert werden.
Du könntest also das "Beforesave Event" dazu nutzen.
Der Code muss im VBE in den Codebereich von DieseArbeitsmappe

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim Rng As Range
Set Rng = Range("A1")
Rng = Format(Date, "DD.MM.YYYY")
End Sub

LG UweD
Anzeige
AW: Stand (Datum) automatisch anpassen
16.03.2020 11:54:21
Günther
Moin,
ob diese Vorgehensweise wirklich so gut ist, weiß ich nicht ...
Bekanntermaßen will Excel auch recht oft ein File speichern, obwohl ich gar nichts geändert habe. Darum würde ich noch eine Ja/Nein MsgBox da einbauen, damit nicht versehentlich das korrekte Datm überschrieben wird.
Gruß
Günther
Anzeige
AW: Stand (Datum) automatisch anpassen
16.03.2020 12:11:12
Uli
Danke für die Hinweise.
Günther, wie sollte die Msgbox aussehen?
lg. Uli
AW: Stand (Datum) automatisch anpassen
16.03.2020 12:41:23
UweD
so...

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim Rng As Range
Set Rng = Range("A1")
If MsgBox("Datum ändern?", vbYesNo + vbQuestion) = vbYes Then Rng = Format(Date, "DD.MM. _
YYYY")
End Sub

LG UweD
Anzeige
AW: Stand (Datum) automatisch anpassen
16.03.2020 12:45:32
UweD
Hallo nochmal
Alternative:
Wenn in DEINEM Bereich eine Änderung vorgenommen wird, dann wird das Datum angepasst.
Dazu muss dieses Makro in den Codebeich der betroffenen Tabelle.
Private Sub Worksheet_Change(ByVal Target As Range)
    Const APPNAME = "Worksheet_Change"
    On Error GoTo Fehler
    
    Dim Datum As Range, Rng As Range
    
    Set Datum = Range("A1")
    Set Rng = Range("D1:F50") 'anpassen 
    
    If Not Intersect(Rng, Target) Is Nothing Then
        Application.EnableEvents = False
        Datum = Format(Date, "DD.MM.YYYY")
    End If
    '*** Fehlerbehandlung 
    Err.Clear
Fehler:
    Application.EnableEvents = True
    If Err.Number <> 0 Then MsgBox "Fehler in Sub """ & APPNAME & """" & vbCrLf _
        & "Fehlernummer: " & Err.Number & vbLf & Err.Description: Err.Clear
End Sub

LG UweD
Anzeige
AW: Stand (Datum) automatisch anpassen
16.03.2020 14:27:58
Werner
Hallo Uwe,
hier schreibst du dann aber doch Text in die Zelle: 
Datum = Format(Date, "DD.MM.YYYY")

ich denke besser so: 
Datum = CDate(Format(Date, "DD.MM.YYYY"))
Gruß Werner
;

Forumthreads zu verwandten Themen

Automatisches Datum in der Zelle
Schindlbeck62

Hallo Excel Speziallisten,
ich habe eine Liste für die Terminverfolgung erstellt, jetzt möchte ich, wenn die Aufgabe erledigt ist. das ich z. B. in die Zelle D4 ja schreibe sich in die Zelle D5 das Heutige Datum automatisch einträgt aber nicht mehr aktualisiert wenn ich es an an...
27.03.2009 11:04:10
Thread-ID: 1064527
9 Beiträge
Datumsänderung bei Tabelleneintrag
Domme

Hallo alle zusammen,
ich hänge schon ziemlich lange an diesem Thema und hoffe das mir jemand helfen kann.
Ich habe eine Tabelle die mit Zahlen bestückt ist, in einer Spalte neben den Zahlen stehen Daten, von bsw. gestern, letzter Woche, vorletzter Woche etc., jetzt hätte ich gerne, das...
27.03.2009 17:27:20
Thread-ID: 1064692
8 Beiträge
Automatisch Datum eintragen
ing.grohn

Hallo Forum,
ich habe eine Tabelle, mit der ich Verzugszinsen und Tilgungen berechne.
Die Eingabe erfolgt in Spalte A (Datum der Zahlung), in Spalte B wird der Zahlungsbetrag eingetragen.
Den Rest erledigt die Tabelle selbst.
Die Zinsätze werden aufgrund des Datums aus der Tabel...
03.02.2010 00:00:57
Thread-ID: 1135244
4 Beiträge
Automatisches Datum bei Eingabe auf andere Tabelle
Lukas

Hallo,
ich bin noch ein kleines Greenhorn in sachen VBA und hänge mich deswegen ständig an irgendetwas auf T_T.
Naja aufjedenfall wollte ich für meinen Chef eine kleine Tabelle programmieren in der er den zahlungseingang seiner Mieter überprüfen kann, nun möchte er allerdings noch zusät...
04.11.2011 23:31:55
Thread-ID: 1236666
5 Beiträge
Anzeige
Automatisch Datum einfügen
Sokoll
Hallo,
in eine Tabelle mit mehreren Spalten soll bei der letzten Spalte sobald die Tab Taste in diese kommt, automatisch das aktuelle Eingabedatum eingegeben werden und sich dann in weiteren Zeilen auch so fortsetzen. Wie ist das machbar?
Herzlichen Dank für die Hilfe
01.02.2015 17:59:03
Thread-ID: 1406559
2 Beiträge
Automatisches Einfügen von Datumszeilen
Datumszeilen

Hallo zusammen,
ich habe folgende Liste und möchte, dass die fehlenden Tage des Monats automatisch mit Datum, Name und Vorname als Zeile chronologisch eingefügt werden:
Datum Name Vorname Zuschlag 1
05.10.2015 Mustermann Theo 10
06.10.2015 Mustermann Theo 20
07.10.2015 Mus...
04.11.2015 16:55:36
Thread-ID: 1456343
3 Beiträge
Datum setzen bei Zelleintrag, Rücknahme b. Löschen
Hartmut

Hallo zusammen,
ich habe eine kleine Datei
https://www.herber.de/bbs/user/106056.xlsm
in welcher ich mit dem Intersect Befehl ein Datum setze, wie sähe die Änderung aus wenn der Zelleintrag zurück genommen wird und das Datum ebenfalls gelöscht wird?
Danke im voraus für eure Hi...
07.06.2016 13:30:21
Thread-ID: 1497403
7 Beiträge
VBA Datumsüberprüfung bei neuem Eintrag
Matti63

Hallo zusammen,
ich benötige Eure Hilfe bei einem VBA Code.
In einer Tabelle (Tabellenblatt) in der Spalte A ab A5 bis unendlich wird ein Datum eingegeben. VBA soll nun prüfen ob das eingegebene Datum grösser oder kleiner 31 Tage von Heute ist und eine Meldung zB. "Bitte Datumseingabe...
12.12.2016 11:36:22
Thread-ID: 1529692
3 Beiträge
VBA - Datum und Nutzernamen automatisch einfügen
Mike

Hallo an das Herber-Forum.
Zunächst einmal wünsche ich ein frohes und gesundes neues Jahr 2017.
Ich habe eine kurze VBA-Frage,
Ich möchte gern in den Zellen B2 und B3 das Datum und den Benutzernamen automatisch einfügen. Im ersten Tabellenblatt sind einige Zellen, die gesperrt sind...
05.01.2017 09:43:46
Thread-ID: 1533222
13 Beiträge
Datum automatisch eintragen
Philip

Hallo
Ich habe eine Tabelle mit 31 Arbeitsblätter(Sheets), das Ziel währe dass wenn ich im erste Sheet in der Zelle F1 das Datum eingebe in den anderen Sheets das Datum auch gleich übernommen wird natürlich vortlaufend und in Zelle H2 der Wochentag eingetragen wird. Wenn es irgendwie möglic...
12.09.2017 09:49:53
Thread-ID: 1579940
9 Beiträge
automatisch Datum eintragen
Gig

Hallo,
wenn ich in A1 Daten eingebe, so möchte ich, dass in B1 automatisch das heutige Datum erscheint. Dieses sollte sich aber danach nicht mehr ändern, wenn z.B. die Tabelle morgen geöffnet wird, sollte trotzdem das heutige Datum in B1 stehen.
Hat ijemand eine Idee?
Danke im Vorau...
18.12.2017 00:09:45
Thread-ID: 1597737
16 Beiträge
Automatisches Datum in Zelle bei Wert XY
Felix

Guten Morgen zusammen,
ich habe eine Frage. Vllt. nicht die schlauste Frage, aber irgendwie bekomme ich das gerade einfach nicht hin. Wahrscheinlich einfach die Aufregung, weil bald Wochenende ist :)
Und zwar möchte ich Folgendes machen:
Ich habe eine Spalte welche sich "Stauts" nen...
20.04.2018 09:24:30
Thread-ID: 1620634
3 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Stand (Datum) automatisch anpassen in Excel

Schritt-für-Schritt-Anleitung

Um das Stand-Datum in Excel automatisch anzupassen, kannst Du die folgenden Methoden verwenden:

  1. Aktuelles Datum einfügen:

    • Du kannst das aktuelle Datum einfach mit der Formel =HEUTE() einfügen. Dies zeigt immer das heutige Datum an.
    • Um das Datum zu formatieren, gehe zu Start > Zahl > Datum.

  2. Automatische Aktualisierung bei Änderungen:

    • Wenn Du möchtest, dass das Datum automatisch aktualisiert wird, wenn Du Änderungen an der Tabelle vornimmst, musst Du VBA verwenden.
    • Öffne den Visual Basic Editor (VBE) mit ALT + F11 und füge den folgenden Code in das Modul „DieseArbeitsmappe“ ein:
    Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
   Dim Rng As Range
   Set Rng = Range("A1")
   If MsgBox("Datum ändern?", vbYesNo + vbQuestion) = vbYes Then
       Rng = Format(Date, "DD.MM.YYYY")
   End If
End Sub

  3. Änderung in einem bestimmten Bereich:

    • Um das Datum nur in einem bestimmten Bereich zu ändern, kannst Du den folgenden Code verwenden:
    Private Sub Worksheet_Change(ByVal Target As Range)
   Dim Datum As Range
   Set Datum = Range("A1")
   If Not Intersect(Range("D1:F50"), Target) Is Nothing Then
       Application.EnableEvents = False
       Datum = Format(Date, "DD.MM.YYYY")
   End If
   Application.EnableEvents = True
End Sub

Häufige Fehler und Lösungen

  1. Datum wird nicht aktualisiert:

    • Stelle sicher, dass die Makros aktiviert sind. Gehe zu Datei > Optionen > Sicherheitscenter > Einstellungen für das Sicherheitscenter > Einstellungen für Makros und aktiviere die Option für Makros.

  2. Falsches Datum angezeigt:

    • Überprüfe die Zellenformatierung. Das Datum sollte im Format „DD.MM.YYYY“ angezeigt werden.

  3. Makro funktioniert nicht:

    • Stelle sicher, dass der Code im richtigen Modul eingefügt wurde (z.B. „DieseArbeitsmappe“ oder das entsprechende Arbeitsblatt).

Alternative Methoden

  • Tastenkombinationen: Du kannst das aktuelle Datum auch schnell mit der Tastenkombination STRG + . (Punkt) einfügen. Dies ist eine schnelle Methode, um das Datum manuell zu aktualisieren.

  • Benutzerdefinierte Zahlenformatierung: Wenn Du das Wort „Stand: “ vor dem Datum in der gleichen Zelle haben möchtest, kannst Du ein benutzerdefiniertes Zahlenformat verwenden. Gehe zu Start > Zahl > Benutzerdefiniert und gebe Stand: " "DD.MM.YYYY" ein.

Praktische Beispiele

  • Beispiel 1: Du hast eine Tabelle, in der Du regelmäßig Daten eingibst. Wenn Du eine Änderung in den Zellen D1 bis F50 vornimmst, wird automatisch das Datum in Zelle A1 aktualisiert.

  • Beispiel 2: Du möchtest das Datum in der Kopfzeile eines Berichts haben. Füge den VBA-Code ein, um das Datum beim Speichern der Datei automatisch anzupassen.

Tipps für Profis

  • Automatisierung: Nutze VBA, um das Datum automatisch zu aktualisieren, wenn Du Änderungen vornimmst. Das spart Zeit und sorgt dafür, dass Deine Daten immer aktuell sind.

  • Datumsstempel: Verwende den automatischen Datumsstempel in Berichten, um die Nachverfolgbarkeit zu verbessern. Dies ist besonders nützlich bei der Erstellung von Druckdokumenten.

FAQ: Häufige Fragen

1. Wie kann ich das aktuelle Datum automatisch in Excel einfügen?
Du kannst die Formel =HEUTE() verwenden oder die Tastenkombination STRG + . nutzen, um das aktuelle Datum schnell einzufügen.

2. Funktioniert die automatische Datumserneuerung in allen Excel-Versionen?
Ja, die beschriebenen Methoden sind in den meisten Excel-Versionen anwendbar, insbesondere in Excel 2010 und höher.

3. Kann ich das Datum auch in anderen Formaten anzeigen?
Ja, Du kannst das Datumsformat in den Zellen nach Deinen Wünschen anpassen, indem Du die Zellen formatierst.

Beliebteste Forumthreads (12 Monate)

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