Загрузка данных


с) Записать ниже приведенный код :
Sub Процессор()
Sheets("Процессор"). Activate
"Процессор" - название Лист1
End Sub
Sub Винчестер()
Sheets("Винчестер"). Activate
End Sub
Sub Монитор()

Sheets("Монитор").Activate
2. Создать на рабочем листе Excel кнопку «Вызов формы», при нажатии на
которую появляется форма.
Порядок выполнения
а) Перейти в редактор VisualBasic и создать форму.
b) Перейти на лист Ехсе и создать кнопку под именем Вызов формы.
с) Ввести код
Sub Вызов формы
UserForm 1.Show
End Sub
3. Перейти в редактор VisualBasic к UserForm1,разместиь на ней показанные, на рисунке набор элементов. При нажатии на Процессор форма в окне ListBox должна отображать список наименований процессоров , заполненных в раннее созданном Листе Excel «Процессор», на Винчестер - наименование винчестеров
H T.江.
Toolbox
Controls
A abl
区
Г Монитор
8H800000128
180
Выход
Private Sub OptionButtonI_Click
ListBox1, RowSource = " Процессор!А1:А3"
End Sub
Private Sub OptionButton2_Click()
Sheets("Винчестер").Select
листа)
ListBox I.RowSource = "A1:A3"
End Sub
*(альтернативная запись отображения содержимого
Private Sub OptionButton3_Click()
ListBox I.RowSource = Монитор!AI:A2"