Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
VBA лаб .doc
Скачиваний:
4
Добавлен:
01.05.2025
Размер:
1 Мб
Скачать
☆

Питання для самоконтролю:

  1. Дати визначення процедурі-функції;

  2. Назвати правила складання імені функції;

  3. Який формат завдання має процедура-функція?

  4. Як використовувати процедуру-функцію?

  5. У якій категорії розміщуються процедури-функції?

  6. Чим визначається кількість полів ведення у другому кроці роботи з процедурою-функцією?

Завдання на роботу:

Завдання1:

  1. Завантажте MS Excel, додайте модуль;

  2. Створіть власну функцію користувача Y(x) за індивідуальним завданням за допомогою VBA. Зробіть опис функції, який пояснює її зміст та буде допомагати у роботі з нею.

  3. На робочому аркуші Книги Excel уведіть вихідні дані .

  4. Зробіть розрахунки з використанням створеної користувальницької функції та Майстра функцій.

  5. Уведіть формулу заданого виразу у контрольні комірки та порівняйте результат з розрахунками п4.

  6. Збережіть виконану роботу у файлах.

Завдання 2:

Розрахувати вартість товару по його вартості без НДС і ставки НДС. Функція має такий вигляд :

Стоимость= СтоимостьБезНДС*(1+НДС/100)

Порядок створення функції користувача:

  1. завантажте VBA;

у стандартному модулі створіть таку функцію користувача:

Function Стоимость(СтоимостьБезНДС, НДС)

Стоимость= СтоимостьБезНДС*(1+НДС/100)

End Function.

  1. Зробимо розрахунки за допомогою функції стоимость для цього:

На робочому листі Excel у комірку (А2) ввести вартість товару без НДС, у (В2) – ставку НДС, виділить комірку (С2) –в ній отримуємо відповідь

  1. Зверніться до Майстра функцій виберіть категорію визначену користувачем, функцію - "стоимость" і натисніть ОК.

  2. У другому вікні діалогу з Майстром функцій у якості аргументу функції стоимость у полі "Стоимость Без НДС", введіть значення вартості товару, тобто клацніть по А2. У полі "НДС" клацніть по В2.

  3. При натисканні ОК у комірці С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

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]