VBA not working when IF formula is present

[CoffeeBrew]

Hi,

I just started using VBA with Excel and in this forum I found help in an old thread to create a static date when something was written in another cell.

If I connect this cell to the one in another sheet it keep working the way I want but as soon as I add and IF formula on it the static date of today won't print.
Could someone please help me figure it out?

I upload a test file for easier comprehension.

Thanks.

Test.xlsm
	A	B	C	D
5			When I write this -->	I would like to get this number with a static date on the other sheet
6			If there is nothing here -->	Blank and no date in the other sheet
7	2	3	22	6
8	5	3	6	15
9	3	3	5	9
10	22	3	1	66
11	2	3	1	6
12	66	3	5	198
13	2	3	6	6
14	73	3	7	219
15	26	3	3	78
16	77	3	1	231
17	52	3	6	156
18	22	3	3	66
19	11	3	5	33
20	1	3		3
Foglio1

Cell Formulas
Range	Formula
D7:D20	D7	=A7*B7

Test.xlsm
	L
7
Foglio2

Test.xlsm
	A	B	C	D	E	F	G	H
29		455	31/10/2021	<-- This should be the result
30		66	31/10/2021
31		56	31/10/2021
32		15		<-- This is what I get instead when I use a formula
33		9
34		66
35		6
36		198
37		6
38		219
39		78
40		231
41		156
42		66
43		33
44
Foglio2

Cell Formulas
Range	Formula
B32:B44	B32	=IF(Foglio1!C8="","",Foglio1!D8)

 

[CoffeeBrew]

This is the VBA code I am using:

Private Sub Worksheet_Change(ByVal Target As Range)

' Make sure only one cell updated
If Target.CountLarge > 1 Then Exit Sub

' Update date in column D if row>=3 and column>=5 (and not a blank entry)
If (Target.Row >= 29) And (Target.Column = 2) And (Target <> "") Then
Cells(Target.Row, "C") = Date
End If

End Sub