Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.07.2009, 15:20   #1
ЯИмя
Пользователь
 
Регистрация: 17.07.2008
Сообщений: 15
По умолчанию Добавление контрола на форму

Здравствуйте!
Я столкнулся с неожиданной проблемой - не могу программно добавить контрол на форму во время выполнения макроса.
Помню, я раньше это делал и это как-то у меня получалось, не могу вспомнить, как...
Посмотрел в справке Экселя, нашёл там похожий пример, который, якобы, должен работать. Но у меня не работает, причём пробовал на двух разных компьютерах!
Вот этот пример (скопированный из справки Экселя):
Код:
Dim MyTextBox As Control

Private Sub CommandButton1_Click()
Set MyTextBox = MultiPage1.Pages(0).Controls.Add("MSForms" _
    & ".TextBox.1", "MyTextBox", Visible)
End Sub

Private Sub CommandButton2_Click()
    MultiPage1.Pages(0).Controls.Clear
End Sub

Private Sub CommandButton3_Click()
    If MultiPage1.Pages(0).Controls.Count > 0  Then
        MultiPage1.Pages(0).Controls.Remove "MyTextBox"
    End If
End Sub

Private Sub UserForm_Initialize()
    CommandButton1.Caption = "Add control"
    CommandButton2.Caption = "Clear controls"
    CommandButton3.Caption = "Remove control"
End Sub
Или вот то же самое, только уже вставленное в Эксель:
Kniga1.rar

Поможите, кто может!
ЯИмя вне форума Ответить с цитированием
Старый 08.07.2009, 15:58   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

А что, если воспользоваться поиском по ключевому слову Controls.Add ?

http://www.programmersforum.ru/showp...72&postcount=8
http://www.programmersforum.ru/showp...90&postcount=4
http://www.programmersforum.ru/showp...30&postcount=2


Ну а лучше скачайте книгу Профессиональное программирование на VBA в Excel 2002 (автор Уокенбах Джон, PDF, 9,6 Мб)
Там много подобных примеров.

Последний раз редактировалось EducatedFool; 08.07.2009 в 16:01.
EducatedFool вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Добавление в БД Claster БД в Delphi 3 26.05.2009 21:12
Получение хэндла дочернего контрола Lich Win Api 7 01.07.2008 10:58
Добавление Holodok БД в Delphi 1 09.05.2008 18:01
наличие определенного свойства у контрола Toxa Общие вопросы Delphi 5 03.09.2007 16:54
Как изменить стандартную форму на форму любой сложности QwErEn Общие вопросы Delphi 9 08.06.2007 11:44