Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Philipp123 vom 08.06.2019, 12:13 Options
Datumsfunktion
Hallo,
ich möchte in Excel eine wenn-Funktion erstellen, die es ermöglicht, dass man in eine Zelle zB ein "X" einträgt, dann soll in der nächsten Zelle das aktuelle Datum stehen, sich aber nicht aktualisieren. Ich habs mit der Funktion: Wenn=(A1="X";heute(); "Falsch") versucht, doch leider ist dann natürlich am nächsten Tag das Datum aktualisiert.
Hat jemand einen Tipp für mich?
Danke im Voraus.
ich möchte in Excel eine wenn-Funktion erstellen, die es ermöglicht, dass man in eine Zelle zB ein "X" einträgt, dann soll in der nächsten Zelle das aktuelle Datum stehen, sich aber nicht aktualisieren. Ich habs mit der Funktion: Wenn=(A1="X";heute(); "Falsch") versucht, doch leider ist dann natürlich am nächsten Tag das Datum aktualisiert.
Hat jemand einen Tipp für mich?
Danke im Voraus.
Antwort 1 von M.O. vom 08.06.2019, 12:57 Options
Hallo Philipp,
das kannst du nur über VBA lösen.
Wähle das Tabellenblatt aus, in dem du das Datum eingefügt haben willst und und drücke dann Alt + F11.
Füge den folgenden Code in das VBA-Projekt des betreffenden Tabellenblatts ein:
Machst du jetzt in der Spalte A ein x, so wird in der betreffenden Zeile in Spalte B das aktuelle Datum eingefügt, das sich auch nicht mehr ändert.
Gruß
M.O.
das kannst du nur über VBA lösen.
Wähle das Tabellenblatt aus, in dem du das Datum eingefügt haben willst und und drücke dann Alt + F11.
Füge den folgenden Code in das VBA-Projekt des betreffenden Tabellenblatts ein:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Intersect(Target, Range("A:A")) Is Nothing Then
Else
If Target.Value = "x" Then
Cells(Target.Row, 2) = Date
End If
End If
End SubMachst du jetzt in der Spalte A ein x, so wird in der betreffenden Zeile in Spalte B das aktuelle Datum eingefügt, das sich auch nicht mehr ändert.
Gruß
M.O.
Antwort 2 von Philipp123 vom 12.06.2019, 09:32 Options
Danke! Hat wunderbar geklappt!
Ähnliche Themen
problem mit datumsfunktion!
timoxy 01.05.2007 - 127 Hits - 7 Antworten
Syntaxfehler bei DatDiff in Access!?
sn0w 19.07.2007 - 80 Hits - 2 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
