Итак, приступим!
Откройте Excel и сохраните файл под названием....ну например Visual Basic. Далее выберите МЕНЮ-> СЕРВИС –> МАКРОС –> РЕДАКТОР Visual Basic.
Вы вошли в редактор.
Рассмотрите окна VBAProject и Свойства.
На панели меню редактора Visual Basic выберите Insert (Вставка)-> User Form
Теперь у вас появилось белое окно и сама форма User Form1 в которой вы и будите работать.
Заметьте, что слева на панели VBAProject во вкладке Forms появилось название вашей новой формы User Form1.
Активизируйте (щелкните мышью) форму и в окне свойств в графу (name) внесите свою фамилию. Проследите изменение имени программы.
В графу Caption (Заголовок) внесите свою фамилию. Проследите изменение имени формы.
Нажмите на форму в окне проекта, у вас появилась небольшая панель инструментов Toolbox. Если этого не произошло, то зайдите во вкладку View и нажмите там на пункт Toolbox. Если панель инструментов снова не появилась, то закройте Excel, предварительно его сохранив и перезайдите снова.
Поместите на форму элемент Поле (TextBox) находящийся на панели инструментов Toolbox. Придайте элементу подходящий размер. В окне свойств этого элемента щелкните мышью в графе Font, а затем на кнопке с точками. В открывшемся окне установите шрифт, его размер и начертание.
Поместите на форму Кнопку (CommandButton1). В графу Caption внесите ПРИВЕТ.
Сделайте двойной щелчок на кнопке ПРИВЕТ, в открывшемся окне подпрограммы аккуратно и точно впишите код : TextBox1.Text = “ВСЕМ ПРИВЕТ”
Запустите программу – меню Запуск, кнопка с треугольником (во многих прогах такая кнопа называется play, здесь же если навести курсор мыши на кнопку то высветится Run Sub/User Form)
После появления рабочего листа с окном формы нажмите кнопку ПРИВЕТ, в окне Текст появится соответствующая надпись.
Щелкните на кнопке "Х" закрытия формы и перейдите снова в режим Редактора.
Поместите на форму Кнопку (CommandButton2). В графу Caption внесите ДО СВИДАНИЯ.
Сделайте двойной щелчок на кнопке ДО СВИДАНИЯ, в открывшемся окне подпрограммы аккуратно и точно впишите код :
TextBox1.Text = “ВСЕМ ДО СВИДАНИЯ”
Запустите программу – меню Запуск, кнопка с треугольником.
После появления рабочего листа с окном формы нажмите поочередно кнопки, в окне Текст появятся соответствующие надписи.
За более подробной информацией обращаться к автору: http://justadream.my1.ru
