| Вопрос: Создание меню | Добавлено: 05.08.04 11:56 |
Автор вопроса:  l_str
|
|
Пожалуйста, помогите. Только начинаю программировать в VBA, пытаюсь создать меню, беру пример из книги, это начало
Private Sub CommandButton1_Click() Dim FinMenu1 As CommandBar Dim Ssudi As CommandBarControl, Renti As CommandBarControl Dim Inv As CommandBarControl Dim Dolg As CommandBarControl Dim Kratk As CommandBarButton Dim Dolg1 As CommandBarButton, Dolg2 As CommandBarButton Set FinMenu1 = CommandBars.Add(Name:="Pom Finansista", _ Position:=msoBarFloating, MenuBar:=False, Temporary:=False) FinMenu1.Visible = False With FinMenu1 Set Ssudi = .Controls.Add(Type:=msoControlPopup) Ssudi.Caption = "SSudi" и т.д. При выполнении на 1-ой коменде Set Finmenu1 ... выдает ошибку Run Time Error 5 Invalid Procedure call or argument Что не так? Заранее благодарна. |
| Ответы | Всего ответов: 12 |
|
Номер ответа: 1 Автор ответа: tea84 Вопросов: 4 Ответов: 8 |
Профиль | | #1 | Добавлено: 05.08.04 14:56 |
странно, у меня все прошло без ошибки.. 
|
||
|
Номер ответа: 2 Автор ответа: l_strВопросов: 1 Ответов: 4 |
Профиль | | #2 | Добавлено: 05.08.04 15:25 |
|
Может у меня чего-то не доустановлено? Чего-то не хватает?
Я работаю в EXCELe 2000 и там у меня не проходит, хоть умри. |
||
|
Номер ответа: 3 Автор ответа: l_strВопросов: 1 Ответов: 4 |
Профиль | | #3 | Добавлено: 05.08.04 15:25 |
|
Может у меня чего-то не доустановлено? Чего-то не хватает?
Я работаю в EXCELe 2000 и у меня не проходит, хоть умри. |
||
|
Номер ответа: 4 Автор ответа: БывалыйICQ: 243613085 Вопросов: 2 Ответов: 6 |
Профиль | | #4 | Добавлено: 06.08.04 12:00 |
| Поставь себе Office 2003 и забудь про все проблемы. Странно, почему он ещё у тебя не стоит? | ||
|
Номер ответа: 5 Автор ответа: БывалыйICQ: 243613085 Вопросов: 2 Ответов: 6 |
Профиль | | #5 | Добавлено: 06.08.04 12:03 |
|
К стати в самом конце своей процедуры напиши
End With End Sub и должно всё пойти! |
||
|
Номер ответа: 6 Автор ответа: l_strВопросов: 1 Ответов: 4 |
Профиль | | #6 | Добавлено: 06.08.04 12:27 |
|
Спасибо большое за ответ. У меня естественно все Endы стоят, это я там кусочек просто вырвала. А вообще уже сделала по-другому (с модификацией меню Excela), но просто интересно, почему не проходит, пример из книги. И у моей сотрудницы, в другой организации, тоже оффис 2000 и все проходит, без проблем. Как и один ответ был. Просто не понятно почему, а это всегда противно и хочется разобраться.
|
||
|
Номер ответа: 7 Автор ответа: БывалыйICQ: 243613085 Вопросов: 2 Ответов: 6 |
Профиль | | #7 | Добавлено: 06.08.04 12:45 |
| Хм! Странно, но по моему при установке твоего Office 2000 у установщика сработал синром "кривые руки" поэтому и не пошло а вообще-то я советую тебе дорогая переди ты на Office 2003 и не мучся ты со стариком 2000-ным. Правда если у тебя Хрюша стоит то ты обалдеешь от Интерфейса Office 2003, а если 98 или 2000-ная винда то всех прелестей не заметишь, нно всё равно лучше намного это ты сразу почувствуешь! И ещё при установке пакета Office 2003 исползуй стандартныу установку которая задаются по умолчанию, не ставь выборочно. Затем в редакторе VBA Эксэля подключишь нужные библиотеки, такие как DAO 3.6 например дла работы с базами данных и т.д. | ||
|
Номер ответа: 8 Автор ответа: БывалыйICQ: 243613085 Вопросов: 2 Ответов: 6 |
Профиль | | #8 | Добавлено: 06.08.04 12:48 |
| 1_str ! Напиши свои координаты (АСЬКА, МЫЛО) | ||
|
Номер ответа: 9 Автор ответа: Zafar Вопросов: 9 Ответов: 14 |
Web-сайт: Профиль | | #9 | Добавлено: 29.08.04 11:25 |
|
Ну как! Сделал меню ?
Если нет у меня есть вообще классный пример мыль мне и я тебе отправлю |
||
|
Номер ответа: 10 Автор ответа: mc-black ICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | | #10 | Добавлено: 09.09.04 16:08 |
Всё оччень просто! В Ide меню Tools->Refrences проверь, стоит ли галочка на Microsoft Office 10.0 Object Library (у тебя 2000, значит не 10.0, но работать будет обязательно!!!). Твой пример РАБОТОСПОСОБНЫЙ 100% 
|
||
|
Номер ответа: 11 Автор ответа: l_strВопросов: 1 Ответов: 4 |
Профиль | | #11 | Добавлено: 10.09.04 09:28 |
|
Спасибо за ответ.
Проверила сразу же, но к большому сожалению у меня стоит эта птица. У меня их 4. Visial Basic for Applications Microsoft Excel 9.0 Object Library Ole Automation Microsoft Office 9.0 Object Library Самое интересное, что у моей приятельницы, она в другой организации работает, вроде все тоже, но у нее работает это, а у меня вот не пошло. Я пока выкрутилась по-другому, а вообще думаю переставить Office, может в моем просто глюк какой. А вообще еще раз спасибо за желание помочь |
||
|
Номер ответа: 12 Автор ответа: mc-blackICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | | #12 | Добавлено: 10.09.04 12:44 |
| Тогда рекомендую OfficeXP сразу ставить (но это не из-за меню а вообще..) Пиши e-mail - вышлю мой пример. | ||
Страница: 1 |