Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Программирование, связанное с MS Office > ComboBox в VBA

Автор: Vavan 15.10.2005, 19:20

Люди Help!!! Есть возможность создать на форме combox чтоб он не брал данные из xl smile

Автор: Staruha 16.10.2005, 00:05

Код


Private Sub CommandButton1_Click()
With ComboBox1
     .AddItem "", 0
     .AddItem "F1", 1 'F1-элемент списка;1-индекс(После удаления первого элемента =0)
     .AddItem "F2", 2
     .AddItem "F3", 3
     .AddItem "F4", 4
     .AddItem "F5", 5
    End With
 ComboBox1.RemoveItem (0) 'удаляем первый элемент списка.Второй станет первым с индексом 0
CommandButton1.Caption = "" 'кнопка сама себя отключила
End Sub

Автор: Vavan 16.10.2005, 10:28

Цитата(Staruha @ 16.10.2005, 00:05)

Код


Private Sub CommandButton1_Click()
With ComboBox1
     .AddItem "", 0
     .AddItem "F1", 1 'F1-элемент списка;1-индекс(После удаления первого элемента =0)
     .AddItem "F2", 2
     .AddItem "F3", 3
     .AddItem "F4", 4
     .AddItem "F5", 5
    End With
 ComboBox1.RemoveItem (0) 'удаляем первый элемент списка.Второй станет первым с индексом 0
CommandButton1.Caption = "" 'кнопка сама себя отключила
End Sub

Большое нет просто огромное спасибо!! :-)