ник: belvesta
отбой! я сделал вот так:
Private Sub Сформировать_Click()
Dim s as String
Select Case Me.AorX
Case "Ателье"
s = "А"
Case "Химчистка"
s = "Х"
Case ELSE
s = "АиХ"
End Select
DoCmd.OpenReport "Мониторинг-" & s, acViewPreview
End Sub
Но все-равно мне очень нужно тут и диапазон дат вводить и выводить в отчете. Я не знаю как это сделать.