msgBox popper ikke op

jeg har en knap i excel der ser sådan her ud.
hvorfor popper den ikke op med msgbox når der ikke er noget navn i den celle?


Private Sub CommandButton2_Click()

Dim Navn As String, md As String, sti As String

Navn = Range("D2").Value
md = MonthName(Month(Date), False)
sti = ActiveWorkbook.Path
   
    ActiveWorkbook.SaveAs Filename:=sti & "\" & "timeregistrering " & Navn & " " & md, _
        FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
    If Range("D2").Value = "" Then
    If vbNo = MsgBox("Der er ikke angivet et navn. Tryk nej for at vælge dit navn", vbYesNo) Then
      MsgBox "Fil ikke gemt"
    Exit Sub
    End If
    End If
    ActiveWorkbook.SendMail Recipients:="domæne@udbyder.dk", Subject:="Timeregistrering " & Navn & Space(1) & md
    Application.Quit
End Sub