всем добрый день.
вопрос по сути темы. Сразу скажу, что форумы прочитал, с конструкциями следующих типов ознакомился.
1.
2.
3.
4.
Public Function SetNavPanel(Visible As Boolean)
DoCmd.SelectObject acForm, , True
If Not Visible Then DoCmd.RunCommand acCmdWindowHide
End function
или
1.
2.
3.
4.
5.
Public Function HideIt()
' таблица - любая имеющаяся в базе таблица
DoCmd.SelectObject acTable, "Таблица 1", True
If Application.CurrentObjectName = "таблица 1" Then DoCmd.RunCommand acCmdWindowHide
End Function
или
1.
2.
3.
4.
Public Function SetNavPanel(Visible As Boolean)
DoCmd.SelectObject acForm, , True
If Visible Then DoCmd.RunCommand acCmdWindowHide
End function
или установить свойство и перезагрузить базу
1.
Call funcChangeProperty("NavPane Closed", dbBoolean, True)
не возможность скрытия панели, а возможность свернуть панель, то есть аналог кнопки "Открыть/закрыть границу области переходов", при нажатии на которую панель сворачивается или исчезает. Зачем мне это нужно (может как-то по-другому можно, то чего я не дорубаюсь)
: при входе пользователя №1 система сворачивает навигацию и иные панели, при входе пользователя №2 открывает панели и поднимает навигацию путем выбора какой-нить таблицы или этим путем DoCmd.SelectObject acForm, , True. Все хорошо, но при подъеме Навигационной Панели она остается раскрытой и ее надо вручную свернуть на кнопку "Открыть/закрыть границу области переходов". Хотелось бы автоматизировать данный момент. То есть получается один пользователь работает на полном интерфейсе, другой на обрезанном, когда у полного открывается панель, то она автоматически сворачивается в полоску.
Заранее спасибо за советы
