 |
Определение максимального и минимального значения
|
|
|
|
Определить max и min значения по столбцам "Итого", "Абсолютная успеваемость, проц. ", "Качественная успеваемость" (таблица 9, лист 10)
Для определения max и min значений необходимо выполнить следующие действия:
Задать эталоновую переменную, которая будет текущем минимумом (максимумом)
Поочерёдно сравнивается каждый элемент совокупности с текущем минимумом (максимумом), и если этот элемент не удовлетворяет условиям поиска (в случаи минимума он больше, а в случае максимума - меньше), то происходит замена значения эталона на значение сравниваемого элемента
После полного просмотра всех элементов в переменной текущего минимума (максимума) находится действительный минимум (максимум)
Значение минимума (максимума) выводятся в соответствующие ячейки
Sub minmax ()
Dim A () As Variant
n1 = Sheets (" Лист 4"). Cells (5,12)
m = Sheets (" Лист 2"). Cells (5,12)
ReDim A (1 To n1, 1 To m)
VVOD " Лист 5", A, n1, m, 4
VIVOD " Лист 10", A, n1, m, 4
VVOD " Лист 10", A, n1, m, 4
For j = 3 To m
maxA = 0.00001
minA = 1000000
For i = 1 To n1
If A (i, j) > maxA Then
maxA = A (i, j)
End If
If A (i, j) < minA Then
minA = A (i, j)
End If
Next i
Sheets (" Лист 10"). Cells (i + 4 + 2, j) = maxA
Sheets (" Лист 10"). Cells (i + 4 + 3, j) = minA
Next j
End Sub
Рис.8. Данные таблицы после определения мин. и макс.
Создание диаграмм (гистограмма, круговая, смешанная)
Для создания диаграмм необходимо выбрать мастер диаграмм: Вставка-Диаграмма
или с помощь. Значка Диаграмма на панели инструментов.
Построение диаграммы состоит в выполнении четырёх шагов:
Выбор типа диаграмм
Задание диапазона
Записать параметры диаграммы заполнив строки заголовков
Размещение диаграммы
Рис.9. Диаграммы
Создание управляющих кнопок
Для удобства вызова и работы с программами целесообразно использовать управляющие кнопки для каждой программы.
|
|
|
Для создания кнопки необходимо выполнить следующее: элемент меню Вид → Панель инструментов → Формы. В появившейся панели форм выбирается значок, отвечающий за создание кнопки. Нажав на значок левой клавишей мыши, на листе вместо курсора появляется знак "+", который необходимо подвести на то место, где "+" вычерчивает прямоугольник, в нем фиксируется запись "кнопка 1". Аналогично создаются все кнопки управления. Для запуска любой программы не нужно заходить в Visual Basic, достаточно щелкнуть кнопку с ее названием.
После создания кнопок, кнопки можно отредактировать, переименовать, выбрать нужный шрифт, его размер. Для этого вызывается контекстное меню, в нем формат объекта.
Для того чтобы при нажатии кнопки происходила активизация программы, необходимо соединить (увязать) соответствующий макрос (программу) с кнопкой. При этом выполняются следующие действия:
щелкнуть правой клавишей мыши по кнопке для появления контекстного меню;
выбрать элемент меню "назначить макрос", появляется окно диалога под названием "назначить макрос объекту";
выбрать и подщелкнуть левой клавишей мыши нужное имя макроса, за активизацию которого и будет отвечать создаваемая кнопка;
ОК.
Для активизации листа в каждой программе нужно написать команду: Sheets ("ЛистN"). Select
Рис.10. Экран управляющих кнопок
Автоматический макрос Гашение
Для того чтобы произвести гашение данных необходимо выполнить следующие действия:
Включаем запись макроса
Выделяем диапазон гашения и нажимаем кнопку Delete.
Завершаем работу макроса.
Создаем кнопку "Гашение" и присваиваем ей соответствующий макрос.
Заключение
В данной работе были рассмотрены основы программирования в среде VBA на примере решения экономических задач с использованием инструментария, макросов, операторов, функций и различных возможностей Exel
|
|
|
Таким образом, курсовая работа помогла приобрести опыт, касающийся работы в электронных таблицах Excel и базовых принципов программирования в среде VBA.
Список использованной литературы
1. Александр Левин. Самоучитель работы на компьютере.7-е издание. -
М.: 2002
2. Хорев В.Д. Самоучитель программирования на VBA в Microsoft Office. - Киев: Юниор, 2001 г. - 320 с.
3. Уэллс Э., Харшбаргер С. Microsoft Excel 97. - М.: 1998.
4. Макарова Е.А., Швецова М.Н. Решение экономических задач и бухгалтерских задач с использованием инструментария VBA: метод. указ. и задания к выполнению курсовой работы, лабораторных работ по курсу "Информатика". - Новосибирск: Изд-во СГУПСа, 2008 г. - 47 с.
5. Конспекты лекций по информатике
|
|
|
