I am trying to get a report to save after making changes via code. The code works for changing the printer but the final line (DoCmd.Close acReport, "BirthmotherPREMATCHSevenDay", acSaveYes) does not save the report--and I get no error messages. Any ideas. Thanks
Private Sub Text4_Click()
Dim prt As Printer
DoCmd.OpenReport "BirthmotherPREMATCHSevenDay", acViewDesign
Set Application.Printer = Application.Printers("PDF")
Reports("BirthmotherPREMATCHSevenDay").Printer = Application.Printers("PDF")
DoCmd.Close acReport, "BirthmotherPREMATCHSevenDay", acSaveYes
End Sub