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

Forumthread: Zeitstempel in Excel-Tabelle

Zeitstempel in Excel-Tabelle
10.10.2005 10:01:12
Franz
Hallo Zusammen,
ich möchte in einer Tabelle festhalten wann (Datum und Uhrzeit) in einer Zelle ein Wert eingetragen wird. Insgesamt habe ich 50 Zellen mit Werten zu füllen.
Zuerst dachte ich mit der Funktion "=jetzt()" könnte ich es realisieren, doch ich musste feststellen, mit jedem neuem Wert werden alle "jetzt"-Einträge auf den aktuellen (zuletzt eingegebenen) Wert aktuallisiert.
Hat jemdand eine Idee wie ich das umsetzten kann?
Danke,
Franz
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeitstempel in Excel-Tabelle
10.10.2005 10:21:40
MichaV
Hallo,
z.B. so:
Wenn keine Gefahr besteht, daß Du Zirkelbezüge hast, kannst Du die Iteration einschalten und dann in Zelle B1 eintragen:
=WENN(A10;WENN(B1"";B1;"Eingetragen: "&TEXT(JETZT();"hh:mm:ss"));"")
Beim ersten Eintrag in A1 erscheint dann die Uhrzeit des Eintrages. Die bleibt so lange gleich, bis A1 wieder gelöscht wird.
Gruss- Micha
PS: Rückmeldung wäre nett.
Anzeige
AW: Zeitstempel in Excel-Tabelle
10.10.2005 11:01:22
Franz
Hallo Ihr Beiden, Micha und Harald,
danke für die schnelle Info.
Ich habe mich für die Lösung von Harald entschieden.
Die von Micha hab ich auch ausprobiert, ging aber irgendwie nicht richtig (vielleicht hab ich mich zu dumm angestellt :-) ).
Kann jetzt an meiner Tabelle weiterbasteln.
Grüße,
Franz
Anzeige
Danke für Rückmeldung, wenngleich..
10.10.2005 11:05:59
Harald
mein Lösungsvorschlag (den übrigens MichaV so oder so ähnlich ebenfalls locker aus dem Ärmel schüttelt) bei dem angegebenen Level vba-nein eher ein Schuss ins Blaue war.
Gruß
Harald
AW: Zeitstempel in Excel-Tabelle
10.10.2005 10:23:15
Harald
Hallo Franz,
rechte Maus auf den Namen des Blattes, Code anzeigen und ins rechte fenster diesen Code reinkopieren.
Den Bereich der Wirksamkeit anpassen, fertich.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim RaBereich As Range
' abbrechen, wenn erste Zeile oder mehr als eine Zelle aktiv
If Target.Row < 2 Or Target.Count > 1 Then Exit Sub
'für Änderungen in E2 bis E50. Ggf anpassen
Set RaBereich = Range("E2:E50")
Application.EnableEvents = False
'bei Änderung eine Zelle links davon Datum und Uhrzeit eintragen
If Not Intersect(Target, RaBereich) Is Nothing Then
Target.Offset(0, -1) = Format(Now, "dd.mm.yyyy_hh:mm:ss")
End If
Application.EnableEvents = True
Set RaBereich = Nothing
End Sub

Viel Erfolg
Harald
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Infobox / Tutorial

Zeitstempel in Excel-Tabelle erstellen


Schritt-für-Schritt-Anleitung

