In my activesheet I have the value Memphis

In my code I'm try to get the Msgbox to say:

Memphis has not reported in today<<
but the following is turning red in my code window;
can someone assist?

MsgBox "Range("D1").value & " has not reported in today"