Zeitstempel mal anders

[ultrabest]

Hallo zusammen

den Code habe ich hier im Forum gefunden:
mit VBA kann man auch mit nur einer Tastenkombi auskommen:
Mit dem Code erreicht man das heutige Datum.

Code:

Private Sub Workbook_Activate()
Application.OnKey "^l", "Zeitstempel"
End Sub

Private Sub Workbook_Deactivate()
Application.OnKey "^l"
End Sub

Sub Zeitstempel()
Selection.Value = Now
End Sub

Die ersten beiden Codes gehören in "DieseArbeitsmappe". Der dritte kommt in ein allgemeines Modul.


Wie ändert man den Code im "Zeitstempel", wenn man ein beliebiges Datum eingeben möchte?
 
Der Wert ist in Tabelle X . Die Zelle ist A3 . Dort wird das Datum eingegeben.

Freundliche Grüße 
ultrabest


Gruß,
Helmut

[RPP63]

den Code habe ich hier im Forum gefunden

Moin!
Ernsthaft?
Hier im Forum?
So einen Quatsch???
Das aktuelle Datum gebe ich ganz ohne VBA mittels Shortcut Strg+. (Punkt) gefolgt von Enter in die aktuelle Zelle ein.

Um dennoch Deine Frage zu beantworten:

PHP-Code:

Selection.Value = Worksheets("Tabelle X").Range("A3").Value 


By the way:
Mit Selection.Value = Now wird mitnichten das Datum eingetragen …

Gruß Ralf

[ultrabest]

Hier im Forum:

https://www.clever-excel-forum.de/Thread...-einfuegen

und

trotzdem Danke für deine Hilfe.

Grüße
ultrabest