Static date doesn't work if I use form to fill a table

Hi

In my sheet where I am using a table, the static date is not working when I am using a form to fill the table. It is working only if I am doing it directly in the table.

Please help me to fill the automatically the stactic date in column B if I fill column C but using a form.

If the form in column B stays "grey" to not allow the user edit data as for cells with formula, and the form to appear if the sheet is opened, it will be great help.

Please see the VBA I am using :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub
If Not Intersect(Target, Range("C3:C24000")) Is Nothing Then
Application.EnableEvents = False

Target.Offset(, -1) = Now

Application.EnableEvents = True
End If
End Sub

Hi

In my sheet where I am using a table, the static date is not working when I am using a form to fill the table. It is working only if I am doing it directly in the table.

Please help me to fill the automatically the stactic date in column B if I fill column C but using a form.

If the form in column B stays "grey" to not allow the user edit data as for cells with formula, and the form to appear if the sheet is opened, it will be great help.

Please see the VBA I am using :

[Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub
If Not Intersect(Target, Range("C3:C24000")) Is Nothing Then
Application.EnableEvents = False

Target.Offset(, -1) = Now

Application.EnableEvents = True
End If
End Sub ]

Hi

In my sheet where I am using a table, the static date is not working when I am using a form to fill the table. It is working only if I am doing it directly in the table.

Please help me to fill the automatically the stactic date in column B if I fill column C but using a form.

If the form in column B stays "grey" to not allow the user edit data as for cells with formula, and the form to appear if the sheet is opened, it will be great help.

Please see the VBA I am using :

Please Login or Register  to view this content.