Файл: Сборник задач по VBA.pdf

Министерство образования Республики Беларусь Учреждение образования

«МОГИЛЕВСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ ПРОДОВОЛЬСТВИЯ»

Кафедра «Информатика и вычислительная техника»

Сборник задач по VBA

Методические указания для студентов всех специальностей и аспирантов

Могилев 2008

УДК 681.3

Рассмотрены и рекомендованы к изданию на заседании кафедры

«Информатика и вычислительная техника» Протокол № 9 от « 14 » апреля 2008 г.

Составитель

В.Л. Титов

Рецензенты:

кандидат технических наук, доцент, заведующий кафедрой «Автоматизированные системы управления» Белорусско-Российского университета

С.К. Крутолевич

кандидат физико-математических наук, доцент кафедры «Математического анализа, информатики и вычислительной техники» Могилевского государственного университета им. А.А. Кулешова С.Н. Батан

Методические указания представляет собой задачник по программированию на языке

Visual Basic for Applications (VBA).

Данные методические указания предназначены для аспирантов и студентов всех специальностей, изучающих дисциплины «Информатика», «Информатика и компьютерная графика», «Основы информационных технологий».

© УО «Могилевский государственный университет продовольствия», 2008

2

Введение

Основная цель данного методического указания – научить аспирантов и студентов программировать на языке Visual Basic for Applications (VBA).

Поскольку основные трудности при создании программ связаны с разработкой алгоритмов, т.е. методов их решения, то особое внимание в методическом указании уделяется рассмотрению структур данных и алгоритмов, призванных обрабатывать эти данные.

В методическом указании предложено большое количество задач (более 200), от простых до достаточно сложных.

Методическое указание состоит из 7 частей, содержащих как типовые задачи, т.е. ввода–вывода, использование циклов, работа с массивами, поиск и сортировка, так и задачи, которые, как правило, остаются за рамками традиционных курсов программирования, работа с пользовательскими формами.

3

Часть 1. СОЗДАНИЕ МАКРОСОВ

Начальные сведения по решению задач данной части содержатся в частях 1 и 2 учебно-методического пособия «Программирование на VBA».

Приступая к решению задач этого раздела, следует вспомнить, что:

üпри записи макроса макрорекордер записывает все действия пользователя, включая ошибки и неправильные запуски;

üзаписанные макрорекордером макросы не универсальны, поскольку они

могут только повторять однажды выполненные последовательности команд и только в том же самом порядке, в которых вы их записали;

üзаписанные макросы не гибки, поскольку они не учитывают изменения обстоятельств и условий;

üприменение макросов повышает скорость работы и, главное, точность и надежность.

1. Создайте макрос в Excel, который строит график функции y = x2 - x - 2 на отрезке [-3,3].

2.Создайте макрос в Excel, который заливает ячейку B1 ярко-зеленым цветом, вычисляет разность ячеек A1, A2 и выводит результат в ячейку B1 шрифтом Arial, подчеркнутым, 14 размером.

3.Создайте макрос в Excel, вычисляющий площадь поверхности и объем цилиндра (ячейки, содержащие r, h , должны быть подписаны).

S = 2 × p × r × (h + r)

V= p× r2 × h

4.Создайте макрос в Excel, который переводит вес из фунтов в килограммы (один фунт равен 409,5 г; ячейки, содержащие фунты и килограммы, должны быть подписаны).

5.Создайте макрос в Excel, который выводит на синем фоне красными буквами в текущую ячейку сообщение «Visual Basic for Applications (VBA)»

шрифтом Times New Roman, обычным, 12 размером.

6.Создайте макрос в Excel, который выделенный диапазон ячеек одной строки A1:H1 сортирует по убыванию.

7. Создайте макрос в Excel, вычисляющий площадь треугольника:

S = 12 × a × h, где a – длина основания треугольника, h – его высота (ячейки,

содержащие a, h, должны быть подписаны).

8. Создайте макрос в Excel, который выводит, начиная с текущей ячейки, четверостишие:

Унылая пора! Очей очарованье! Приятна мне твоя прощальная краса. Люблю я пышное природы увяданье, В багрец и золото одетые леса.

А.С. Пушкин

