Public Function Алименты (оклад, удержания, кол_детей)

If кол_детей = 1 Then Алименты = 0.25 * (оклад - удержания)

If кол_детей >= 2 Then Алименты = 0.33 * (оклад - удержания)

If кол_детей = 0 Then Алименты = 0

End Function

Оператор If … Then(если количество детей =1, то Алименты начисляются 25% от оклада минус удержания)

Остальные 4 функции написать самим. Все 5 функций,после того как вы их создадите будут в разделе Пользовательские в Мастере Функций.

Задание 3

С помощью макрорекордера записать макрос, по начислению заработной платы сотрудников предприятия.

Порядок записи макроса:

Открыть новую книгу!

Команда Сервис/Макрос/Начать запись в диалоговом окне (Рис.1) Запись макроса дать имя макросу, сохранить в Личной книге макросов(Personal.xls),описать макрос, назначить макросу горячие клавиши и ОК.

Рис.1

На листе MS Eхcel появится ПИ с двумя кнопками .

Начать запись:

• открыть файл в котором была создана таблица с исходными данными команда Файл/Открыть;
• провести в таблице расчет зарплаты, используя созданные пользовательские функции. Курсор поставить в ячейку под заголовок Пенсионный фонд и запустить мастер функций, найти среди категории пользовательские функцию, для расчета отчислений в пенсионный фонд;
• расчет провести для первого в таблице сотрудника, а далее используя механизм копирования формул заполнить столбец;
• по аналогии провести расчеты по всей ведомости;
• рассчитать строчку «Итого по ведомости», используя функцию Автосумма() и механизм копирования формул;
• отформатировать таблицу по своему усмотрению Формат/Ячейки;
• остановить запись макроса,используя кнопку останова на панели инструментов или меню Сервис/Макрос/Остановить запись.
• сохранить таблицу с начисленной заработной платой в файле под другим именем, чтобы не испортить заготовку с зарплатой.

Задание 4

Выполнить созданный макрос либо из меню Сервис/Макрос/Макросы выбрать название из списка и запустить или используя горячие клавиши, которые задали для этого макроса.

Файл сохранить под новым именем!

Задание 5

Назначение макросу команду меню. В меню Сервис включить новый пункт Зарплата и связать его с созданным макросом.

Выбрать в меню Сервис команду Настройка, появится ДО Настройка ( Рис.2), вкладка Команды выделить категорию макросы.

Рис.2

В правом списке щелчок л. м. на элементе Настраиваемая команда меню и, не отпуская кнопку отбуксировать элемент на меню СЕРВИС. При перемещении мыши вдоль меню будет перемещаться горизонтальнаялиния, которая отмечает будущее положение вставляемой в меню команды. Отбуксировать мышь так, чтобы горизонтальная линия располагалась за командой Макрос и отпустить кнопку. В меню появиться окруженная рамкой команда Настраиваемая команда меню. Щелчок пр.м. на команде, открыть контекстное меню. Очистить поле и ввести в него нужную команду (например, Зарплата) и ВВОД. Еще раз открыть контекстное меню команды. Выбрать команду Назначить макрос, откроется диалог, Назначить макрос, выбрать в списке макрос и ОК. Щелчок на кнопке Закрыть.

Задание 6

Создать пользовательскую кнопку, связать ее с макросом и поместить на любую из панелей инструмент.

Выбрать в меню Сервис команду Настройка, появится диалог НАСТРОЙКА, вкладка КОМАНДЫ выделить категорию макросы. В правом списке щелчок л.м.на элементе Настраиваемая кнопка и не отпуская кнопку отбуксировать ее на панель инструментов, после того как отбуксировали кнопку ее можно изменить нажав кнопку Изменить выделенный объект(кнопка становится активной) в ДО Настройка задается имя кнопке и изменяется значок из команды Выбрать значок для кнопки. Из контекстного меню выбрать команду Назначить макрос, и ОК.Щелчок на кнопке Закрыт ь закроется окно диалога НАСТРОЙКИ интерфейса MS Excel.

При создании кнопки задать свойству кнопки всплывающая подсказка - Зарплата.

Используя редактор кнопок отредактировать кнопку по своему усмотрению.

Необходимо помнить, что при каждом запуске макроса файл сохранять под новым именем!

Задание 7

Просмотреть записанный макрос: CЕРВИС/МАКРОС/МАКРОСЫ кнопка Изменить, откроется редактор VBA с записанным макросом.

Поиск по сайту: