powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel combobox
3 сообщений из 3, страница 1 из 1
Excel combobox
    #36976539
Ruslan999
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
У меня такая проблема:
В листе excel добавил элемент ComboBox и
Добавил значения в ComboBox вот так

Private Sub ComboBox1_Change()
ComboBox1.AddItem [1]
ComboBox1.AddItem [2]
ComboBox1.AddItem [3]
ComboBox1.AddItem [4]
ComboBox1.AddItem [5]
End Sub

Запускаю ComboBox. Нажимаю на стрелку и ничего не выходит. Чтобы выходило надо вводить какую-нибудь цифру. Потом выбираешь любую цифру и при следующем выборе эти цифры умножаются вдвое.
Например при первом запуске цифры только 5 штук
1
2
3
4
5
А при втором уже 10 штук
1
2
3
4
5
1
2
3
4
5
Как зделать чтобы только 5 цифр появились
1
2
3
4
5
И при запуске ComboBox Цифра 1 по умолчанию была написано в окне ComboBox
...
Рейтинг: 0 / 0
Excel combobox
    #36976946
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ruslan999Добавил значения в ComboBox вот так
Код: plaintext
1.
2.
Private Sub ComboBox1_Change()
ComboBox1.AddItem [ 1 ]
...

??? почему в Change комбобокса? - естественно, при каждом изменении значения (выборе из комбо) и исполняется этот код...
Надо заполнять комбо один раз - при открытии книги:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private Sub Workbook_Open()
    Лист1.ComboBox1.AddItem ( 1 )
    Лист1.ComboBox1.AddItem ( 2 )
    Лист1.ComboBox1.AddItem ( 3 )
    Лист1.ComboBox1.AddItem ( 4 )
    Лист1.ComboBox1.AddItem ( 5 )
    Лист1.ComboBox1.Value =  1 
End Sub
...
Рейтинг: 0 / 0
Excel combobox
    #36977634
Ruslan999
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо!
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel combobox
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]