السلام عليكم شباب انا منبهر بهذا المنتدى الفضيع
حاولت تطبيق التاريخ التلقائي تنفذ تمام بس عندي اغلاق الاكسل واعادة فتحي يمتسح هذاولا ينفذ التاريخ التلقائي ارجو منكم الافادة
Private Sub Worksheet_Change(ByVal
Target As Range)
On Error GoTo t_time
If Target.Column = 1 Then Cells(Target.Row, 3) = Now
t_time:
Application.EnableEvents = True
Application.ScreenUpdating = False
End Sub
و مشكورين