Try this for me...

Code:
fileSaveName = "Contract " & Format(Now + 3, "mm-dd-yyyy") & ".xls"
MasterWb.SaveAs Filename:=fileSavePath & fileSaveName, FileFormat:=xlExcel8