Создание типовых шаблонов для расчетов 


Мы поможем в написании ваших работ!



ЗНАЕТЕ ЛИ ВЫ?

Создание типовых шаблонов для расчетов



Лабораторная работа 1

Создание типовых шаблонов для расчетов

Цель работы: вычисление по формулам, использование абсолютной адресацией (2 способа), оформление документа, создание шаблонов, защита ячеек листа

Задание 1. Вычисления и построение диаграмм

Заполнить таблицу, выполнить вычисления. Вычисляемые значения – жирнымкурсивным шрифтом.

При выполнении задания необходимо:

  • при вводе табельного номера должен обеспечиваться ввод нулей в первой позиции;
  • для вычисления стоимости затрат рублях использовать абсолютную адресацию, использовать 2 способа задания абсолютного адреса (с помощью символа $ в адресе ячейки и присвоении ячейке имени Курс).

Построить диаграмму, иллюстрирующую числовые данные.

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

 

Таб. номер Фамилия, инициалы Месяцы  
Январь Февраль Март Всего Всего, р Курс
  Николаев А.Л. ? 1 236 ? 456 ? 852 ? 2 544 85 376,64р. 33,56р.
  Петров П.Д. ? 145 ? 896 ? 987 ? 2 028 68 059,68р.  
  Семенова Е.Г. ? 789 ? 742 ? 456 ? 1 987 66 683,72р.  
  Устинов К.Ф. ? 785 ? 258 ? 852 ? 1 895 63 596,20р.  
  Петров В.Д. ? 963 ? 896 ? 789 ? 2 648 88 866,88р.  
  Итого ? 3 918 ? 3 248 ? 3 936 ? 11 102    
  Итого, р 131 488,08р. 109 002,88р. 132 092,16р. 372 583,12р.    

 


Задание 2. Использование абсолютной адресации и констант

Заполнить таблицу, выполнить вычисления. Вычисляемые значения – жирнымкурсивным шрифтом.

При выполнении задания необходимо:

  • для вычисления расхода и стоимости топлива использовать абсолютную адресацию;
  • константы (цену и расход топлива) разместить на отдельном листе, присвоить данному листу имя Константы;
  • ячейкам с константами (цена и расход топлива) присвоить имена Цена и Расход соответственно.

Закрыть для ввода все ячейки, за исключением числовых данных (пробег на начало дня при поступлении автомобиля в эксплуатацию – 01.09.03 и на конец каждого дня), используя функции защиты листа.

 

Расходы на эксплуатацию автомобиля
           
Дата Пробег, км Суточный пробег Расход топлива, л Стоимость топлива
На начало дня На конец дня
01.09.03 15 800 16 250   38,3 478,13р.
02.09.03 16 250 16 500   21,3 265,63р.
03.09.03 16 500 16 800   25,5 318,75р.
04.09.03 16 800 17 325   44,6 557,81р.
05.09.03 17 325 18 000   57,4 717,19р.
06.09.03 18 000 18 256   21,8 272,00р.
07.09.03 18 256 18 380   10,5 131,75р.
08.09.03 18 380 19 000   52,7 658,75р.
09.09.03 19 000 19 257   21,8 273,06р.
10.09.03 19 257 19 500   20,7 258,19р.
11.09.03 19 500 19 800   25,5 318,75р.
12.09.03 19 800 20 500   59,5 743,75р.
13.09.03 20 500 21 000   42,5 531,25р.
14.09.03 21 000 21 300   25,5 318,75р.

 

Константы    
Наименование Значение Примечание
Цена 12,50р. Бензин А92 на ПТК
Расход 8,5 литров на 100 км в летний период

Лабораторная работа 2

Сводные таблицы

Ввести данные, выполнить вычисления и сформировать сводные таблицы (распределение поступления оборудования в отделы). При вычислениях использовать абсолютную адресацию.

 

Учет поступления оборудования
             
Дата Отдел Наименование Цена, $ Кол Стоимость, $ Стоимость, р
10.01.03 Администрация Монитор $125   $125 3 820р.
10.01.03 Отдел кадров Сканер $89   $178 5 440р.
10.01.03 Служба безопасности Принтер $210   $840 25 670р.
15.01.03 Технический отдел Системный блок $450   $1 350 41 256р.
15.01.03 Администрация Монитор $125   $500 15 280р.
20.01.03 Администрация Сканер $89   $89 2 720р.
21.01.03 Отдел кадров Принтер $210   $420 12 835р.
01.02.03 Технический отдел Системный блок $450   $2 250 68 760р.
01.02.03 Технический отдел Монитор $125   $500 15 280р.
15.02.03 Отдел кадров Принтер $210   $630 19 253р.
15.02.03 Технический отдел Сканер $89   $356 10 879р.
02.03.03 Администрация Принтер $210   $420 12 835р.
02.03.03 Служба безопасности Монитор $125   $500 15 280р.
25.03.03 Технический отдел Системный блок $450   $900 27 504р.
25.03.03 Служба безопасности Сканер $89   $89 2 720р.
             
Курс $            
30,56р.            

 

 

Сформировать сводные таблицы, показывающие:

  • распределение поступления оборудования в отделы;
  • поступление оборудования по датам

 

Указание.

    1. Сводные таблицы формируются: Данные->Сводные_таблицы.
    2. Начинает работать мастер сводных таблиц.
    3. Шаги 1 и 2 проходим «по умолчанию».
    4. На шаге 3 нажимаем кнопку МАКЕТ. В макете сводной таблицы буксируем поля исходной таблицы на макет сводной.
    5. На шаге 4 выбираем место расположения сводной таблицы. По умолчанию – на новом листе.

 

Отдел Администрация        
           
Сумма по полю Стоимость, р Дата        
Наименование 10.01.2003 15.01.2003 20.01.2003 02.03.2003 Общий итог
Монитор          
Принтер          
Сканер          
Общий итог          

 

Наименование Монитор        
           
Сумма по полю Стоимость, р Дата        
Отдел 10.01.2003 15.01.2003 01.02.2003 02.03.2003 Общий итог
Администрация 3 820р. 15 280р.     19 100р.
Служба безопасности       15 280р. 15 280р.
Технический отдел     15 280р.   15 280р.
Общий итог 3 820р. 15 280р. 15 280р. 15 280р. 49 660р.

 

Наименование Принтер        
           
Сумма по полю Стоимость, р Дата        
Отдел 10.01.2003 21.01.2003 15.02.2003 02.03.2003 Общий итог
Администрация       12 835р. 12 835р.
Отдел кадров   12 835р. 19 253р.   32 088р.
Служба безопасности 25 670р.       25 670р.
Общий итог 25 670р. 12 835р. 19 253р. 12 835р. 70 593р.

 


Лабораторная работа 3

Лабораторная работа 4

Подбор параметра

Постановка задачи.

  1. У студента имеется некоторая сумма свободная денег (S), которую он хочет положить на вклад в банк, допустим S=1000р.
  2. Банк выплачивает ежемесячно доход (p в %) от суммы вклада на последний день месяца, допустим p=0.8% в месяц.
  3. Студент положил деньги в банк 1 января[1] текущего года, а 31 декабря того же года получил доход по вкладу. Рассчитать сумму дохода D в программе Excel
  4. На полученный доход студент хочет к новогоднему столу купить коробку конфет, допустим, коробка конфет стоит K=65р.

Определить

  1. Сколько коробок конфет можно купить на полученный доход (количество может быть только целым), рассчитать сдачу.
  2. В результате того, что при покупке осталась сдача, очевидно, что часть денег на вкладе «не работали», т.е. можно было положить либо меньшую сумму, либо большую и, тем самым, купить на 1 коробку конфет больше. Поэтому необходимо произвести подбор параметра – определить сумму, при вложении которой дохода хватит на покупку 1 или 2 коробок конфет.
  3. Произвести подбор параметра – дохода банка.

 

Подбор параметра в Microsoft Excel производится следующим образом:

    • активизируем ячейку, в которой должен быть подобран параметр;
    • в меню выбираем Сервис - > Подбор параметра;
    • в появившемся диалоговом окне указываем требуемое значение (в данном случае 1 или 2);
    • указываем адрес ячейки, в которой должен быть изменен параметр (в данном случае – начальный вклад или процент банка).

 

 


