Решение экономических и бухгалтерских задач с использованием инструментария Visual Basic For Application (48829)

Посмотреть архив целиком

Федеральное агентство железнодорожного транспорта

Сибирский государственный университет путей сообщения

Кафедра "Общая информатика"







КУРСОВАЯ РАБОТА

по дисциплине "Информатика"

РЕШЕНИЕ ЭКОНОМИЧЕСКИХ И БУХГАЛТЕРСКИХ ЗАДАЧ

С ИСПОЛЬЗОВАНИЕМ ИНСТРУМЕНТАРИЯ

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;

самый быстрый способ: нажать +;

можно также воспользоваться кнопкой на панели инструментов Visual Basic (предварительно сделав ее видимой);

можно вызвать редактор при возникновении ошибки в макросе;

можно открыть готовый макрос на редактирование в диалоговом окне Макрос.

В любом случае откроется окно, похожее на представленное на рис.


Рис.1 Окно редактора Visual Basic в Excel


2. Главные правила синтаксиса 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"). Select

i = 1 'формирование строки таблицы

M1:

Stroka = Sheets ("Лист2"). Cells (i + 5,1) 'анализируемая ячейка

If Stroka = Emty Then 'если строка пустая

GoTo M2 'переход на метку 2

Else

i = i + 1 'подсчет количества строк

GoTo M1 ' переход к проверке следующей строки

End If

M2: 'в том случае, если ячейка пустая

n = i - 1 'подсчет количества строк в таблице

'n-количество строк в таблице

Sheets ("Лист2"). Cells (5,11) = n

j = 1 'формирование столбца таблицы

M3:

Stolbets = Sheets ("Лист2"). Cells (4, j) 'анализируемый столбец

If Stolbets = Emty Then 'если столбец пустой

GoTo M4 'переход на метку 4


Случайные файлы

Файл
100674.rtf
64294.rtf
26685.rtf
144119.rtf
55687.rtf




Чтобы не видеть здесь видео-рекламу достаточно стать зарегистрированным пользователем.
Чтобы не видеть никакую рекламу на сайте, нужно стать VIP-пользователем.
Это можно сделать совершенно бесплатно. Читайте подробности тут.