Здравствуйте,

Подскажите, пожалуйста, правильно ли написана процедура на Группу переключателей, находящейся в заголовке формы?
Есть форма как контейнер, в ней ленточная со списком фирм. Пытаюсь сделать фильтр списка переключателями, но выскакивает окно, с требованием ввести параметр (Поставщик/Покупатель/Партнер).

Private Sub Группа730_AfterUpdate()

Select Case Группа730
        Case 1
            Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма where Контрагент = Поставщик"
        Case 2
            Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма where Контрагент = Покупатель"
        Case 3
            Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма where Контрагент = Партнер"
        Case 4
            Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма order by Название"
    End Select

End Sub

https://www.sql.ru/forum/1316828/gruppa-perekluchateley-v-zagolovke-formy