Spalten prüfen

Habe folgende Frage, Auf "Tabellenblatt2" in Spalte B (Zelle B18 - B100) sollen mal Zahlenwerte stehen( so ne Art Stückliste), In Spalte A (Zelle A18 - A100) steht das jeweilige Datum dazu wann die letzte benutzte Zelle das letzte mal geändert wurde.

Das Datum in Spalte A wird mit folgenden VBA-Code generiert:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
If Cells(Target.Row, 1) = "" Then Cells(Target.Row, 1) = Now
End If
End Sub

Jetzt möchte ich das das letzte aktuelle Datum der zuletzt benutzten Zelle auf Tabellenblatt1 in zBsp. Zelle E5 anzeigen lassen.

Gibt es da ne Möglichkeit ???

Bin dankbar für jede Hilfe !!!!

Bjoern