Добавлено: 16 ноя 2006, 03:50
Заполнить нужное поле со списком можно, например, при открытии рабочей книги, в этом случае, Вы воспользуетесь функцией Array только один раз. Применительно к опубликованному примеру, это может выглядить следующим образом :
Событие Workbook_Open нужно разместить только в модуле ThisWorkbook(ЭтаКнига)
Код: Выделить всё
Private Sub Workbook_Open()
Лист1.ComboBox1.List = Array("Иванов", "Петров", "Сидоров", "Фёдоров", "Мышковский")
End Sub