Лабораторная работа 5

Задание 1. Функция, автоматизирующая расчет времени в пути для самолета

Запустите Excel

Введите таблицу по образцу, предложенному ниже.

 

  A B C D
  Направление Время отправления Время прибытия Время в пути
  Москва 10:30 11:35  
  Челябинск 13:15 15:50  
  Владивосток 18:00 0:10  
  Мурманск 23:40 1:10  

 

Присвойте ячейкам в столбцах B, C, D числовой формат Время

Время в числовом формате— это десятичная дробь в интервале от 0 (нуля) до 0,99999999, представляющая время от 0:00:00 (12:00:00 ночи) до 23:59:59 (11:59:59 вечера).

Введите в столбцы B и C данные - время отправления и время прибытия. Время при этом вводится через двоеточие (часы:минуты:секунды).

 

Запустите редактор VBA последовательностью команд

Сервис è Макрос è Редактор è Visual Basic

Выполните команду Вставка èи создайте новый модуль. Выберите его значок в окне проекта, чтобы активизировать окно редактора для создания собственной функции. В открывшемся окне напишите на VBA программу функции Время_Пути для определения времени полета:

Function Время_пути(Вылет, Прилет)

v = Вылет

p = Прилет

If p > v Then t = p - v Else t = 1 + p - v

Время_пути = t

End Function

 

Активизируйте лист Excel. В ячейку D2 введите созданную вами функцию, выбрав ее из категории Определенные пользователем. Проверьте работоспособность созданной вами функции.

В результате таблица должна иметь следующий вид:

 

  A B C D
  Направление Время отправления Время прибытия Время в пути
  Москва 10:30 11:35 1:05:00
  Челябинск 13:15 15:50 2:35:00
  Владивосток 18:00 0:10 6:10:00
  Мурманск 23:40 1:10 1:30:00

Задание 2. Функция, автоматизирующая расчет времени в пути для поезда

Запустите Excel. Введите таблицу по образцу, предложенному ниже.

 

  A B C D E
  Направление Время отправления Время прибытия Число полных суток Время в пути
  Москва        
  Челябинск        
  Владивосток        
  Мурманск        

 

Присвойте ячейкам в столбцах B, C числовой формат Время, тип 13:30.

Присвойте ячейкам в столбце E числовой формат Время, тип 37:30:55

Присвойте ячейкам в столбце D – числовой формат Числовой без десятичных знаков.

 

Время в числовом формате— это десятичная дробь в интервале от 0 (нуля) до 0,99999999, представляющая время от 0:00:00 (12:00:00 ночи) до 23:59:59 (11:59:59 вечера).

 

Введите в столбцы B и C данные - время отправления, время прибытия. Время при этом вводится через двоеточие (часы:минуты).

Введите в столбец D данные - число полных суток.

  A B C D E
  Направление Время отправления Время прибытия Число полных суток Время в пути
  Москва 10:30 11:35    
  Челябинск 13:15 15:50    
  Владивосток 18:00 0:10    
  Мурманск 23:40 1:10    

 

Запустите редактор VBA последовательностью команд

Сервис è Макрос è Редактор è Visual Basic

Выполните команду Вставка èи создайте новый модуль. Выберите его значок в окне проекта, чтобы активизировать окно редактора для создания собственной функции. В открывшемся окне напишите на VBA программу функции ПоездВпути для определения времени поезда в пути в часах:

Function ПоездВпути(Отправление, Прибытие, Суток)

v = Отправление

p = Прибытие

s = Суток

If p > v Then t = p - v Else t = 1 + p - v

ПоездВпути = t + s

End Function

 

Активизируйте лист Excel. В ячейку Е2 введите созданную вами функцию, выбрав ее из категории Определенные пользователем. Проверьте работоспособность созданной вами функции.

В результате таблица должна иметь следующий вид:

 

  A B C D E
  Направление Время отправления Время прибытия Число полных суток Время в пути
  Москва 10:30 11:35   1:05:00
  Челябинск 13:15 15:50   50:35:00
  Владивосток 18:00 0:10   126:10:00
  Мурманск 23:40 1:10   25:30:00

Лабораторная работа 6

Задание 1

 

1. Запустите Excel

2. Включите режим записи макроса, для чего выберите режим Сервис„Макрос„Начать запись.

В открывшемся меню Запись макроса введите имя макроса, например МакросПроверка, и присвойте ему комбинацию клавиш – Ctrl+z.

Нажмите кнопку меню OK и приготовьтесь к началу записи макроса в виде последовательности команд, выполняемых на рабочем листе Excel.

3. Введите в ячейку А1 первого рабочего листа чистой книги слово Проверка. Введите в ячейку А2 число 26 и число 15 в ячейку В2. Остановите запись макроса нажатием кнопки Остановить запись.

4. Очистите область А1:С3 рабочего листа и вызовите на выполнение макрос МакросПроверка с помощью комбинации клавиш Ctrl+z.

5. Ознакомьтесь с набором рабочих окон редактора VBA и с текстом созданной программы, для чего с помощью команд Сервис„Макрос„Макросы вызовите макрос МакросПроверка и нажмите кнопку Изменить. Аналогичный результат можно получить, выполняя последовательность команд Сервис„Макрос„Редактор Visual Basic.

6. Ознакомьтесь с текстом созданного модуля МакросПроверка. Пример полученного текста представлен ниже.

Sub МакросПроверка()

'

' МакросПроверка Макрос

' Макрос записан 03.11.2003 (NNNN)

'

' Сочетание клавиш: Ctrl+z

'

Range("A1").Select

ActiveCell.FormulaR1C1 = "Проверка"

Range("A2").Select

ActiveCell.FormulaR1C1 = "26"

Range("B2").Select

ActiveCell.FormulaR1C1 = "15"

Range("C2").Select

ActiveCell.FormulaR1C1 = "=RC[-2]*RC[-1]"

Range("C3").Select

End Sub

 

7. Первая строка представляет собой заголовок созданной процедуры МакросПроверка.

Параметры процедуры отсутствуют. Символом обозначен комментарий. Первая рабочая строка программы вызывает объект Аррliсаtiоп (приложение) с методом Run (выполнить), вызывающим на выполнение объект Range (диапазон) с параметрами начальной установки рабочего листа. Далее производится выделение ячейки А1 текущего рабочего листа и запись в активную ячейку в формате R1C1 текста “Проверка”.

Отметим, что в Ехсеl существует два формата (А1 и R1СI) и два способа адресации (относительная и абсолютная) ячеек памяти. В формате А1 признаком абсолютной адресации является символ “$“. В формате RIСI абсолютный адрес задается индекс рабочей строки и столбца, а при необходимости использования относительной адресации в квадратных скобках указывается относительное смещение со знаком по отношению к текущей рабочей ячейке. Последующие действия программы соответствуют выполненной последовательности при программировании макроса. Как следует из текста, константы и формулы заносятся с использованием метода FormulaR1С1 объекта ActiveCell.

9. Модифицируйте созданную программу. Введите в ее текст описание трех дополнительных переменных:

Dim b, c As Integer

Предварительно описав переменную d1 как строку символов, введите в текст программы оператор ввода данных:

Dim d As String

D = InputBox (“Первый сомножитель”, ”Проверка”)

Преобразуйте значение d из символьного вида к числовому с помощью функции:

b = Val(d)

и убедитесь, что содержимое ячейки может быть задано с клавиатуры в диалоговом режиме.

Ниже представлен пример созданной в процессе модернизации макроса программы на языке VВА:

Sub МакросПроверка ()

'

' МакросПроверка Макрос

' Макрос записан 03.11.2003 (APTS)

Dim b, c As Integer

Dim d As String

MsgBox "Умножение", vbOKOnly, “Проверка”

d = InputBox("Первый сомножитель", "Проверка")

b = Val(d)

d = InputBox("Второй сомножитель", "Проверка")

c = Val(d)

Range("A1").Select

ActiveCell.FormulaR1C1 = "Проверка"

Range("A2").Select

ActiveCell.FormulaR1C1 = b

Range("B2").Select

ActiveCell.FormulaR1C1 = c

Range("C2").Select

ActiveCell.FormulaR1C1 = "=RC[-2]*RC[-1]"

End Sub

 


Задание 2

Лабораторная работа 7

Задание 1

  1. Запустить Excel, Л ист1 переименовать в Формы, файл сохранить под именем Lab_3 в своей папке (не в папке Мои Документы!)
  2. Вывести на экран панель инструментов Формы (Вид„Панели инструментов„Формы)
  3. На панели инструментов Формы выбрать инструмент Поле со списком и мышкой в свободном месте листа «прорисовать» элемент список.

4. На листе в диапазоне ячеек A1:B6 ввести список фамилий

A B
  Фамилия, И.О.
  Иванов А.Л.
  Семенов А.Е.
  Николаева Я.О.
  Родионова К.П.
  Федоров П.Н.

5. Щелкнуть правой кнопкой мышки по прорисованному элементу список и в контекстном меню выбрать ФорматОбъекта На закладке ЭлементУправления в поле Формировать список по диапазону указать диапазон ячеек со списком (B1:B6), в поле Связь с ячейкой указать ячейку, в которой будет результирующий список (например, E4), указать количество строк в списке в соответствующем поле.

  1. Убедиться в работоспособности поля со списком.
  2. Самостоятельно сформировать поля Счетчик, Список и др.

 

Задание 2

 

  1. Лист2 переименовать в Заказ
  2. Сформировать таблицу заказов компьютерного оборудования следующим образом

a. Ввести шапку таблицы

Отдел Оборудование Кол
(*) (**) (***)

 

b. Ввести перечень отделов и оборудования

Отделы Оборудование
Экономический Принтер HP1300
Отдел кадров Сканер Mustek
Технический Монитор LG
Информационный Копир Sharp AR163

c. Ячейку (*) преобразовать в поле со списком, связать с перечнем отделов, ячейку (**) – связать с перечнем оборудования, ячейку (***) преобразовать в поле Счетчик

 

Отдел Оборудование

Кол

 

   

 

Лабораторная работа 8

Задание 1. Функция, автоматизирующая расчет времени в пути для самолета

Запустите Excel

Введите таблицу по образцу, предложенному ниже.

 

  A B C D
  Направление Время отправления Время прибытия Время в пути
  Москва 10:30 11:35  
  Челябинск 13:15 15:50  
  Владивосток 18:00 0:10  
  Мурманск 23:40 1:10  

 

Присвойте ячейкам в столбцах B, C, D числовой формат Время

Время в числовом формате— это десятичная дробь в интервале от 0 (нуля) до 0,99999999, представляющая время от 0:00:00 (12:00:00 ночи) до 23:59:59 (11:59:59 вечера).

Введите в столбцы B и C данные - время отправления и время прибытия. Время при этом вводится через двоеточие (часы:минуты:секунды).

 

Запустите редактор VBA последовательностью команд

Сервис è Макрос è Редактор è Visual Basic

Выполните команду Вставка èи создайте новый модуль. Выберите его значок в окне проекта, чтобы активизировать окно редактора для создания собственной функции. В открывшемся окне напишите на VBA программу функции Время_Пути для определения времени полета:

Function Время_пути(Вылет, Прилет)

v = Вылет

p = Прилет

If p > v Then t = p - v Else t = 1 + p - v

Время_пути = t

End Function

 

Активизируйте лист Excel. В ячейку D2 введите созданную вами функцию, выбрав ее из категории Определенные пользователем. Проверьте работоспособность созданной вами функции.

В результате таблица должна иметь следующий вид:

 

  A B C D
  Направление Время отправления Время прибытия Время в пути
  Москва 10:30 11:35 1:05:00
  Челябинск 13:15 15:50 2:35:00
  Владивосток 18:00 0:10 6:10:00
  Мурманск 23:40 1:10 1:30:00

Задание 2. Функция, автоматизирующая расчет времени в пути для поезда

Запустите Excel. Введите таблицу по образцу, предложенному ниже.

 

  A B C D E
  Направление Время отправления Время прибытия Число полных суток Время в пути
  Москва        
  Челябинск        
  Владивосток        
  Мурманск        

 

Присвойте ячейкам в столбцах B, C числовой формат Время, тип 13:30.

Присвойте ячейкам в столбце E числовой формат Время, тип 37:30:55

Присвойте ячейкам в столбце D – числовой формат Числовой без десятичных знаков.

 

Время в числовом формате— это десятичная дробь в интервале от 0 (нуля) до 0,99999999, представляющая время от 0:00:00 (12:00:00 ночи) до 23:59:59 (11:59:59 вечера).

 

Введите в столбцы B и C данные - время отправления, время прибытия. Время при этом вводится через двоеточие (часы:минуты).

Введите в столбец D данные - число полных суток.

  A B C D E
  Направление Время отправления Время прибытия Число полных суток Время в пути
  Москва 10:30 11:35    
  Челябинск 13:15 15:50    
  Владивосток 18:00 0:10    
  Мурманск 23:40 1:10    

 

Запустите редактор VBA последовательностью команд

Сервис è Макрос è Редактор è Visual Basic

Выполните команду Вставка èи создайте новый модуль. Выберите его значок в окне проекта, чтобы активизировать окно редактора для создания собственной функции. В открывшемся окне напишите на VBA программу функции ПоездВпути для определения времени поезда в пути в часах:

Function ПоездВпути(Отправление, Прибытие, Суток)

v = Отправление

p = Прибытие

s = Суток

If p > v Then t = p - v Else t = 1 + p - v

ПоездВпути = t + s

End Function

 

Активизируйте лист Excel. В ячейку Е2 введите созданную вами функцию, выбрав ее из категории Определенные пользователем. Проверьте работоспособность созданной вами функции.

В результате таблица должна иметь следующий вид:

 

  A B C D E
  Направление Время отправления Время прибытия Число полных суток Время в пути
  Москва 10:30 11:35   1:05:00
  Челябинск 13:15 15:50   50:35:00
  Владивосток 18:00 0:10   126:10:00
  Мурманск 23:40 1:10   25:30:00

Задание 3

Лабораторная работа 1

Создание типовых шаблонов для расчетов

Цель работы: вычисление по формулам, использование абсолютной адресацией (2 способа), оформление документа, создание шаблонов, защита ячеек листа

Задание 1. Вычисления и построение диаграмм

Заполнить таблицу, выполнить вычисления. Вычисляемые значения – жирнымкурсивным шрифтом.

При выполнении задания необходимо:

  • при вводе табельного номера должен обеспечиваться ввод нулей в первой позиции;
  • для вычисления стоимости затрат рублях использовать абсолютную адресацию, использовать 2 способа задания абсолютного адреса (с помощью символа $ в адресе ячейки и присвоении ячейке имени Курс).

Построить диаграмму, иллюстрирующую числовые данные.

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

 

Таб. номер Фамилия, инициалы Месяцы  
Январь Февраль Март Всего Всего, р Курс
  Николаев А.Л. ? 1 236 ? 456 ? 852 ? 2 544 85 376,64р. 33,56р.
  Петров П.Д. ? 145 ? 896 ? 987 ? 2 028 68 059,68р.  
  Семенова Е.Г. ? 789 ? 742 ? 456 ? 1 987 66 683,72р.  
  Устинов К.Ф. ? 785 ? 258 ? 852 ? 1 895 63 596,20р.  
  Петров В.Д. ? 963 ? 896 ? 789 ? 2 648 88 866,88р.  
  Итого ? 3 918 ? 3 248 ? 3 936 ? 11 102    
  Итого, р 131 488,08р. 109 002,88р. 132 092,16р. 372 583,12р.    

 


Задание 2. Использование абсолютной адресации и констант

Заполнить таблицу, выполнить вычисления. Вычисляемые значения – жирнымкурсивным шрифтом.

При выполнении задания необходимо:

  • для вычисления расхода и стоимости топлива использовать абсолютную адресацию;
  • константы (цену и расход топлива) разместить на отдельном листе, присвоить данному листу имя Константы;
  • ячейкам с константами (цена и расход топлива) присвоить имена Цена и Расход соответственно.

Закрыть для ввода все ячейки, за исключением числовых данных (пробег на начало дня при поступлении автомобиля в эксплуатацию – 01.09.03 и на конец каждого дня), используя функции защиты листа.

 

Расходы на эксплуатацию автомобиля
           
Дата Пробег, км Суточный пробег Расход топлива, л Стоимость топлива
На начало дня На конец дня
01.09.03 15 800 16 250   38,3 478,13р.
02.09.03 16 250 16 500   21,3 265,63р.
03.09.03 16 500 16 800   25,5 318,75р.
04.09.03 16 800 17 325   44,6 557,81р.
05.09.03 17 325 18 000   57,4 717,19р.
06.09.03 18 000 18 256   21,8 272,00р.
07.09.03 18 256 18 380   10,5 131,75р.
08.09.03 18 380 19 000   52,7 658,75р.
09.09.03 19 000 19 257   21,8 273,06р.
10.09.03 19 257 19 500   20,7 258,19р.
11.09.03 19 500 19 800   25,5 318,75р.
12.09.03 19 800 20 500   59,5 743,75р.
13.09.03 20 500 21 000   42,5 531,25р.
14.09.03 21 000 21 300   25,5 318,75р.

 

Константы    
Наименование Значение Примечание
Цена 12,50р. Бензин А92 на ПТК
Расход 8,5 литров на 100 км в летний период

Лабораторная работа 2

Сводные таблицы

Ввести данные, выполнить вычисления и сформировать сводные таблицы (распределение поступления оборудования в отделы). При вычислениях использовать абсолютную адресацию.

 

Учет поступления оборудования
             
Дата Отдел Наименование Цена, $ Кол Стоимость, $ Стоимость, р
10.01.03 Администрация Монитор $125   $125 3 820р.
10.01.03 Отдел кадров Сканер $89   $178 5 440р.
10.01.03 Служба безопасности Принтер $210   $840 25 670р.
15.01.03 Технический отдел Системный блок $450   $1 350 41 256р.
15.01.03 Администрация Монитор $125   $500 15 280р.
20.01.03 Администрация Сканер $89   $89 2 720р.
21.01.03 Отдел кадров Принтер $210   $420 12 835р.
01.02.03 Технический отдел Системный блок $450   $2 250 68 760р.
01.02.03 Технический отдел Монитор $125   $500 15 280р.
15.02.03 Отдел кадров Принтер $210   $630 19 253р.
15.02.03 Технический отдел Сканер $89   $356 10 879р.
02.03.03 Администрация Принтер $210   $420 12 835р.
02.03.03 Служба безопасности Монитор $125   $500 15 280р.
25.03.03 Технический отдел Системный блок $450   $900 27 504р.
25.03.03 Служба безопасности Сканер $89   $89 2 720р.
             
Курс $            
30,56р.            

 

 

Сформировать сводные таблицы, показывающие:

  • распределение поступления оборудования в отделы;
  • поступление оборудования по датам

 

Указание.

    1. Сводные таблицы формируются: Данные->Сводные_таблицы.
    2. Начинает работать мастер сводных таблиц.
    3. Шаги 1 и 2 проходим «по умолчанию».
    4. На шаге 3 нажимаем кнопку МАКЕТ. В макете сводной таблицы буксируем поля исходной таблицы на макет сводной.
    5. На шаге 4 выбираем место расположения сводной таблицы. По умолчанию – на новом листе.

 

Отдел Администрация        
           
Сумма по полю Стоимость, р Дата        
Наименование 10.01.2003 15.01.2003 20.01.2003 02.03.2003 Общий итог
Монитор          
Принтер          
Сканер          
Общий итог          

 

Наименование Монитор        
           
Сумма по полю Стоимость, р Дата        
Отдел 10.01.2003 15.01.2003 01.02.2003 02.03.2003 Общий итог
Администрация 3 820р. 15 280р.     19 100р.
Служба безопасности       15 280р. 15 280р.
Технический отдел     15 280р.   15 280р.
Общий итог 3 820р. 15 280р. 15 280р. 15 280р. 49 660р.

 



Поделиться:


Последнее изменение этой страницы: 2016-12-10; просмотров: 261; Нарушение авторского права страницы; Мы поможем в написании вашей работы!

infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 18.219.215.75 (0.176 с.)