Bei "Worksheet_Change" aktuelles Datum in J3

• Bei "Worksheet_Change" aktuelles Datum in J3 von Bernd vom 19.04.2008 20:37:34
• AW: Bei "Worksheet_Change" aktuelles Datum in J3 - von Daniel am 19.04.2008 20:42:10
  • @ Daniel & Tino - vielen herzlichen Dank!!!! - von Bernd am 19.04.2008 20:51:01
• AW: Bei "Worksheet_Change" aktuelles Datum in J3 - von Tino am 19.04.2008 20:44:50

Betrifft: Bei "Worksheet_Change" aktuelles Datum in J3
von: Bernd

Geschrieben am: 19.04.2008 20:37:34

Hallo verehrte Freaks,
ich hänge an einer Problemstellung zu Worksheet_Change.
Wenn auf dem Arbeitblatt "output" im Bereich B8:W90 eine Änderung erfolgt, soll in der Zelle J3 das aktulle Datum - also @heute() - eingetragen werden.
Für mich unlösbar - für Euch wahrscheinlich eine Kleinigkeit.
Grüße und Danke vorab,
Bernd

Betrifft: AW: Bei "Worksheet_Change" aktuelles Datum in J3
von: Daniel
Geschrieben am: 19.04.2008 20:42:10
Hi
dieses Makro ins Modul der Tabelle "output" schreiben:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B8:W90")) Is Nothing Then Range("J3").Value = Date
End Sub

Gruß, Daniel

Betrifft: @ Daniel & Tino - vielen herzlichen Dank!!!!
von: Bernd

Geschrieben am: 19.04.2008 20:51:01
Danke f.d schnelle und perfekte Antwort.
Grüße
Bernd

Betrifft: AW: Bei "Worksheet_Change" aktuelles Datum in J3
von: Tino
Geschrieben am: 19.04.2008 20:44:50
Hallo,
hiermit müsste es gehen, als Code in deine Tabelle "output"

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B8:W90")) Is Nothing Then
Application.EnableEvents = False
Range("J3") = Date
Application.EnableEvents = True
End If
End Sub

Gruß
Tino

Excel-Beispiele zum Thema "Bei "Worksheet_Change" aktuelles Datum in J3"

Beim Öffnen der Arbeitsmappe auf aktuelles Datum prüfen