powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
8 сообщений из 8, страница 1 из 1
Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
    #32669833
nukri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Почему на этой строке компилятор выдает ошибку рантайим эррор 5
Invalid procedure call or argument ?


Set КнопкаПечати = ПанельИнструментов.Controls.Add(msoControlButton, CommandBars("Database").Controls("&Печать...").Id)


Данную функци взял в книге ... и хочу с ее помощью сделать свою Панель инструментов ... начал с кнопки "Печати"

п.с. Обычные панели менюшек работают ...

Может быть надо библиотеку дополнительно подключать ?
...
Рейтинг: 0 / 0
Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
    #32669834
nukri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
... +

что значит вот этот кусок кода: CommandBars("Database") ?
...
Рейтинг: 0 / 0
Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
    #32669846
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Должна быть подключена библиотека Microsoft Ofiice {версия} Object Library. Если офис русский - то панель DataBase называется База Данных - или что-то в этом роде.
...
Рейтинг: 0 / 0
Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
    #32669860
nukri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
HummerДолжна быть подключена библиотека Microsoft Ofiice {версия} Object Library. Если офис русский - то панель DataBase называется База Данных - или что-то в этом роде.

Object Library - подключена.... другие коммандбары работают

Не получается вытащить эту кнопку Печати ... выдает постоянно ошибку 5

У когонибудь есть раотающий код по вытаскиванию любой стандартной кнопки на созданную программно панель инструментов ?
...
Рейтинг: 0 / 0
Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
    #32669863
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Проверьте существование панели DataBase.

commandbars(("Database").controls(1).Name - перебором контролов увидите имя контрола печать.
...
Рейтинг: 0 / 0
Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
    #32669872
nukri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так я же вижу контрол печать и его название в меню настройка(для панели управления)

там правой кнопкой я вижу по правой кнопке контрол &Печать
Имя панели - База данных


Пееределал строку вызова
на

Set ПанельИнструментов = CommandBars.Add("Панель инструментов", msoBarTop)
Set КнопкаПечати = ПанельИнструментов.Controls.Add(msoControlButton, CommandBars("База данных").Controls("&Печать").Id)

И все равно выдает ошибку 5 ... !!!!
...
Рейтинг: 0 / 0
Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
    #32669874
nukri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Кстати вопрос по ходу дела ... а если панель "База данных" у меня в дальнейшем будет убрана, откуда будет браться эта кнопка Печать ?
...
Рейтинг: 0 / 0
Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
    #32669985
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Значит так - перебор всех контролов на панели даст точное имя нужного контрола. Скопировать кнопку печать с этой панель моджно только на основной уровень. т.е. вложенность не поддерживается.

Делается всё не так - не надо копировать контролы в рантайме, надо заранее создать свою панель инструментов или меню, а потом его строить.
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Плиз ХЕЛП Ошибка 5 при создании Панели инструментов ...
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]