Wie fügt man ein Datum in eine Zelle ein, wenn ein Kontrollkästchen aktiviert ist, in Excel?
Normalerweise geben Sie einen Zeitstempel mithilfe von Tastenkombinationen in Excel ein. Wie wäre es jedoch, einen Zeitstempel mithilfe eines Kontrollkästchens in eine Zelle einzufügen? Beim Aktivieren des Kontrollkästchens wird der Zeitstempel automatisch in eine festgelegte Zelle eingefügt. Dieser Artikel hilft Ihnen dabei, dies zu realisieren.
Datum einfügen in eine Zelle eintragen, wenn ein Kontrollkästchen aktiviert ist – mit VBA-Code
Datum einfügen in eine Zelle eintragen, wenn ein Kontrollkästchen aktiviert ist – mit VBA-Code
Dieser Abschnitt stellt ein VBA-Skript vor, das automatisch einen Zeitstempel in eine Zelle einfügt, sobald Sie ein Kontrollkästchen in Excel aktivieren. Gehen Sie dazu wie folgt vor.
1. Drücken Sie nach dem Einfügen eines Kontrollkästchens gleichzeitig die Tasten Alt+F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie im Fenster Microsoft Visual Basic for Applications auf Einfügen > Modul. Kopieren Sie anschließend den folgenden VBA-Code, und fügen Sie ihn in das Modulfenster ein.
VBA-Code: Datum einfügen in eine Zelle eintragen, wenn ein Kontrollkästchen aktiviert ist
Sub CheckBox_Date_Stamp()
Dim xChk As CheckBox
Set xChk = ActiveSheet.CheckBoxes(Application.Caller)
With xChk.TopLeftCell.Offset(, 1)
If xChk.Value = xlOff Then
.Value = ""
Else
.Value = Date
End If
End With
End Sub3. Drücken Sie die Tasten Alt+Q, um das Fenster Microsoft Visual Basic for Applications zu schließen.
4. Klicken Sie mit der rechten Maustaste auf das Kontrollkästchen und wählen Sie im Kontextmenü Makro zuweisen. Siehe Screenshot:
5. Wählen Sie im Dialogfeld Makro zuweisen im Feld Makroname das Makro CheckBox_Date_Stamp aus, und klicken Sie dann auf die Schaltfläche OK. Siehe Screenshot:
Durch Aktivieren des Kontrollkästchens wird der Zeitstempel automatisch in die benachbarte Zelle eingefügt.
Verwandte Artikel:
- Wie ändert man einen festgelegten Zellwert oder die Zellfarbe, sobald ein Kontrollkästchen in Excel aktiviert wird?
- Wie hebt man eine Zelle oder Zeile in Excel hervor, wenn ein Kontrollkästchen aktiviert ist?
- Wie lässt sich ein Kontrollkästchen in Excel basierend auf einem Zellwert aktivieren?
- Wie filtert man Daten in Excel anhand eines Kontrollkästchens?
- Wie blendet man ein Kontrollkästchen in Excel aus, wenn die zugehörige Zeile ausgeblendet ist?
- Wie erstellt man in Excel eine Dropdown-Liste mit mehreren Kontrollkästchen?
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 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.
- 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