Вывод меню фильтра по полю - Имитация нажатия кнопки фильтр на Ленте (Ribbon)

По материалам: https://www.cyberforum.ru/ms-access/thread2863746.html

Private Sub cmdTest01_Click()
  Me!txtTestMemo.SetFocus
  DoCmd.RunCommand acCmdFilterMenu
End Sub