Put input into a cell in file

Hi, I am trying to prompt excel to ask for a date if a cell C3 is empty. And then I am trying to place the value entered into cell C3.

my code is as follows:

Private Sub DateEntered()
Dim DateEntered As String


If IsEmpty(Cells(3, 3)) Then
    DateEntered = Application.InputBox(Prompt:="Please enter Fiscal Year")
    If DateEntered = Empty Then
        MsgBox Prompt:="You did not enter a date: "
        Else
        'Enter into cell C3
        Cells(3, 3) = DateEntered
    End If
End If


End Sub

Thanks for your help