It auto opens now but now an error message displays the run-time error 1004 with the range being the object that failed.
Range(Target.Row, 1).Value = VBA.Format(Date1, "mm/dd/yyyy")