Um einen Zeitstempel in Excel bei der Eingabe oder Änderung von Werten zu erstellen, kannst Du die folgende Methode verwenden. Diese Anleitung basiert auf der Verwendung von Excel VBA, um einen Zeitstempel automatisch einzufügen, wenn ein Wert eingegeben wird.

  1. Öffne die Excel-Tabelle, in der Du den Zeitstempel einfügen möchtest.

  2. Klicke mit der rechten Maustaste auf den Tab des Arbeitsblatts, in dem Du arbeiten möchtest, und wähle „Code anzeigen“.

  3. Füge den folgenden VBA-Code in das rechte Fenster ein:

    Private Sub Worksheet_Change(ByVal Target As Excel.Range)
       Dim RaBereich As Range
       ' abbrechen, wenn erste Zeile oder mehr als eine Zelle aktiv
       If Target.Row < 2 Or Target.Count > 1 Then Exit Sub
       ' für Änderungen in E2 bis E50. Ggf anpassen
       Set RaBereich = Range("E2:E50")
       Application.EnableEvents = False
       ' bei Änderung eine Zelle links davon Datum und Uhrzeit eintragen
       If Not Intersect(Target, RaBereich) Is Nothing Then
           Target.Offset(0, -1) = Format(Now, "dd.mm.yyyy_hh:mm:ss")
       End If
       Application.EnableEvents = True
       Set RaBereich = Nothing
    End Sub
  4. Schließe den VBA-Editor und teste die Eingabe in den Zellen E2 bis E50. Bei jeder Änderung in diesen Zellen wird nun automatisch der Zeitstempel in der linken Zelle (D) eingefügt.


Häufige Fehler und Lösungen

  • Fehler: Der Zeitstempel wird nicht eingefügt.

    • Lösung: Stelle sicher, dass der VBA-Code korrekt eingefügt wurde und dass Du den richtigen Zellbereich (E2:E50) angegeben hast.
  • Fehler: Der Zeitstempel aktualisiert sich ständig.

    • Lösung: Vermeide die Verwendung von Formeln wie =JETZT(), da diese sich bei jeder Berechnung aktualisieren. Das VBA-Skript fügt den Zeitstempel nur bei Änderungen ein.

Alternative Methoden

Falls Du keinen VBA-Code verwenden möchtest, kannst Du auch die Iteration in Excel aktivieren. Hier ist ein Beispiel:

  1. Gehe zu „Datei“ -> „Optionen“ -> „Formeln“ und aktiviere „Iteration“.
  2. Verwende die folgende Formel in Zelle B1:

    =WENN(A1<>"";WENN(B1<>"";B1;"Eingetragen: "&TEXT(JETZT();"hh:mm:ss"));"")

Diese Methode erlaubt es, einen Zeitstempel bei der Eingabe in Zelle A1 zu erstellen, solange B1 leer ist.


Praktische Beispiele

  • Du möchtest einen Zeitstempel in Excel erstellen, wenn Du Daten in eine Liste eingibst. Verwende den oben genannten VBA-Code, um Datum und Uhrzeit automatisch zu protokollieren.
  • Bei der Eingabe von Notizen in einer Tabelle kann der Zeitstempel helfen, die Eingabezeit nachzuvollziehen.

Tipps für Profis

  • Nutze das Excel Makro Zeitstempel, um mehrere Zellen gleichzeitig zu aktualisieren. Du kannst den VBA-Code erweitern, um Anpassungen für verschiedene Bereiche vorzunehmen.
  • Experimentiere mit unterschiedlichen Datums- und Uhrzeitformaten, um die Darstellung des Zeitstempels nach Deinen Wünschen zu gestalten.

FAQ: Häufige Fragen

1. Wie kann ich einen Zeitstempel in Excel ohne VBA erstellen?
Es ist möglich, einen Zeitstempel ohne VBA zu erstellen, indem Du die Iteration aktivierst und entsprechende Formeln verwendest. Dies kann jedoch weniger flexibel sein.

2. Wie funktioniert der VBA-Zeitstempel?
Der VBA-Zeitstempel wird durch das Worksheet_Change-Ereignis aktiviert. Das bedeutet, dass der Zeitstempel nur dann in die Zelle eingefügt wird, wenn Du eine Änderung vornimmst.

3. Kann ich den Zeitstempel auch in eine andere Zelle einfügen?
Ja, Du kannst den Code anpassen, um den Zeitstempel in eine andere Zelle einzufügen, indem Du den Offset-Wert im VBA-Code änderst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige