Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
записка.doc
Скачиваний:
0
Добавлен:
01.03.2025
Размер:
827.39 Кб
Скачать

2) Кнопки на рабочем листе

В меню Сервис выбираем команду Настройка и выбираем опцию Формы. На отображаемой форме выбираем команду Кнопка и рисуем ее на рабочем листе. Задаем надпись кнопки. Назначаем кнопке макрос, для этого щелкаем по ней правой клавишей мыши, после чего в появившемся меню обработки нажатия кнопки вызываем созданный макрос.

3) Меню пользователя с двумя командами

В меню Сервис – Настройка выбираем закладку Команды, выбираем категорию Новое меню и перетаскиваем полученный объект в меню. Затем выбираем категорию Макросы и перетаскиваем в созданное меню команду Настраиваемая команда меню. Далее щелкаем по созданному меню правой клавишей мыши, заем его название "Мое меню", назначаем изображения и макросы для команд меню.

4) Графические объекты

На панели инструментов Элементы управления выделяем объект Рисунок. Далее рисуем его на листе. В свойствах объекта задаем графическое изображение на объекте. Назначаем объекту макрос, для этого щелкаем по нему, после чего в появившейся процедуре обработки щелчка мыши надо объектом вызываем созданный макрос.

Результат создания панели инструментов с двумя кнопками, кнопок на рабочем листе, меню пользователя с двумя кнопками и графических объектов для вызова макросов:

Результаты работы макросов:

а) в режиме отображения значений

б) в режиме отображения формул

Текст макросов созданных с помощью макрорекордера

Sub Расчет()

'

' Расчет Макрос

'

Range("B6").Select

ActiveCell.FormulaR1C1 = "=(R[-3]C-R[-4]C)/2*TAN(R[-2]C)"

Range("B7").Select

ActiveCell.FormulaR1C1 = "=R[-1]C*(R[-5]C+R[-4]C)/2"

Range("B8").Select

End Sub

Sub Очистка()

'

' Очистка Макрос

'

Range("B2:B4").Select

Selection.ClearContents

Range("B6:B7").Select

Selection.ClearContents

End Sub

3. Программирование линейных алгоритмов

Составить графическую схему алгоритма и программу для вычисления значений экономических показателей в соответствии с условием в табл.2.1. Исходные данные для отладки программы подобрать самостоятельно. Для организации ввода и вывода исходных данных и результатов использовать:

а) окно ввода и окно сообщений;

b) ячейки рабочего листа;

c) формы пользователя.

Исходные данные:

Рассчитать полную себестоимость продукции:

где Z – прямая заработная плата;

– расходы на содержание и эксплуатацию оборудования;

– прямые материальные затраты;

– расходы ;

– накладные и внепроизводственные расходы;

– непроизводственные расходы и потери от брака.

Графическая схема алгоритма

Таблица соответствия переменных

Имя в задаче

Имя в программе

Тип

Назначение

Z

Z

Double

прямая заработная плата

Rob

Double

расходы на содержание и эксплуатацию оборудования

Pmz

Double

прямые материальные затраты

Rn

Double

накладные и внепроизводственные расходы

Rb

Double

непроизводственные расходы и потери от брака

R

Double

расходы