Anzeige
Anzeige
Anzeige
Lesedauer 3 Min.

Bei erfüllter Bedingung aktuelles Datum statisch eintragen - Excel

Pro Zeile habe ich einen Eintrag. In jeder Zeile befindet sich eine Datumszelle (z.B.C1). In dieser Datums Zelle wird immer das aktuelle Datum eingetragen. Diesen Eintrag möchte ich automatisieren. So das wenn in der ersten Zelle der Zeile ein Wert eingetragen wird automatisch das aktuelle Datum in z.B.C1 erscheint, aber das Datum soll am nächsten Tag auch noch vorhanden sein und sich nicht automatisch an den nächsten Tag anpassen.
© Quelle: PCtipp.ch

Ein statisches Datum können Sie nur entweder per Makro oder manuell eintragen. Mithilfe einer Formel wird sich das Datum immer dynamisch anpassen.

Die Manuelle Form: wählen Sie die entsprechende Zelle aus und drücken Sie "CTRL+.". Damit wird das aktuelle Datum statisch in der aktivierten Zelle eingetragen.

© Quelle: PCtipp.ch

Verwenden Sie NICHT den Punkt aus dem Zahlenblock. Damit funktioniert es nicht. Da der Eintrag abhängig vom Eintrag in einer Zelle der gleichen Zeile ist, sind Sie vermutlich mit CTRL+. genauso schnell wie mit einem Makro.

Die Makro-Lösung: Dieses Makro ist ein Lösungsansatz. Sie können es jedoch ihren Bedürfnissen entsprechend anpassen und erweitern.

Sie befinden Sich auf jener Zelle in welcher Sie gerade einen Wert eingetragen haben.

© Quelle: PCtipp.ch

Wenn Sie jetzt das Makro starten, wird mit der Code-Zeile "ActiveCell.Offset(0, 1).Select" der Cursor um 1 Spalte nach rechts verschoben (die 0 bedeutet: KEINE Zeile nach unten).

© Quelle: PCtipp.ch

Mit der nächsten Code-Zeile "ActiveCell.Value = Date" wird das aktuelle Datum in Spalte B fix eingetragen

© Quelle: PCtipp.ch

Erweiterbar wäre das Makro z.B. dahingehend, dass nun die nächste Zeile in Spalte A überprüft wird. Wenn die Zeile einen Wert enthält, wird wieder das Datum in der Nebenzelle eingetragen. Dies ist dann sinnvoll, wenn Sie immer mehrere Werte auf's Mal eintragen.

Sie können das Makro einer Schaltfläche oder einer Tastenkombination zuweisen. Womit wir wieder bei der Frage angelangt sind, womit Sie schneller sind: Mit einem Makro oder mit "CTRL+."?

---------------------------------

MAKRO ZUM KOPIEREN

---------------------------------

Sub DatumStatisch()

ActiveCell.Offset(0, 1).Select

ActiveCell.Value = Date

End Sub

---------------------------------

Kommentare

Software Kummerkasten Office Software & Tools
Anzeige
Anzeige

Neueste Beiträge

«Lex Netflix»
Investitionen in das Schweizer Filmschaffen steigen 2025 um 25 Prozent
Seit dem 1. Januar 2024 gilt die im Filmgesetz verankerte Investitionspflicht für Unternehmen mit Fernseh- und Abrufdiensten. Sie müssen mindestens 4 Prozent ihrer in der Schweiz erzielten Bruttoumsätze in das Schweizer Filmschaffen investieren. Die Auswertung des Bundesamts für Kultur (BAK) für das Jahr 2025 zeigt, dass die Investitionen gegenüber dem Vorjahr um 25 Prozent zugenommen haben.
3 Minuten
10. Aug 2026
Amazon liefert erstmals ausserhalb der USA per Drohne aus
Von einer Basis in Nordengland aus beliefert Amazon im nahen Umfeld Kunden jetzt auch im regulären Betrieb per Drohne. Auf diese Weise sollen die Waren maximal 60 Minuten nach der Bestellung dort sicher landen.
3 Minuten
11. Aug 2026
Harald A. Summa wird Chair der Internet Society
Harald A. Summa, Chairman der Initiative Diplomatic Council Quantum Leap (DCQL), ist zum Chair des Organization Member Advisory Council (OMAC) der Internet Society (ISOC) gewählt worden.
3 Minuten

Das könnte Sie auch interessieren

Cheat-Sheet
Kleiner Excel-Spick von Microsoft – übersetzt von PCtipp
Microsoft hat auf einer Seite 50 nützliche Excel-Tastenkürzel bereitgestellt. Wir haben sie übersetzt und ans Schweizer Tastaturlayout angepasst.
2 Minuten
15. Jul 2026
Outlook-Tipps
Das neue Outlook
Microsoft hat seine beliebte E-Mail- und Organisations-Software Outlook komplett überarbeitet. Wir zeigen Ihnen Schritt für Schritt, wie Sie die neue Version einrichten, bedienen und optimal auf Ihre Bedürfnisse anpassen.
9 Minuten
10. Apr 2024
PCtipp-Lifehack
Acht Tipps für Google Sheets
Luca zeigt Ihnen acht nützliche Tipps, mit denen Sie effizienter in Google Sheets arbeiten.
2 Minuten
23. Jul 2026
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Kommentare