Datum automatsich einfügen wenn Eintrag in Zelle

[Jens Wennemede]

Hallo NG,

ich nutze eine Tabelle um meine täglichen Aufgaben zu erfassen. Wenn ich die
Aufgaben erledigt habe schreibe ich ein x in Zelle E der Spalte. Ich möchte
jetzt das automatisch das aktuelle Datum in Spalte F eingetragen wird.
Dieses soll sich natürlich nicht mehr verändern sollte also als Wert und
nicht als Formel vorliegen.

Wie kann man dies machen?
Hat jemand eine Idee?

[Thomas Ramel]

Grüezi Jens

Jens Wennemede schrieb am 12.04.2008

Post by Jens Wennemede
ich nutze eine Tabelle um meine täglichen Aufgaben zu erfassen. Wenn ich die
Aufgaben erledigt habe schreibe ich ein x in Zelle E der Spalte. Ich möchte
jetzt das automatisch das aktuelle Datum in Spalte F eingetragen wird.
Dieses soll sich natürlich nicht mehr verändern sollte also als Wert und
nicht als Formel vorliegen.
Wie kann man dies machen?
Hat jemand eine Idee?

Das könntest Du mit einem VBA-Ereigniscode tun, sobald ein Wert in Spalte E
eingetragen wird.

Aber noch direkter und ohne VBA könntest Du das Datum direkt in die Zelle
schreiben indem Du statt ein 'x' einfach STRG+. (Punkt) drückst.


Mit freundlichen Grüssen
Thomas Ramel

[Jens Wennemede]

Hallo Thomas,

ja das mit dem VBA-Ereigniscode gefällt mir

Aber wie stelle ich dies an?

Grüsse Jens

Post by Thomas Ramel
Grüezi Jens
Jens Wennemede schrieb am 12.04.2008

Post by Jens Wennemede
ich nutze eine Tabelle um meine täglichen Aufgaben zu erfassen. Wenn ich die
Aufgaben erledigt habe schreibe ich ein x in Zelle E der Spalte. Ich möchte
jetzt das automatisch das aktuelle Datum in Spalte F eingetragen wird.
Dieses soll sich natürlich nicht mehr verändern sollte also als Wert und
nicht als Formel vorliegen.
Wie kann man dies machen?
Hat jemand eine Idee?

Das könntest Du mit einem VBA-Ereigniscode tun, sobald ein Wert in Spalte E
eingetragen wird.
Aber noch direkter und ohne VBA könntest Du das Datum direkt in die Zelle
schreiben indem Du statt ein 'x' einfach STRG+. (Punkt) drückst.
Mit freundlichen Grüssen
Thomas Ramel
--
- MVP für Microsoft-Excel -
[Win XP Pro SP-2 / xl2003 SP-2]
Microsoft Excel - Die ExpertenTipps

[Claus Busch]

Hallo Jens,

Post by Jens Wennemede
ja das mit dem VBA-Ereigniscode gefällt mir
Aber wie stelle ich dies an?

in das Codemodul des entsprechenden Tabellenblattes:

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, Range("E:E")) Is Nothing _
Then Exit Sub

If Target.Value = "x" Then
Target.Offset(0, 1) = Date
End If

End Sub



Mit freundlichen Grüssen
Claus Busch

[Jens Wennemede]

Vielen Dank Claus,

genau das habe ich gesucht.

Grüße Jens

Post by Claus Busch
Hallo Jens,

Post by Jens Wennemede
ja das mit dem VBA-Ereigniscode gefällt mir
Aber wie stelle ich dies an?

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("E:E")) Is Nothing _
Then Exit Sub
If Target.Value = "x" Then
Target.Offset(0, 1) = Date
End If
End Sub
Mit freundlichen Grüssen
Claus Busch
--
Win XP Prof SP2 / Vista Ultimate
Office 2003 SP2 / 2007 Ultimate

[Beverly]

Hi Jens,

angenommen, deine Spalte für die x ist A und in B soll das Datum stehen:
gehe auf Extras -> Optionen -> Berechnung -> Iteration und Maximale
Iterationszahl = 1. Schreibe dann in B1 diese Formel
=WENN(A1<>"x";"";WENN(B1="";JETZT();B1)) und kopiere sie nach unten.

Bis später,
Karin
http://beverly.excelhost.de/

Post by Jens Wennemede
Hallo NG,
ich nutze eine Tabelle um meine täglichen Aufgaben zu erfassen. Wenn ich die
Aufgaben erledigt habe schreibe ich ein x in Zelle E der Spalte. Ich möchte
jetzt das automatisch das aktuelle Datum in Spalte F eingetragen wird.
Dieses soll sich natürlich nicht mehr verändern sollte also als Wert und
nicht als Formel vorliegen.
Wie kann man dies machen?
Hat jemand eine Idee?
--
Grüß Jens
Windows Vista & Office 2007