4

9.Создайте макрос в Excel, который вычисляет произведение чисел, расположенных в выделенном диапазоне 5-и ячеек.

10.Создайте макрос в Excel, который копирует ячейки A1:C2 и выводит их содержимое, начиная с ячейки F20.

11.Создайте макрос в Excel, который из последовательности чисел, расположенных в ячейках A1:A10, выводит последовательность с положительными числами в ячейки B1:B10.

12.Создайте макрос в Excel, вычисляющий объем и площадь поверхности шара (ячейка, содержащая r , должна быть подписана).

V = 34 × p× r3

S= 4 × p × r2

13.Создайте макрос в Excel, который переносит ячейки A1:A10 в ячейки

E16:E25.

14.Создайте макрос в Excel, который выводит в текущей ячейке фразу: «Каждый охотник желает знать, где сидят фазаны», позволяющую запомнить порядок следования цветов радуги (первая буква слова кодирует цвет: каждый – красный, охотник – оранжевый, желает – желтый, знать – зеленый, где – голубой, сидят – синий, фазаны – фиолетовый). Каждое слово фразы должно быть выведено соответствующим цветом.

15.Создайте макрос в Excel, который переводит расстояния из километров в версты (одна верста равна 1066,8 м.; ячейки, содержащие километры и версты, должны быть подписаны).

16.Создайте макрос в Excel, который выделенный диапазон ячеек одного столбца B1:B10 сортирует по возрастанию.

17.Создайте макрос в Excel, который выводит, начиная с ячейки B3, на синем фоне серыми буквами 16 размером четверостишие:

Буря мглою небо кроет, Вихри снежные крутя; То, как зверь, она завоет, То заплачет, как дитя.

А. С. Пушкин

18. Создайте макрос в Excel, вычисляющий объем конуса (ячейки, содержащие r, h , должны быть подписаны).

S= 13 × p× r2 × h

19.Создайте макрос в Excel, который для ячеекA2:B10 строит точечную диаграмму (значения X: A2:A10, значения Y: B2:B10).

20.Создайте макрос в Excel, который вычисляет сумму чисел, расположенных в ячейках A1:B10, и выводит результат в ячейку B11.

21.Создайте макрос в Excel на изменение ширины текущего столбца

5

(Ширина столбца 20).

22.Создайте макрос в Excel, который объединяет ячейки B7:H7 и выводит на желтом фоне синими буквами в объединенной ячейке сообщение «Создание макроса» шрифтом Times New Roman, обычным, 12 размером.

23.Создайте макрос в Excel, который для ячеек A2:C2 строит круговую диаграмму.

24.Создайте макрос в Excel на изменение высоты текущей строки (Высота строки 25).

25.Создайте макрос в Excel, вычисляющий площадь круга: S = p× r2 , где r – радиус круга (ячейка, содержащая r , должна быть подписана).

26.Создайте макрос в Excel, который строит график функции y = x2 -1 на

отрезке [-2,2].

27.Создайте макрос в Excel на изменение угла наклона текста в текущей ячейке (90 градусов).

28.Создайте макрос в Excel, вычисляющий объем полого цилиндра (ячейки,

содержащие r1, r2, h , должны быть подписаны; r1 − радиус цилиндра, r2 − радиус отверстия, h −высота цилиндра).

V= p × h ×(r12 - r22 )

29.Создайте макрос в Excel на добавление листа в книгу.

30.Создайте макрос в Excel, вычисляющий площадь трапеции: S = a +2 b × h ,

где a, b – длины оснований, h – высота трапеции (ячейки, содержащие a, b, h , должны быть подписаны).

Часть 2. СОЗДАНИЕ ПРОГРАММ С ЛИНЕЙНОЙ СТРУКТУРОЙ

Начальные сведения по решению задач данной части содержатся в части 3 учебно-методического пособия «Программирование на VBA».

Приступая к решению задач этого раздела, следует вспомнить, что:

üпрограммы с линейной структурой являются простейшими и используются, как правило, для реализации обычных вычислений по формулам;

üв программах с линейной структурой инструкции выполняются последовательно, одна за другой.

üалгоритм программы с линейной структурой может быть представлен следующим образом:

6