ник: Student
В форме есть список с названиями отчетов lst_Report и список с названиями таблиц lst_Tables. Необходимо поменять значение свойства RecordSource в отчете выбранном из списка lst_Report на таблицу, выбранную из списка lst_Tables.
Никак не могу в строке [Reports]![отчет].RecordSource = Me!lst_Tables вместо названия отчета [отчет] вставить значение выбранного отчета из списка lst_Report.
Используемый код:
Private Sub Command6_Click() 'событие на нажатие кнопки
Dim rep As String
rep = Me!lst_Reports 'переменной присваиваем значение из списка lst_Reports
DoCmd.OpenReport rep, acDesign 'выбранный отчет открываем в режиме редактирования
[Reports]!rep.RecordSource = Me!lst_Tables 'меняем значение RecordSource отчета на выбранную таблицу
DoCmd.OpenReport rep, acPreview 'отображаем отчет
End Sub
|
Выдается ошибка, что отчета с названием
rep не существует. Пробовал по всякому со знаками
&, но безрезультатно.
Помогите, люди добрые!