
- •Раздел 2 MicrosoftExcel
- •Автозаполнение рядов данных
- •Выделение данных
- •Вставка и удаление строк и столбцов
- •Форматирование данных
- •Задания для выполнения Задание 1
- •Расчетная ведомость ао «темп» за июнь 2008г.
- •Задание 2
- •Нахождение производной
- •Экзаменационная ведомость
- •Рабочая ведомость
- •Сводная ведомость
- •Задание 3
- •Варианты функций
- •Порядок выполнения работы
- •Содержание отчета
- •Варианты заданий Задание 1
- •Количество осадков в миллиметрах
- •Количество осадков в миллиметрах
- •Задание 2
- •Задание 3
- •Заработная плата работников
- •Задание 4
- •Задание 5
- •Атмосферное давление
- •Задание 6
- •Линия тренда
- •Варианты заданий
- •Задание 1
- •Исходные данные
- •Задание 2
- •Исходные данные
- •Задание 3
- •Изменения прибыли фирмы
- •Задание 4
- •Функциональная зависимость
- •Порядок выполнения работы
- •Содержание отчета
- •Пример списка
- •Сортировка списков
- •Фильтрация данных
- •Создание диапазона условий
- •Примеры условий отбора расширенного фильтра
- •Подведение итогов
- •Итоги по фамилиям получателей
- •Сводная таблица
- •Варианты заданий Задание 1
- •Задание 2
- •Планеты солнечной системы
- •Задание 3
- •Исходные данные
- •Задание 4
- •Исходные данные
- •Задание 5
- •Исходные данные
- •Задание 6
- •Варианты заданий
- •Задания
- •Варианты заданий
- •Порядок выполнения работы
- •Варианты заданий
- •Порядок выполнения работы
- •Содержание отчета
- •Контрольные вопросы
Варианты заданий
Варианты заданий для работы приведены в таблице 2.29.
Задания
на рабочем листе создать таблицу вида:
a |
b |
c |
x начальное |
шаг по х |
5 |
3 |
1 |
0 |
0,5 |
Записать процедуру построения графика в макрос. Построить график функции y=ах2+bx+с cзаданными коэффициентами и заданным шагом для 10 точек .
Удалить построенный график с рабочего листа. Изменить значения коэффициентов а,b,с.
Запустить макрос. Макрос должен построить график с заданными коэффициентами на заданном интервале с заданным шагом. График строится на том рабочем листе, для которого записан макрос.
Открыть макрос для изменения в редакторе VisualBasicforApplication. скопировать получившийся макрос в текущем модуле. Изменить имя макроса в копии, например: Sub НовыйМакрос()
внести в текст макроса следующие изменения:
в начало макроса добавить строку: S = ActiveSheet.Name ‘ эта команда запоминает вSимя активного рабочего листа
заменить обращение к «Лист1» на переменную S, например, строки: ActiveChart.SetSourceData Source:=Sheets("Лист1").Range("B5:B20")"), PlotBy:=xlColumns ActiveChart.SeriesCollection(1).XValues = "=Лист1!R5C1:R20C1" ActiveChart.Location Where:=xlLocationAsObject, Name:="Лист1"
заменить на строки: ActiveChart.SetSourceData Source:=Sheets(S).Range("B5:B20"), PlotBy:=xlColumns
ActiveChart.SeriesCollection(1).XValues = "=" & S & "!R5C1:R20C1" ActiveChart.Location Where:=xlLocationAsObject, Name:=S
В результате изменений НовыйМакрос должен строить график на любом активном листе. Построить на трех различных листах графики функции с различными коэффициентами по варианту с помощью отредактированного макроса.
Таблица 2.29
Варианты заданий
-
№ варианта
коэффициент - а
коэффициент - в
коэффициент - с
х - принадлежит промежутку
1
1
2.2
3.1
[-2,2]
2
1.2
2.5
3.2
[-5,5]
3
1.4
2.7
3.3
[-8,5]
4
1.6
2.8
3.4
[-8,8]
5
1.8
3.2
0.3
[-4,5]
6
2
3.5
4.2
[-4,4]
7
2.2
3.8
0.22
[-7,5]
8
2.5
4
3.7
[-7,7]
9
2.7
1.5
0.5
[-9,5]
10
2.8
1.7
0.7
[-6,5]
11
3.2
2.1
0.9
[-5,6]
12
3.5
2.3
1
[-4,5]
13
3.8
2.6
1.2
[-5,55]
14
4
3.1
1.4
[-55,55]
15
1.5
3.2
1.6
[-45,45]
16
1.7
3.3
1.8
[-3,3]
17
2.1
3.4
2
[-9,9]
18
2.3
0.3
2.2
[0,5]
19
2.6
4.2
2.5
[0,9]
20
3.1
0.22
2.2
[-9,0]
21
3.2
3.7
2.5
[-8,2]
22
3.3
0.5
2.7
[-6,5]
23
3.4
0.7
2.8
[-8,0.5]
24
0.3
1
3.2
[-5.5,0]
25
4.2
1.2
3.5
[0,9]
26
0.22
1.4
3.8
[0,8]
27
3.7
1.6
4
[-3.3,3.3]
28
0.5
1.8
2.6
[-7.8,7.8]
29
0.7
2
3.1
[-7,14]
30
0.9
2.2
3.2
[-5,5]
31
0.3
2.5
3.3
[-10,10]