Wie gebe ich automatisch das Datum ein, an dem Daten in eine Spalte eingegeben werden?
Wenn Sie an einem Arbeitsblatt arbeiten, möchten Sie, dass das aktuelle Datum und die aktuelle Uhrzeit automatisch in eine Spalte B eingegeben werden, wenn Sie Daten in Spalte A eingeben (siehe folgenden Screenshot). Wie können Sie in Excel versuchen, diesen Job mit einer einfachen und schnellen Lösung zu lösen?
Geben Sie automatisch das Datum ein, an dem Daten in eine Spalte mit VBA-Code eingegeben wurden
Geben Sie automatisch das Datum ein, an dem Daten in eine Spalte mit VBA-Code eingegeben wurden
Vielleicht gibt es für uns keine direkte Möglichkeit, diesen Job in Excel zu bearbeiten, aber der folgende VBA-Code kann Ihnen helfen. Gehen Sie wie folgt vor:
1. Wählen Sie die Blattregisterkarte aus, in die Sie das Datum automatisch einfügen möchten, klicken Sie mit der rechten Maustaste darauf und wählen Sie Code anzeigen aus dem textmenü, dann in eh herausgesprungen Microsoft Visual Basic für Applikationen Im Fenster kopieren Sie bitte den folgenden Code und fügen Sie ihn in das Modul ein:
VBA-Code: Geben Sie das Datum automatisch ein, wenn Sie Daten in eine andere Spalte eingeben:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A2:A15")) Is Nothing Then
With Target(1, 2)
.Value = Date & " " & Time
.EntireColumn.AutoFit
End With
End If
End Sub
2. Speichern und schließen Sie dann dieses Codefenster und kehren Sie zum Arbeitsblatt zurück. Wenn Sie jetzt Daten in Spalte A eingeben, gibt die entsprechende Zelle in Spalte B automatisch sofort das aktuelle Datum und die aktuelle Uhrzeit ein.
Note: Im obigen Code, A2: A15 sind die Zellen, in die Sie Werte eingeben möchten.
Beste Office-Produktivitätstools
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!
