|
Удалить Commandbars в Access
|
|||
---|---|---|---|
#18+
Создал в Access несколько контекстных меню. Код примерно такой: Set cmdBar = CommandBars.Add(Name:=название, Position:=msoBarPopup, Temporary:=False) With cmdBar.Controls.Add(Type:=msoControlButton) .Caption = "История" .OnAction = "Открыть_форму_История" End With Насколько я понимаю, они сохраняются в файле. Если мне надо удалить одно из созданных меню, я пишу такой код: CommandBars(название).Delete Подскажите, пожалуйста: есть ли команда для удаления всех меню сразу без указания каждого по-отдельности? ... |
|||
:
Нравится:
Не нравится:
|
|||
28.09.2016, 12:52 |
|
Удалить Commandbars в Access
|
|||
---|---|---|---|
#18+
Настаев, Одной командой нет, а парой команд можно - циклом по коллекции CommandBars ... |
|||
:
Нравится:
Не нравится:
|
|||
28.09.2016, 13:00 |
|
|
start [/forum/topic.php?fid=45&gotonew=1&tid=1613112]: |
0ms |
get settings: |
10ms |
get forum list: |
12ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
38ms |
get topic data: |
9ms |
get first new msg: |
6ms |
get forum data: |
2ms |
get page messages: |
35ms |
get tp. blocked users: |
1ms |
others: | 354ms |
total: | 473ms |
0 / 0 |