An: Harald E / Datum stempeln !!
07.12.2004 14:34:29
Marcellos
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
ActiveCell = Date
End Sub
Dennoch super vielen Dank für deine Lösung und den kleinen vba Ausflug
Gruß Marcel
;-)