Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
метод 2.docx
Скачиваний:
2
Добавлен:
21.12.2018
Размер:
3.17 Mб
Скачать

Пример разветвляющего алгоритма:

Найти наибольшего (максимального) из трех чисел а, b, с

Решение:

Словесное описание алгоритма.

  1. Сравнить а и b. Если а>b, то принять y=а. В противном случае принять у=b.

  2. Сравнить с и y. Если с>y, то заменить y=с. В противном случае оставить m без изменения.

Алгоритм решения задачи:

Результат проверки в Excel:

Текст программы на VBA:

Результат

Пример:

Вычислите значение функции:

Текст программы:

Результат проверки в Excel:

Текст программы на VBA:

Результат

Запуск редактора VBA

Как и любые среды программирования, редактор VBA необходимо сначала запустить. Для запуска можно использовать два способа:

    1. Активизировать приложение пакета MS Office Excel);

    2. Выполнить команду меню:

  • Сервис  Макрос  Редактор Visual Basic (MS Excel 2003)

  • Разработчик  вкладка Код  Visual Basic (MS Excel 2007) (

Или нажать комбинацию клавиш Alt+F11.

    1. Правой кнопкой мыши выделите Лист1(Лист1), где Лист1 – лист Excel, где будем производить вычисления.

    2. Выберите команду Insert  Module. Если же имеется папка Modules, то добавьте в нее.

  1. В результате в правой части редактора VBA активизируется модуль (появится курсор), в котором можно прописывать все создаваемые программы, причем при вводе заготовки создаваемого модуля, ввод слова Sub и его имени имя, нажать Enter, автоматически появляется окончание данного модуля End Sub.

  1. Напишите текст программы и запустите ее на выполнение. Если в одном документе находятся несколько модулей, то при запуске программ может появляться диалоговое окно выбора макроса (модуля), в котором необходимо выбрать макрос, выделить его и нажать кнопку Run.

Рекомендуемая литература:

    1. Гусева О. Л. Практикум по Visual Basic. – М.: Финансы и статистика, 2007. – 544 с.: имл. – (Диалог с компьютером).

    2. Слепцова Л. Д. Программирование на VBA в Microsoft Office 2007. Самоучитель. – М.: ООО “И. Д. Вильямс”, 2007. – 432 сю: ил.

    3. Туркин О. В. VBA. Практическое программирование. – М.: СОЛОН-ПРЕСС, 2007. – 128 с.: ил. – (Серия» Электронный курс * Профильное обучение»).

2 Практические работы и методические рекомендации по их выполнению

2.1 Электронные таблицы ms Excel 2003

Всего в пособии приводится восемь работ, которые позволят довольно подробно изучить текстовый редактор Word.

Практическая работа № 1. Оформление таблицы, условное форматирование, именная адресация

Задание 1.

Оформление таблицы

Порядок выполнения задания 1.

Запустить табличный процессор Excel.

Объединить ячейки A1 – I1. Для того, чтобы выделить блок ячеек, надо щелкнуть по ячейке A1, а затем, не отпуская левую кнопку мыши, переместить курсор до ячейки I1. Выделенный блок «потемнеет» за исключением первой ячейки.

Далее в меню Формат выбрать пункт Ячейки, а затем вкладку Выравнивание.

Установить флажок в поле Объединение ячеек, щелкнуть по кнопке ОК. Выделенные ячейки объединятся в одну.

Ввести текст Форматирование заголовка. Установить атрибуты форматирования: шрифт Arial, жирный, размер 14 пунктов. Выровнять текст по центру.

Оформить заголовок таблицы по образцу:

Для того, чтобы текст ячейки располагался в две строки, необходимо сначала ввести текст в ячейку, нажать Enter. Часть текста будет отображаться в ячейках справа. Снова выделить эту ячейку, в меню Формат выбрать пункт Ячейки, вкладку Выравнивание. Установить флажок в пункте Переносить по словам и щелкнуть по кнопке ОК.

Высота ячейки автоматически настраивается под количество текста.

Чтобы слово Код располагалось вертикально, надо ввести это слово, нажать Enter. Снова выделить ячейку с этим словом. Затем в меню Формат выбрать Ячейки, вкладку Выравнивание, в поле Ориентация выбрать нужное.

Заполнить таблицу данными по образцу.

При вводе даты внимательно вводить разделитель числа и месяца (точка). Но лучше в качестве разделителя использовать косую черту (/). Excel сам исправит ее на точку. Если при вводе даты допущена ошибка, введенные символы прижимаются влево и воспринимаются как текст. Excel хранит дату как число и при правильном вводе даты прижимает ее вправо.

В ячейках G3:G8 выбрать формат цен в валюте страны-производителя. Для этого установить курсор в нужную ячейку столбца G, в меню Формат выбрать пункт Ячейки, вкладку Число. В списке выбрать Денежный формат, а в поле Обозначение выбрать формат валюты в соответствии со страной-производителем.

Щелкнуть по кнопке ОК. Отображение в ячейке изменится.

Задание 2.