Direkt zum Inhalt

Wie füge ich ein aktuelles Datum / eine aktuelle Uhrzeit automatisch in eine Zelle ein, indem ich in Excel doppelklicke?

Autor: Siluvia Letzte Änderung: 2024-09-20

Wenn Sie häufig das aktuelle Datum oder die aktuelle Uhrzeit in ein Arbeitsblatt einfügen müssen, können Sie die in diesem Artikel beschriebene Methode ausprobieren. Dieser Artikel hilft Ihnen dabei, das aktuelle Datum oder die aktuelle Datumszeile in einem bestimmten Bereich automatisch hinzuzufügen oder einzugeben, indem Sie nur einen Doppelklick ausführen.

Doppelklicken Sie, um das aktuelle Datum oder die aktuelle Uhrzeit mit VBA-Code automatisch hinzuzufügen / einzugeben


Doppelklicken Sie, um das aktuelle Datum oder die aktuelle Uhrzeit mit VBA-Code automatisch hinzuzufügen / einzugeben

Sie können den folgenden VBA-Code ausführen, um mit einem Doppelklick automatisch das aktuelle Datum oder die aktuelle Datumszeit in eine Zelle einzufügen. Bitte gehen Sie wie folgt vor.

1. Klicken Sie mit der rechten Maustaste auf die Registerkarte Blatt, auf der Sie das aktuelle Datum in die angegebenen Zellen einfügen möchten, und wählen Sie dann aus Code anzeigen aus dem Kontextmenü.

2. In dem Microsoft Visual Basic für Anwendungen Kopieren Sie den folgenden VBA-Code und fügen Sie ihn in das Code-Fenster ein.

VBA-Code: Doppelklicken Sie, um einer Zelle das aktuelle Datum hinzuzufügen

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

Notizen:

1. Im Code ist A1: B10 der Bereich, zu dem Sie das aktuelle Datum hinzufügen.
2. Wenn Sie der Zelle die aktuelle Datums- und Uhrzeitangabe hinzufügen müssen, ersetzen Sie diese bitte Datum mit Jetzt() im Code. Sie können sie nach Bedarf ändern.

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

3. Drücken Sie Andere + Q Tasten gleichzeitig zum Schließen der Microsoft Visual Basic für Applikationen Fenster und kehren Sie zum Arbeitsblatt zurück.

Von nun an, wenn Sie auf eine Zelle im angegebenen Bereich A1: B10 doppelklicken. Das aktuelle Datum oder die aktuelle Uhrzeit werden automatisch eingegeben.

ein Screenshot von Kutools für 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 gesteuert durch einfache Befehle.
  • Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe zu optimieren.
  • VBA-Codierung: Schreiben und implementieren Sie mühelos VBA-Code.
  • Formelinterpretation: Verstehen Sie komplexe Formeln mit Leichtigkeit.
  • Textübersetzung: Überwinden Sie Sprachbarrieren in Ihren Tabellen.
Erweitern Sie Ihre Excel-Funktionen mit KI-gestützten Tools. Jetzt herunterladen und erleben Sie Effizienz wie nie zuvor!

In Verbindung stehende Artikel:

Beste Office-Produktivitätstools

🤖 Kutools KI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Erstellen Sie benutzerdefinierte Formeln  |  Analysieren Sie Daten und erstellen Sie Diagramme  |  Rufen Sie Kutools-Funktionen auf...
Beliebte Funktionen: Suchen, markieren oder identifizieren Sie Duplikate   |  Leere Zeilen löschen   |  Kombinieren Sie Spalten oder Zellen, ohne Daten zu verlieren   |   Runde ohne Formel ...
Super-Lookup: VLookup mit mehreren Kriterien    VLookup mit mehreren Werten  |   VLookup über mehrere Blätter hinweg   |   Unscharfe Suche ....
Erweiterte Dropdown-Liste: Erstellen Sie schnell eine Dropdown-Liste   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Fügen Sie eine bestimmte Anzahl von Spalten hinzu  |  Spalten verschieben  |  Schalten Sie den Sichtbarkeitsstatus ausgeblendeter Spalten um  |  Vergleichen Sie Bereiche und Spalten ...
Ausgewählte Funktionen: Rasterfokus   |  Designansicht   |   Große Formelleiste    Arbeitsmappen- und Blattmanager   |  Ressourcen (Autotext)   |  Datumsauswahl   |  Arbeitsblätter kombinieren   |  Zellen verschlüsseln/entschlüsseln    Senden Sie E-Mails nach Liste   |  Superfilter   |   Spezialfilter (Filter fett/kursiv/durchgestrichen...) ...
Top 15 Toolsets12 Text Werkzeuge (Text hinzufügen, Zeichen entfernen, ...)   |   50+ Chart Typen (Gantt-Diagramm, ...)   |   40+ Praktisch Formeln (Berechnen Sie das Alter basierend auf dem Geburtstag, ...)   |   19 Einfügen Werkzeuge (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Umwandlung (Conversion) Werkzeuge (Zahlen zu Wörtern, Currency Conversion, ...)   |   7 Zusammenführen & Teilen Werkzeuge (Erweiterte Zeilen kombinieren, Zellen teilen, ...)   |   ... und mehr
Verwenden Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über 40 weitere!

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, um die Produktivität zu steigern und Zeit zu sparen.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...


Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!