KutoolsforOffice — Eine Lösung, fünf leistungsstarke Tools.Mehr erreichen mit weniger Aufwand.März-Aktion: 20 % Rabatt

Wie fügt man beim Doppelklick automatisch das aktuelle Datum bzw. die aktuelle Uhrzeit in eine Zelle ein?

AutorSiluvia Änderungsdatum

Das häufige Eingeben des aktuellen Datums oder von Datum und Uhrzeit in Excel-Zellen kann eine repetitive Aufgabe sein – besonders bei der Erstellung von Protokollen, der Fortschrittsverfolgung oder der Terminplanung. Das manuelle Tippen des Datums jedes Mal ist nicht nur zeitaufwendig, sondern auch fehleranfällig. Dieser Artikel stellt einen effizienten Lösungsansatz vor: Mit einem einfachen Doppelklick fügen Sie das aktuelle Datum oder Datum und Uhrzeit automatisch in jede beliebige Zelle innerhalb eines begrenzten Bereichs Ihres Arbeitsblatts ein. Indem Sie die folgenden Lösungen umsetzen, optimieren Sie Ihren Arbeitsablauf und stellen konsistente Dateneingaben sicher.

Doppelklick zum automatischen Einfügen des aktuellen Datums oder Datum und Uhrzeit mithilfe von VBA-Code


Doppelklick zum automatischen Einfügen des aktuellen Datums oder Datum und Uhrzeit mithilfe von VBA-Code

Wenn Sie das aktuelle Datum oder Datum und Uhrzeit per einfachem Doppelklick in eine Zelle einfügen möchten, lässt sich das mühelos mit einem kurzen VBA-Code umsetzen. Diese Lösung ist ideal für alle, die mit Formularen, Anwesenheitslisten oder ähnlichen Szenarien arbeiten, bei denen Daten schnell und präzise erfasst werden müssen. Der VBA-Ansatz bietet maximale Flexibilität beim Zielbereich – und die Aktualisierung erfolgt sofort nach dem Doppelklick.

1. Klicken Sie in Ihrem Arbeitsblatt mit der rechten Maustaste auf die Registerkarte unten für das Blatt, in dem diese Funktion aktiviert werden soll. Wählen Sie dann im erscheinenden Menü Code anzeigen aus. Dadurch öffnet sich der Visual Basic-Editor ausschließlich für dieses Arbeitsblatt – achten Sie daher darauf, das richtige Blatt zu bearbeiten, da der Code nur dort wirksam ist.

2. Fügen Sie im Fenster Microsoft Visual Basic für Applikationen den folgenden VBA-Code in das Code-Fenster des Blatts ein.

VBA-Code: Doppelklick zum Einfügen des aktuellen Datums in eine Zelle

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("A1:B10")) Is Nothing Then
        Cancel = True
        Target.Formula = Date
    End If
End Sub

Hinweise:

1. Der Bereich A1:B10im Code legt die Gruppe von Zellen fest, in denen ein Doppelklick automatisch das Datum einfügt. Sie können diesen Bereich an das Layout und die Anforderungen Ihres Arbeitsblatts anpassen.
2. Standardmäßig fügt der Code das aktuelle Datum ein. Um sowohl Datum als auch Uhrzeit einzufügen, ersetzen Sie Datedurch Now()im Code. Durch diese Anpassung wird sichergestellt, dass der eingefügte Wert Datum und Uhrzeit exakt zum Zeitpunkt des Doppelklicks enthält.

Klicken Sie auf Code anzeigen und fügen Sie den Code in das Modul ein

Praktischer Tipp: Ein Doppelklick außerhalb des begrenzten Bereichs löst keine Datumseingabe aus – stellen Sie sicher, dass Ihre Zielzellen innerhalb des festgelegten Bereichs liegen.

Fehlerhinweis: Sollte der Code nicht wie erwartet ausgeführt werden, stellen Sie sicher, dass Sie ihn im richtigen Arbeitsblatt (nicht in einem Standardmodul) eingefügt haben und dass Makros in Ihrer Excel-Umgebung aktiviert sind. Falls Sicherheitseinstellungen die Ausführung von Makros blockieren, passen Sie diese unter Datei > Optionen > Vertrauensstellungscenter > Einstellungen des Vertrauensstellungscenters an.

