Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Aktuelles Datum einfügen und einfrieren

Aktuelles Datum einfügen und einfrieren
04.12.2015 09:06:29
Matthias
Hallo liebe Excel-Experten,
ich stehe vor folgendem Problem. Ich würde gerne in der angehängten Liste eine Formel in Spalte H einfügen, sodass dort immer dann, wenn ich in Spalte D in einer neuen Zeile eine Nummer eintrage, in der gleichen Zeile das aktuelle Tagesdatum erscheint. Ich würde also nur in D3 die Nummer 524678 eingeben und in H3 soll das aktuelle Tagesdatum erscheinen.
Ich möchte damit nachhalten, wann dieser Eintrag erfolgt ist. Problem ist nur dass sich das Datum beim nächsten Öffnen der Tabelle natürlich aktualisiert, wenn ich zum Beispiel irgendwas mit =HEUTE()verwende. Und die Zelle merkt dann nicht, ob in Spalte D etwas eingetragen ist oder nicht.
Gibt es dafür eine Lösung?
Viele Grüße
Matthias
https://www.herber.de/bbs/user/101999.xlsx

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aktuelles Datum einfügen und einfrieren
04.12.2015 09:20:46
Matthias
Hallo Matthias,
probiers mal damit:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rZelle As Range
If Not Intersect(Target, Columns("D")) Is Nothing Then
For Each rZelle In Intersect(Target, Columns("D"))
If rZelle  "" Then
Cells(rZelle.Row, 8) = Date
Else
Cells(rZelle.Row, 8) = ""
End If
Next rZelle
End If
End Sub
In den Codebereich der Tabelle, nicht in ein Modul. Dazu Rechtsklick auf den Reiter der Tabelle, 'Code anzeigen' wählen und dort einfügen.
lg Matthias

Anzeige
AW: Aktuelles Datum einfügen und einfrieren
04.12.2015 09:23:35
Matthias
Hi Matthias,
danke für die schnelle Hilfe - funktioniert perfekt!
Viele Grüße
Matthias
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Aktuelles Datum in Excel einfügen und fixieren


Schritt-für-Schritt-Anleitung

Um in Excel das aktuelle Datum automatisch einzufügen und zu fixieren, kannst du einen VBA-Code verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne die Excel-Datei: Gehe zu der Tabelle, in der du das aktuelle Datum einfügen möchtest.

  2. Zugriff auf den VBA-Editor: Klicke mit der rechten Maustaste auf den Reiter der Tabelle und wähle „Code anzeigen“.

  3. Code einfügen: Kopiere den folgenden VBA-Code in den Codebereich:

    Private Sub Worksheet_Change(ByVal Target As Range)
        Dim rZelle As Range
        If Not Intersect(Target, Columns("D")) Is Nothing Then
            For Each rZelle In Intersect(Target, Columns("D"))
                If rZelle <> "" Then
                    Cells(rZelle.Row, 8) = Date
                Else
                    Cells(rZelle.Row, 8) = ""
                End If
            Next rZelle
        End If
    End Sub
  4. Speichern: Schließe den VBA-Editor und speichere die Datei als Makro-fähige Arbeitsmappe (.xlsm).

  5. Testen: Trage eine Nummer in Spalte D ein und überprüfe, ob das aktuelle Datum in Spalte H erscheint.

Jetzt hast du eine Möglichkeit, das aktuelle Datum in Excel einzufügen und es zu fixieren, ohne dass es sich bei jedem Öffnen der Tabelle ändert.


Häufige Fehler und Lösungen

  • Fehler: Das Datum wird nicht eingefügt.

    • Lösung: Stelle sicher, dass der Code korrekt eingefügt wurde und dass du in Spalte D eine Zahl eingibst.
  • Fehler: Das Datum aktualisiert sich immer wieder.

    • Lösung: Verwende den oben genannten VBA-Code, um das Datum zu fixieren.

Alternative Methoden

Wenn du kein VBA verwenden möchtest, kannst du auch die Funktion =HEUTE() verwenden, aber beachte, dass sich das Datum jedes Mal aktualisiert, wenn die Datei geöffnet wird. Eine andere Möglichkeit wäre, das Datum manuell einzugeben oder mit der Kombination Strg + ; (Strg und Semikolon) das heutige Datum einzufügen.


Praktische Beispiele

  • Beispiel 1: In Spalte D trägst du die Zahl „524678“ ein. In Spalte H sollte automatisch das heutige Datum erscheinen, wenn du den VBA-Code richtig implementiert hast.
  • Beispiel 2: Um das Druckdatum in Excel einzufügen, kannst du ähnlichen VBA-Code anpassen, sodass das Datum beim Drucken der Datei eingefügt wird.

Tipps für Profis

  • Wenn du die Funktionalität weiter verbessern möchtest, kannst du den VBA-Code so anpassen, dass er auch andere Spalten berücksichtigt oder unterschiedliche Formate für das Datum verwendet.
  • Überlege, ob du das Datum in einem bestimmten Format anzeigen möchtest (z.B. TT.MM.JJJJ). Dies kannst du durch die Formatierung der Zelle erreichen.

FAQ: Häufige Fragen

1. Wie kann ich das heutige Datum in Excel automatisch einfügen?
Du kannst das heutige Datum mit der Funktion =HEUTE() einfügen. Um das Datum zu fixieren, verwende den oben beschriebenen VBA-Code.

2. Ist es möglich, das Datum ohne VBA zu fixieren?
Ja, du kannst das Datum manuell eingeben oder die Tastenkombination Strg + ; verwenden, um das aktuelle Datum einzufügen, das sich nicht ändert.

3. Was ist der Unterschied zwischen =HEUTE() und dem VBA-Code?
=HEUTE() aktualisiert sich jedes Mal, wenn die Datei geöffnet wird, während der VBA-Code das Datum festhält, sobald ein Wert in die angegebene Zelle eingegeben wird.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige