|
Создание меню в Excel 2002
|
|
|
|
mokc0der |
Вторник, 19 Августа 2003, 15:21
|
Участник
Профиль
Группа: Профессионалы
Сообщений: 1278
Регистрация: 20.12.2001
Из: Москва
Пользователь №: 859
Конфигурация
Корпус: Thermaltake LanMoto Процессор: Другой Материнская плата: ASUS A8N-SLI Оперативная память: DIMM DDR PC3200 2048 Mb Видеокарта: ASUS X300SE Жесткий диск (винчестер): WD3200KS + ST3200822А Дисковод: 3.5" CD/DVD: NEC ND-4571 Модем: Zyxel 662HW Сетевой адаптер: built-in Звуковая плата: built-in AC97 Монитор: Sony SDM S71R Операционная система: WinXP, Vista Прочее: Bluetooth dongle
IBM T42
|
Как КОРРЕКТНО создать меню в Excel 2002. Я по "старинке" использую стиль Excel 97 так: Код | With Application .MenuBars.Add (menuName) .MenuBars(menuName).Menus.Add "&меню 1" .MenuBars(menuName).Menus.Add "&меню 2" .MenuBars(menuName).Menus.Add "&меню 3" .MenuBars(menuName).Menus.Add "&?" .MenuBars(menuName).Menus(1).MenuItems.Add "&Сохранить", "SaveData" .MenuBars(menuName).Menus(1).MenuItems.Add "&Открыть", "OpenData" ...
|
Все прекрасно работает, но уж больно хочется использовать современные возможности. Насколько я знаю в 2002 для данных целей используется CommandBars примерно так
Код | Set oldMbar = Application.CommandBars.ActiveMenuBar ' сохраняем Excel меню
Set newMbar = Application.CommandBars.Add(Name:="newMenubar", Position:=msoBarTop, MenuBar:=True, temporary:=True) ' создаем свое With newMbar .Visible = True .Protection = msoBarNoMove end with
|
Так оно создается. Но КАК добавить в это пустое меню свои элементы и асоциировать с ними макросы ?
|
|
|
|
|
Ответы
|
mokc0der Создание меню в Excel 2002 Вторник, 19 Августа 2003, 15:21 Gluzer Я делаю так:
создаю макрос, с привязкой его к внов... Четверг, 21 Августа 2003, 7:43 mokc0der Я уже разобрался методом проб и ошибок. Результат ... Четверг, 21 Августа 2003, 10:18 Админ mokc0der, будь добр, кинь примерчик на мэйл или пр... Четверг, 21 Августа 2003, 18:39 mokc0der Примерчик в attach. Буду рад ответить на какие-либ... Четверг, 21 Августа 2003, 21:05 Rubinus mokc0der, не мог бы ты дать пример меню которая со... Среда, 03 Ноября 2004, 21:13 Gluzer Rubinus, а что конкретно не получается? Среда, 03 Ноября 2004, 23:20 pashulka А почему не создать один раз панель вручную и в да... Четверг, 04 Ноября 2004, 2:33 mokc0der Rubinus, что конкретно не получается ? приведи код Четверг, 04 Ноября 2004, 8:48 Rubinus Я скачал пример который выложил mokc0der, посмотре... Суббота, 06 Ноября 2004, 14:07 |
Навигация
|
|
1 чел. читают эту тему (1 Гостей и 0 Скрытых Пользователей)
|
0 Пользователей:
|
|
© Copyright by WinCity.Ru 2001 - 2008 | Обратная связьУслуги веб-хостинга предоставлены компанией MTW.RU
|
|