Лабораторная работа. Занятие 3. VBA.

💸 Как сделать бизнес проще, а карман толще?

Тот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое раписание, но и напоминать клиентам о визитах тоже. Проблема в том, что средняя цена по рынку за такой сервис — 800 руб/мес или почти 15 000 руб за год. И это минимальный функционал. Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.
⚡️ Для новых пользователей первый месяц бесплатно. А далее 290 руб/мес, это в 3 раза дешевле аналогов. За эту цену доступен весь функционал: напоминание о визитах, чаевые, предоплаты, общение с клиентами, переносы записей и так далее.
✅ Уйма гибких настроек, которые помогут вам зарабатывать больше и забыть про чувство «что-то мне нужно было сделать».
Сомневаетесь? нажмите на текст, запустите чат-бота и убедитесь во всем сами!

Дана последовательность из n целых чисел. Найти минимальный и максимальный элементы в этой последовательности.

1.Запустить MS Excel, создать пустую рабочую книгу.

2. В ячейки таблицы ввести следующую информацию, согласно Рисунку 1, кроме ячеек F6 и F7, данные в них будут рассчитываться в макросе.

3. Войти в пункт меню Разработчик – Visual Basic (Alt+F11).

4. В окне Project explorer перейти по дереву проекта на ветвь VBAProject(имя книги)\Microsoft Excel objects\Эта книга, щелкнуть дважды по надписи “Эта книга”.

5. В появившемся окне набрать текст программы, представленной ниже:

6.Сохранить произведенные изменения, закрыть окно редактора Visual Basic и перейти в окно Microsoft Excel.

7. Используя команду меню Сервисы\Макрос\Макросы (Разработчик – Макросы - для MS Excel2010), открыть окно Макрос. Выбрать созданный макрос и нажать на кнопку Выполнить.

8. Изменить исходные данные в ячейках B4 - размер массива, в ячейках A7-A14 – элементы массива (обратите внимание, что размер массива и количество введенных чисел должны совпадать!). Проверить правильность работы макроса.

Задание 2: Дана последовательность из n целых чисел. Найти количество и сумму чисел кратных Х в этой последовательности. Число X вводится пользователем.

1.Запустить MS Excel, создать пустую рабочую книгу.

2. В ячейки таблицы ввести следующую информацию, согласно Рисунку 2, кроме ячеек F6 и F7, данные в них будут рассчитываться в макросе.

3. Войти в пункт меню Разработчик – Visual Basic (Alt+F11).

5. В появившемся окне набрать текст программы, представленной ниже:

6.Сохранить произведенные изменения, закрыть окно редактора Visual Basic и перейти в окно Microsoft Excel.

8. Изменить исходные данные и проверить правильность работы макроса.

Дана последовательность из n целых чисел. Найти количество отрицательных элементов с четным индексом. Отрицательные элементы с четным индексом выделить красным цветом в последовательности.

1.Запустить MS Excel, создать пустую рабочую книгу.

2. В ячейки таблицы ввести следующую информацию, согласно Рисунку 3, кроме ячейки F6, данные в ней будут рассчитываться в макросе. Красным цветом отдельные числа выделять также не надо.

3. Войти в пункт меню Разработчик – Visual Basic (Alt+F11).

5. В появившемся окне набрать текст программы, представленной ниже:

6.Сохранить произведенные изменения, закрыть окно редактора Visual Basic и перейти в окно Microsoft Excel.

8. Изменить исходные данные и проверить правильность работы макроса.

Изменить программный код таким образом, чтобы красным цветом окрасились все элементы массива с нечетным индексом.