- •Лабораторна робота №1 Вивчення середовища розробки додатків
- •Знайомство з середовищем Visual Basic For Applications
- •Порядок запису макросу за допомогою засобів автоматичного запису макросів (рекордера)
- •Питання для самоконтролю і завдання:
- •Лабораторна робота № 2. Процедури-функції Visual Basic For Applications
- •Методичні вказівки.
- •Створення процедури-функції.
- •Створення процедури-функції з операторами умовного переходу.
- •Питання для самоконтролю:
- •Завдання на роботу:
- •Лабораторна робота №4 Обмін даними між процедурою користувача, робочим листом і користувачем
- •Загальні відомості
- •Лабораторна робота №5. Створення процедур у vba з багаторазовими повтореннями (циклічні структури).
- •Порядок роботи:
- •Приклад створення екранної форми
Питання для самоконтролю:
Дати визначення процедурі-функції;
Назвати правила складання імені функції;
Який формат завдання має процедура-функція?
Як використовувати процедуру-функцію?
У якій категорії розміщуються процедури-функції?
Чим визначається кількість полів ведення у другому кроці роботи з процедурою-функцією?
Завдання на роботу:
Завдання1:
Завантажте MS Excel, додайте модуль;
Створіть власну функцію користувача Y(x) за індивідуальним завданням за допомогою VBA. Зробіть опис функції, який пояснює її зміст та буде допомагати у роботі з нею.
На робочому аркуші Книги Excel уведіть вихідні дані .
Зробіть розрахунки з використанням створеної користувальницької функції та Майстра функцій.
Уведіть формулу заданого виразу у контрольні комірки та порівняйте результат з розрахунками п4.
Збережіть виконану роботу у файлах.
Завдання 2:
Розрахувати вартість товару по його вартості без НДС і ставки НДС. Функція має такий вигляд :
Стоимость= СтоимостьБезНДС*(1+НДС/100)
Порядок створення функції користувача:
завантажте VBA;
у стандартному модулі створіть таку функцію користувача:
Function Стоимость(СтоимостьБезНДС, НДС)
Стоимость= СтоимостьБезНДС*(1+НДС/100)
End Function.
Зробимо розрахунки за допомогою функції стоимость для цього:
На робочому листі Excel у комірку (А2) ввести вартість товару без НДС, у (В2) – ставку НДС, виділить комірку (С2) –в ній отримуємо відповідь
Зверніться до Майстра функцій виберіть категорію визначену користувачем, функцію - "стоимость" і натисніть ОК.
У другому вікні діалогу з Майстром функцій у якості аргументу функції стоимость у полі "Стоимость Без НДС", введіть значення вартості товару, тобто клацніть по А2. У полі "НДС" клацніть по В2.
При натисканні ОК у комірці С2 отримаєте відповідь.
Завдання 3:
Розрахувати середній тиск над дренами за розрахунковий період, який визначається як
Hд=в –0,6а,
де в- середня глибина закладання дрен в м (змінюється від 1 до 1,3м),
а- норма осушення (м) (змінюється від 0,8 до 0,9м).
Лабораторна робота 3.
Створення процедури-функції з операторами умовного переходу.
Оператори умовного переходу задають виконання визначених груп інструкцій в залежності від значення деякої умови. Синтаксис оператора: IF - Then - Else
If умова Then дії по гільці "так" Else дії по гільці "ні".
Наприклад, задача визначення Y по такій залежності
У вигляді оператора умовного переходу цей розрахунок буде мати наступний вид:
IF x<=0 Then y= x^2 Else y= sqr (x)
Припускається також використання блочної форми синтаксису оператору умовного переходу. Зверніть увагу, що при блочній формі запису оператора в кінці блоку обов'язково використовуються ключові слова IF End.Таким чином, конструкція IF у вигляді блоку має такий вигляд:
Дерево умов може бути більш складним, чим просто перевірка однієї умови. У цьому випадку використовується оператор IF-Then-ElseIf. Він дозволяє перевіряти множині умови, синтаксис його такий
...
Завдання 1:
Створити функцію користувача для наступного виразу
|
|
|
|
|
|
Завдання2:
Створити функцію користувача с трьома умовами
|
|
|
|
|
|
Завдання 3. Розрахунок комісійних. Менеджеру по продажах необхідно створити функцію користувача, яка б дозволяла розраховувати комісійні. Процент комісійних залежить від об’єму проданого товару і обчислюється по наступному правилу:
Об’єм продаж за неділю, грн |
Комісійні, % |
Від 0 до 9 999 |
8 |
Від 10 000 до 29 999 |
10 |
Від 30 000 до 49 999 |
12 |
Більше 50 000 |
14 |
