|
|
|
| Существует БД, в ней создана форма для ввода данных, требуется создать отчет только по текущей записи (в MS Access по умолчанию отчет создается по всем записям, начиная с первой). Поможите неумному
ЗЫ. Заранее благодарен... | |
|
| |
|
|
|
| Добавить на форму кнопку.
На событии Click кнопки:
Private Sub btnOpenReport_Click()
On Error GoTo Err_btnOpenReport_Click
Dim strReportName As String
Dim strFiltr As String
strReportName = "ReportName" 'Имя открываемого отчета
strFiltr = "Код=" & Me![Код] ' Код - Имя ключевого поля
DoCmd.OpenReport strReportName, acPreview, , strFiltr
Exit_btnOpenReport_Click:
Exit Sub
Err_btnOpenReport_Click:
MsgBox Err.Description, vbInformation, Me.Caption
Resume Exit_btnOpenReport_Click
End Sub
|
| |
|
| |
|
|
|
| Большое - прибольшое спасибо, ура заработало, оказывается "ларчик просто открывался"!!!
На других форумах меня загрузили запросами с какими-то невообразимыми параметрами.
Еще раз убеждаюсь, что все-таки подучить VBA мне не помешало
P.C. Еще раз Огромное Спасибо!!! | |
|
| |