3. Drücken Sie nach der Code-Eingabe gleichzeitig Alt+Q, um das Fenster Microsoft Visual Basic für Applikationen zu schließen und zu Ihrem Arbeitsblatt zurückzukehren. Dadurch werden alle Änderungen im Editor gespeichert.

Sobald Sie eine beliebige Zelle innerhalb des begrenzten Bereichs (z. B.)A1:B10) doppelklicken, füllt Excel diese automatisch mit dem aktuellen Datum oder Datum und Uhrzeit – je nach Anpassung Ihres Codes. Diese einfache Automatisierung spart Zeit und sorgt für eine konsistente Dokumentation.

Ein Screenshot von kutools for excel ai

Entfesseln Sie die Magie von Excel mit KUTOOLS AI

  • Intelligente Ausführung: Führen Sie Zelloperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles ganz einfach per Sprachbefehl.
  • Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe optimal zu optimieren.
  • VBA-Programmierung: Schreiben und implementieren Sie VBA-Code ganz mühelos.
  • Formelinterpretation: Verstehen Sie komplexe Formeln spielend leicht.
  • Textübersetzung: Überwinden Sie Sprachbarrieren direkt in Ihren Tabellenkalkulationen.
Erweitern Sie Ihre Excel-Fähigkeiten mit KI-gestützten Werkzeugen.Jetzt herunterladenund erleben Sie Effizienz wie nie zuvor!

Verwandte Artikel:

Beste Office-Produktivitätstools

🤖KUTOOLS AI-Assistent: Revolutionieren Sie Datenanalyse basierend auf:Intelligente Ausführung   |  Code generieren|  benutzerdefinierte Formeln erstellen  |  Daten analysieren und Diagramme erstellen|  Erweiterte Funktionen aufrufen
Beliebte Funktionen:Suchen, hervorheben oder Doppelte markieren   |  Leere Zeilen löschen   |  Spalten kombinieren oder Zellen ohne Datenverlust   |   Runden ohne Formel...
Erweiterte SVERWEIS:VLookup mit mehreren Kriterien  |  VLookup mit mehreren Werten  |   VLookup über mehrere Arbeitsblätter hinweg   |   Fuzzy Match....
Erweiterte Dropdown-Liste:Schnell eine Dropdown-Liste erstellen   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl-Dropdown-Liste....
Spalten-Manager:Eine bestimmte Anzahl von Spalten hinzufügen|Spalten verschieben|Sichtbarkeitsstatus ausgeblendeter Spalten umschalten|Bereiche & Spalten vergleichen...
Hervorgehobene Funktionen:Gitterfokus   |  Entwurf   |Erweiterte Formelleiste   | Arbeitsmappen- & Blatt-Manager   |  Ressourcenbibliothek(AutoText)|  Datumsauswahl   |  Arbeitsblätter konsolidieren  |  Verschlüsseln/Zellen entschlüsseln   | E-Mails per Liste versenden   |  Super Filter   |   Spezialfilter(Zellen mit fettgedruckter Schrift filtern/kursiv/durchgestrichen...) ...
Top-15-Toolsets:12-Text-Tools(Text hinzufügen,Bestimmte Zeichen löschen, ...)|   50+-Diagramm-Typen(Gantt-Diagramm, ...)|   40+ Praktische Formeln(Alter basierend auf dem Geburtstag berechnen, ...)|   19-Einfüge-Tools(QR-Code einfügen,Bild aus Pfad einfügen, ...)|   12-Konvertierungs-Tools(In Wörter umwandeln,Wechselkursumrechnung, ...)|   7-Vereinigen/Aufteilen-Tools(Erweiterte Zeilen zusammenführen,Zellen aufteilen, ...)|... und mehr
Verwenden Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und 40+ weitere Sprachen!

Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...


Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher

  • Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
  • Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!

Alle Kutools-Add-Ins – ein Installationsprogramm

Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.

ExcelWordOutlookTabsPowerPoint
  • Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
  • Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
  • Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
  • 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
  • Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins