Легенда:
 новое сообщение
 закрытая нитка
 новое сообщение
 в закрытой нитке
 старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
А так? 17.10.07 15:29 Число просмотров: 3711
Автор: Ustin <Ustin> Статус: Elderman
Отредактировано 17.10.07 15:35 Количество правок: 1
|
> > Private Sub CommandButton1_Click()
> > ComboBox1.Clear
> > ComboBox1.AddItem ("1")
> > ComboBox1.AddItem ("2")
> > ComboBox1.AddItem ("3")
> > ComboBox1.AddItem ("4")
> > ComboBox1.AddItem ("5")
> > End Sub
> Здесь ругается на ошибку 424(?) и предлагает заняться
> отладкой.
Значит форма не создана
> Если написать
> UserForm1.ComboBox1.Clear
> UserForm1.ComboBox1.AddItem ("1")
> ...
> то не ругается, но и не работает - комбобокс пустой. Правда
> эти строки я вынес в отдельную процедуру, выполняющуюся при
> активации определенного листа в Ёкселе:
Так попробуй:
Sub DoAllNeeded()
Load UserForm1
UserForm1.Show
Doevents ':)
UserForm1.ComboBox1.Clear
UserForm1.ComboBox1.AddItem ("1")
UserForm1.ComboBox1.AddItem ("2")
UserForm1.ComboBox1.AddItem ("3")
UserForm1.ComboBox1.AddItem ("4")
UserForm1.ComboBox1.AddItem ("5")
'> > MsgBox (ComboBox1.ListIndex)
'> Здесь выдает -1
ComboBox1.ListIndex = 0'?
End Sub
|
|
|
подробно о проекте
Анализ криптографических сетевых...
