Решение экономических и бухгалтерских задач с использованием инструментария Visual Basic For Application
33 Федеральное агентство железнодорожного транспорта Сибирский государственный университет путей сообщения Кафедра "Общая информатика" КУРСОВАЯ РАБОТА по дисциплине "Информатика" РЕШЕНИЕ ЭКОНОМИЧЕСКИХ И БУХГАЛТЕРСКИХ ЗАДАЧ С ИСПОЛЬЗОВАНИЕМ ИНСТРУМЕНТАРИЯ VISUAL BASIC FOR APPLICATION Руководитель: Разработал ст. преподаватель студент гр. БА-111 Макарова Е.А. Краткая рецензия: Парфенович К.И. Новосибирск 2009 г. Задание на выполнение работы для студентов 1 курса Группа-БА-111 Ф. И.О. студента Парфенович Ксения Игоревна. Шифр студента 13-08 Исходные данные: num-номер группы; n5 - количество "5"; n4 - количество "4"; n3-количество "3"; n2-количество "2". Вычислить: n=n2+n3+n4+n5; absu= (n3+n4+n5) /n*100; kau= (n4+n5) /n*100 Результаты представить в следующем виде: Количество строк n=9 Количество строк дозаписи исходных данных k=4 Сортировка даных по Абсолютная успеваемость absu Выборка данных по Качественная успеваемость kau Определение максимального и минимального значения Создание диаграмм: гистограмма - absu и kau; круговая диаграмма - absu, kau, смешанная - absu и kau Задание выдано 03.04.09 /Макарова Е.А. / АннотацияДанная работа посвящена решению экономических задач с использованием Microsoft Excel и инструментария Visual Basic For Application.Курсовая работа состоит из:34 страниц;12 рисунков;8 программ;1 таблицы;Содержание - Введение
- 1. Способы запуска редактора Visual Basic
- 2. Главные правила синтаксиса VBA
- 3. Типы данных
- 4. Исходные данные
- 5. Копирование данных с использованием процедур в программах
- 6. Дозапись исходных данных
- 7. Создание отчёта
- 8. Сортировка данных
- 9. Создание автоматического макроса по сортировке
- 10. Выборка данных
- 11. Создание автоматического макроса по выборке
- 12. Определение максимального и минимального значения
- 13. Создание диаграмм (гистограмма, круговая, смешанная)
- 14. Создание управляющих кнопок
- 15. Автоматический макрос Гашение
- Заключение
- Список использованной литературы
ВведениеИнформатика это предмет, изучающий компьютер и его составляющие, а также различные программы позволяющие производить расчеты, делать графики составлять таблицы и др. Одной из программ позволяющих нам составлять таблицы и производить расчеты и работающий в среде Windows является Microsoft Excel. Visual Basic используется в качестве внутреннего языка программного пакета Microsoft Office (Word, Excel и др.). С помощью Visual Basic можно создавать приложения практически для любой области современных компьютерных технологий: бизнес-приложения, игры, мультимедиа, базы данных.Сейчас этот язык используют не только программисты-любители, но и все больше коммерческие организации. Так, например абсолютное большинство организаций занимающихся реализацией компьютерной техники используют в своей работе прайс-листы, созданные в Excel, с обработкой данных программами написанными на языке Visual Basic.Visual Basic является мощным программным средством, с помощью которого можно реализовать широкий спектр практических задач. Visual Basic - это объектно-ориентированный язык. Основой языка являются объекты.1. Способы запуска редактора Visual BasicПрежде чем начать работать с редактором Visual Basic, нужно его открыть. Во всех приложениях Office это делается одинаково:самый простой способ: в меню Сервис выбрать Макрос - > Редактор Visual Basic;самый быстрый способ: нажать <Alt>+<F11>;можно также воспользоваться кнопкой на панели инструментов Visual Basic (предварительно сделав ее видимой);можно вызвать редактор при возникновении ошибки в макросе;можно открыть готовый макрос на редактирование в диалоговом окне Макрос.В любом случае откроется окно, похожее на представленное на рис.Рис.1 Окно редактора Visual Basic в Excel2. Главные правила синтаксиса VBAСинтаксис VBA, как понятно из самого названия этого языка (которое расшифровывается как Visual Basic for Applications), почти полностью совпадает с синтаксисом Visual Basic. Некоторые основные синтаксические принципы этого языка:VBA нечувствителен к регистру;чтобы закомментировать код до конца строки, используется одинарная кавычка (') или команда REM;символьные значения должны заключаться в двойные кавычки;максимальная длина любого имени в VBA (переменные, константы, процедуры) - 255 символов;начало нового оператора - перевод на новую строку;ограничений на максимальную длину строки нет (хотя в редакторе умещается только 308 символов).3. Типы данныхТип данных определяет, каким образом биты данных, представляющие конкретное значение, хранятся в памяти ПК. В каждом языке программирования имеется свой фиксированный набор базовых типов данных. Некоторые языки позволяют создание дополнительных (пользовательских) типов данных. В VBA имеются следующие типы данных: |
Тип данных | Размер | Диапазон значений | | Byte (байт) | 1 байт | От 0 до 255 | | Boolean (логический) | 2 байт | True или False. | | Integer (целое) 2 байт | 2 байт | От - 32 768 до 32 767. | | Long (длинное целое) | 4 байт | От - 2 147 483 648 до 2 147 483 647 | | Single (с плавающей точкой обычной точности) | 4 байт | От - 3,402823E38 до - 1,401298E-45 для отрицательных значений; от 1,401298E-45 до 3,402823E38 для положительных значений. | | Double (с плавающей точкой двойной точности) | 8 байт | От - 1,79769313486232E308 до - 4,94065645841247E-324 для отрицательных значений; от 4,94065645841247E-324 до 1,79769313486232E308 для положительных значений | | Currency (денежный) | 8 байт | От - 922 337 203 685 477,5808 до 922 337 203 685 477,5807 | | Decimal (масштабируемое целое) | 14 байт | +/-79 228 162 514 264 337 593 543 950 335 без дробной части; +/-7,9228162514264337593543950335 с 28 знаками справа от запятой; минимальное ненулевое значение имеет вид +/-0,0000000000000000000000000001. | | Date (даты и время) | 8 байт | 1 января 100 г. до 31 декабря 9999 г | | Object (объект) | 4 байт | Любой указатель объекта | | String (строка переменной длины) | 10 байт+ длина строки | От 0 до приблизительно 2 млрд. | | String (строка постоянной длины) | Длина строки | От 1 до приблизительно 65 400 | | Variant (числовые подтипы) | 16 байт | Любое числовое значение вплоть до границ диапазона для типа Double | | Variant (строковые подтипы) | 22 байт + длина строки | Как для строки (String) переменной длины | | | 4. Исходные данныеНа Листе 2 создается таблица 1 путем набора исходных данных согласно заданию. Программным путем определяется количество строк и столбцов таблицы с помощью функции Empty.Данная функция проверяет строки по выбранному столбцу (или строке). Если строка не пустая, то подсчитывается количество строк таблицы, передача управления на проверку следующей строки выполняется с помощью оператора безусловной передачи Go To на метку М1.Если строка пустая, то выполняется передача управления с помощью оператора Go To на метку М2, где фиксируется количество заполненных строк таблицы. В конце метки заканчивается двоеточием.Sub подсчет_строк_столбцов ()Sheets ("Лист2"). Selecti = 1 'формирование строки таблицыM1:Stroka = Sheets ("Лист2"). Cells (i + 5,1) 'анализируемая ячейкаIf Stroka = Emty Then 'если строка пустаяGoTo M2 'переход на метку 2Elsei = i + 1 'подсчет количества строкGoTo M1 ' переход к проверке следующей строкиEnd IfM2: 'в том случае, если ячейка пустаяn = i - 1 'подсчет количества строк в таблице'n-количество строк в таблицеSheets ("Лист2"). Cells (5,11) = nj = 1 'формирование столбца таблицыM3:Stolbets = Sheets ("Лист2"). Cells (4, j) 'анализируемый столбецIf Stolbets = Emty Then 'если столбец пустойGoTo M4 'переход на метку 4Elsej = j + 1 'подсчет количества столбцовGoTo M3 ' переход к проверке следующего столбцаEnd IfM4: 'в том случае, если столбец пустойm = j - 1 'подсчет количества столбцов в таблице'm-количество столбцов в таблицеSheets ("Лист2"). Cells (5,12) = mEnd SubРис.2 Данные подсчёта количества строк и столбцов5. Копирование данных с использованием процедур в программахСкопировать исходные данные с Листа2 программным путём, применяя программы процедур ввода и вывода данных.Процедуры - это самые важные функциональные блоки языка VBA. В VBA вы можете выполнить тот программный код, который содержится в какой-либо процедуре.Макрос в VBA - это процедура типа Sub, не имеющая параметров. Только макросы можно вызвать по имени из редактора VBA или из приложения Office.Процедуры условно делятся на процедуры - подпрограмм и процедуры-функции.Отличаются они тем, что процедура - подпрограмм просто выполняет группу операторов, а функция вычисляет некоторые значения и передаёт его обратно в главную программу.Чтобы работа подпрограмм имела смысл, её надо получить данные из главной (вызывающей) программы (главного модуля), которая эту программу вызывает. Данные передаются подпрограмме в виде параметров или аргументов, которые обычно описываются в её заголовке так же, как и переменные. Подпрограммы активизируются только в момент их вызова. Операторы, находящиеся в нутрии программы, выполняются только в том случае, если эта подпрограмма явно вызвана. Пока выполнение программы полностью не закончится, оператор главной программы, следующей за командой вызова подпрограммы, выполнятся не будет.Синтаксис главного модуля:Sub < Имя программы> ()< объявление данных>< имя процедуры> (список фактических парметров)End SubСинтаксис процедуры:Sub <имя программы> (список фактических параметров)ОператорыEnd SubСоздаётся главный модуль, в котором указывается имена подпрограмм и фактических параметров (лист, имя массива, размерность массива и т.д.). Управления работой процедурами выполняется из главного модуля.Каждая процедура начинается с оператора Sub - начало программы, имени, отмечающее её начало, перечисляются аргументы, которые передаются процедуре при вызове. С момента и до окончания работы вызываемой процедуры устанавливается соответствие между списком фактических и формальных параметров, поэтому списки фактических и формальных параметров должны иметь одинаковый смысл.
Страницы: 1, 2
|