How to change date format to General

[thespardian]

Hi there!
I have a date input cell i.e P4. For example the current value of the P4 is 01.01.2020. The cell format is customized thus the date in the P4 cell is being displayed as "dd.mm.yyyy" 01.01.2020. In the Cell P3, I want symbol ">=" and date in the cell P4. So my desired output in the cell P3 is >=43831. (Please note that the date format has been changed from DATE to GENERAL in the cell P3)
i want the help on following code to get my desired result as shown above in the red.

If Not Intersect(Target, Range("P4")) Is Nothing Then
    If Target.Count > 1 Then Exit Sub
    If Target.Value = Empty Then Range("P3").Value = Empty
    If Target.Value <> Empty Then Range("P3").Value = ">=" & Range("P4")
End if

Any help on the matter will be highly appreciated. TIA

 

[RoryA]

You can use Range("P4").Value2 to get the date value back as a number, rather than date.

 

[thespardian]

You can use Range("P4").Value2 to get the date value back as a number, rather than date.

Thanks a lot for the guidance. It's really working for me.

 

[RoryA]

Glad we could help.