Don't know what you posted three times but try

Sub dodate()
MsgBox "My recap" & " " & Format(Now, "mmm-dd-yy ddd")
MsgBox "My recap" & " " & Format(Date - 1, "mmm-dd-yy ddd")
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"J.W. Aldridge" wrote in message
...
How to change this portion:

& Format(Now, "mmm-dd-yy ddd")

of the line to reflect the day before today or yesterday?

(Full line here)
.Subject = "My recap" & " " & Format(Now, "mmm-dd-yy ddd")