Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

aktuelles Datum, aber nicht aktualisieren

Forumthread: aktuelles Datum, aber nicht aktualisieren

aktuelles Datum, aber nicht aktualisieren
19.09.2003 11:22:04
Michael
Hallo Zusammen,
Ich möchte, dass wenn in Zelle A1 ein Wert eingetragen wird, in Zelle B1 automatisch das aktuelle Datum (Systemdatum) eingetragen wird. Dieses Datum soll aber später nicht mehr aktualisiert werden.

Hat jemand einen Tip ?

Vorab Danke!

michael
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: aktuelles Datum, aber nicht aktualisieren
19.09.2003 11:51:05
Peter M
Hallo Michael
Auf die schnelle fällt mir nur das ein. Benutze eine SendKey-Eigenschaft


Sub Datum()
Application.SendKeys Keys:="^{.}{EINGABE}"
End Sub


Peter M
AW: aktuelles Datum, aber nicht aktualisieren
19.09.2003 11:51:30
Mac4
Hallo Michael,

mit folgendem Ereignismakro kanns gehen:


Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1")) Is Nothing Then
Else
Target.Offset(0, 1).Value = Date
End If
End Sub


Code direkt in die Tabelle kopieren (Rechtsklick auf TabReiter und Code einfügen)

Marc
Anzeige
Gibt es da keine Funktion ??
19.09.2003 12:01:06
Michael
Hallo Marc,
mir geht es eigentlich nur darum, dass das aktuelle Datum nur einmal eingetragen wird und dann nicht mehr aktualisiert wird. Gibt es da keine Funktion, die wie "heue()" funktioniert, aber nicht immer aktualisiert wird ?
Ich möchte es nicht über ein Makro lösen.

Vorab Danke!

gruss

michael
Anzeige
AW: Gibt es da keine Funktion ??
19.09.2003 12:08:07
Mac4
Hi,

leider nein. Du kannst aber per Tastenkombi Strg + . das aktuelle Datum fest erzeugen!

Marc
Etwas konkreter
19.09.2003 12:09:43
Michael
Hallo Zusammen,
evtl. war meine Frage etwas zu ungenau.
Zur Zeit habe ich das Problem so gelöst:

=WENN(A46<>0;HEUTE();"")

Es funktioniert auch so wie es soll, nur das Datum darf sich nicht immer aktualisieren.

Gruss

michael
Anzeige
AW: Etwas konkreter
19.09.2003 12:19:23
Lothar
Hallo Michael,

ich gehe mal davon aus, dass Du dieses aktuelle Datum mehrfach benötigst und deshalb weder den angebotenen Code, noch die STRG+. Variante verwenden willst. :)
Falls dem so ist hier eine Lösung die einen Spaltenbereich umfasst.
Sollte ich mit meiner Vermutung Recht haben, formuliere es dann zukünftig auch so, wie es brauchst:)

Im folgenden Beispiel ist der Bereich A1:A100 definiert, das kannst Du aber auch problemlos verändern.

Gruss
Lothar

Code kommt in das Tabellenblatt wo er benötigt wird:


Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1:A100")) Is Nothing Then Exit Sub
If Target.Value <> "" Then
Target.Offset(0, 1).Value = Date
Else
Target.Offset(0, 1).ClearContents
End If
End Sub

Anzeige
AW: aktuelles Datum, aber nicht aktualisieren
19.09.2003 11:54:47
Panicman
Hallo Michael,

klicke mit rechts auf deinen Tabellennamen "Code anzeigen". vorhandenen Text makieren und löschen und folgendes einfügen

Option Explicit


Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address <> "$A$1" Then Exit Sub
Range("B1").Value = Date
End Sub


Gruß
Holger
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Aktuelles Datum in Excel einfügen, ohne dass es sich aktualisiert


Schritt-für-Schritt-Anleitung

Um das aktuelle Datum in Excel einzufügen, ohne dass es sich aktualisiert, kannst du ein Ereignismakro verwenden. Hier ist die einfache Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und gehe zu dem Arbeitsblatt, in das du das Datum einfügen möchtest.

  2. Rechtsklicke auf den Tabellennamen unten links und wähle „Code anzeigen“.

  3. Füge den folgenden VBA-Code ein:

    Private Sub Worksheet_Change(ByVal Target As Range)
       If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub
       Target.Offset(0, 1).Value = Date
    End Sub
  4. Schließe den VBA-Editor und kehre zu deinem Arbeitsblatt zurück.

  5. Gib einen Wert in Zelle A1 ein. In Zelle B1 wird dann das aktuelle Datum eingefügt, ohne dass es sich später aktualisiert.


Häufige Fehler und Lösungen

  • Fehler: Das Datum wird nicht eingefügt.

    • Lösung: Stelle sicher, dass du den Code korrekt in das richtige Arbeitsblatt eingefügt hast. Überprüfe auch, ob du in Zelle A1 einen Wert eingibst.
  • Fehler: Das Datum aktualisiert sich trotzdem.

    • Lösung: Verwende die Funktion =HEUTE() nicht, da diese automatisch aktualisiert wird. Nutze stattdessen das oben gezeigte Makro.

Alternative Methoden

Falls du kein Makro verwenden möchtest, gibt es eine Tastenkombination, die dir hilft, das aktuelle Datum ohne Aktualisierung einzufügen:

  1. Wähle eine Zelle aus, in die du das Datum einfügen möchtest.
  2. Drücke Strg + . (Punkt) auf deiner Tastatur. Damit wird das aktuelle Datum eingefügt, das sich nicht aktualisiert.

Praktische Beispiele

Hier sind einige Anwendungsbeispiele für das Einfügen des aktuellen Datums in Excel:

  1. Mehrere Zellen gleichzeitig: Wenn du in den Zellen A1:A100 Werte eingibst, kannst du den folgenden Code verwenden, um das Datum in die benachbarte Spalte (B1:B100) einzufügen:

    Private Sub Worksheet_Change(ByVal Target As Range)
       If Intersect(Target, Range("A1:A100")) Is Nothing Then Exit Sub
       If Target.Value <> "" Then
           Target.Offset(0, 1).Value = Date
       Else
           Target.Offset(0, 1).ClearContents
       End If
    End Sub
  2. Zeitstempel bei Dateneingabe: Du kannst das Datum auch automatisch einfügen, wenn du einen Wert in eine andere Zelle eingibst, indem du den Code entsprechend anpasst.


Tipps für Profis

  • Vermeide die Verwendung von =HEUTE(), wenn du ein Datum einfügen möchtest, das sich nicht ändern soll.
  • Nutze die SendKeys-Methode für einfache Automatisierung. Dieser Ansatz ist jedoch weniger stabil als das Einfügen von VBA-Code.
  • Speichere deine Arbeitsmappe als Makro-Enabled Workbook (.xlsm), um sicherzustellen, dass deine Makros funktionieren.

FAQ: Häufige Fragen

1. Wie kann ich das Datum automatisch in Excel einfügen, ohne dass es sich aktualisiert?
Du kannst ein Ereignismakro verwenden, um das aktuelle Datum in eine Zelle einzufügen, wenn du einen Wert in eine andere Zelle eingibst.

2. Funktioniert das auch in älteren Excel-Versionen?
Ja, die oben genannten Methoden sollten in den meisten Excel-Versionen funktionieren, die VBA unterstützen.

3. Gibt es eine Möglichkeit, das Datum manuell einzugeben?
Ja, du kannst einfach die Tastenkombination Strg + . verwenden, um das aktuelle Datum ohne Aktualisierung einzufügen.

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