شرح الكود المستخدم
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 12 Then
Cells(Target.Row, 6).Value = Date
End If
End Sub
If Target.Column = 12 Then
رقم 12 يعنى رقم العمود L
Cells(Target.Row, 6).Value = Date
رقم 6 يعنى رقم العمود F
فكلما كتبت أى شىء فى أى خليه بالعمود L
يتم تسجيل التاريخ تلقائيا بالعمود F فى نفس السطر