change from vba code (const as date) to (cell.value in worksheet)

[mokie]

Hello,
I have one new issue.
When I'm trying to change to cell value I've got Global Error.

Const FirstDay As Date = "2017-12-31"

to something like this:

dim FirstDay as string
FirstDay = Sheets("DATA").Range("J3").NumberFormat = "yyyy-mm-dd"

Thanks in advanced


ps
I change FirstDay as date and it's working.