|
Удалить 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&tid=1613112]: |
0ms |
get settings: |
9ms |
get forum list: |
13ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
53ms |
get topic data: |
12ms |
get forum data: |
2ms |
get page messages: |
37ms |
get tp. blocked users: |
2ms |
others: | 12ms |
total: | 146ms |
0 / 0 |