ник: Lvm
В голову бы не пришло, что в аксессе мастерами можно наваять такую хрень...
Сразу хочется позлорадствовать про отсутствие элементарных понятий по теории СУБД и про мелкософт, который дает возможность создавать отчёт не имея данных...
Ну, а если по делу - проще некуда.
Сохраняет у нас данные строка
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Ну так и запихни её перед формированием отчета.
Private Sub Кнопка237_Click()
On Error GoTo Err_Кнопка237_Click
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.SendObject acSendReport, "Платежка", acFormatRTF, "petrov@disc.ru", _
, , "Платежка RUS инд " + str(Indecs.Value) + " " + Наименование_получателя.Value, , True
Exit_Кнопка237_Click:
Exit Sub
Err_Кнопка237_Click:
MsgBox Err.Description
Resume Exit_Кнопка237_Click
End Sub
Если данные неправильные, процедура и вылетит сразу по ошибке.