и выполняется, если по объекту щелкнуть

Выбор товара ГОД ЗАМЕНЯЕМ НА ТЕКУЩИЙ

1. Занесите исходную информацию (можно путем копирования таблицы из файла excel-11.doc. Обратите внимание, что этот файл – Wordовский, значит, открывать его надо в Worde). Первый лист назовите «Поступление», вычислите стоимость (как всегда, произведение цены на количество).

№ накладной	Дата поступления	Поставщик	Товар	Марка	Кол-во	Цена	Стоимость
	10.01.98	Логис	Чайник	Tefal NL-235
	10.01.98	Логис	Кофеварка	Tefal K-10
	10.01.98	Логис	Чайник	Moulinex 236
	10.01.98	Арбат	Чайник	Roventa T-10-a
	10.01.98	Арбат	Фритюрница	Moulinex MM-89
	15.01.98	Заря	Гриль	Roventa YY-65
	15.01.98	Арбат	Печь	Минск 5764в
	15.01.98	Арбат	Фен	Roventa R-987a
	02.02.98	Мирра	Телевизор	LG 5670
	02.02.98	Мирра	Плеер	Sharp YY-7800
	02.02.98	Заря	Печь	Sharp PJ-79
	12.02.98	Логис	Гриль	Tefal GT-7869
	12.02.98	Логис	Печь	Минск 5764в
	12.02.98	Логис	Чайник	Tefal NN-670
	25.02.98	Мирра	Магнитофон	Sharp NH-765
	02.03.98	Арбат	Кофеварка	Moulinex BY-1030
	13.03.98	Арбат	Печь	Roventa TY-44
	20.03.98	Заря	Пылесос	Dumbo H-7
	02.04.98	Эпис	Монитор	LG M-6300
	02.04.98	Эпис	Мышь	IBM H7010
	05.04.98	Логис	Утюг	Tefal Profil 70
	05.04.98	Логис	Утюг	Tefal Profil 85

2. Скопируйте всю исходную информацию на третий лист, назовите его «Плата». Сейчас посчитаем, сколько содрать с фирмы за хранение ее товаров.

Плату будем вычислять так: Если стоимость товара больше 100 000, то 0,5% от стоимости за день хранения, если меньше, чем 100 000, то 0,1%.

Пусть процентная ставка за хранение товаров может быть переменной: для этого вставим сверху основной таблицы две строки, в ячейку B1 поместим текст «Основная ставка», в ячейку C1 – число 0,001 (что соответствует 0,1% от стоимости товара), в ячейку В2 – текст «Повышенная ставка», в ячейку С2 – число 0,005 (что соответствует 0,5%).

· Добавим в конец еще один столбец – Плата. В ячейке под названием создадим формулу, которая вычисляет плату. Для создания формулы используйте функции ЕСЛИ и СЕГОДНЯ. Вместо того, чтоб указывать процентные ставки явно, числами, используйте ссылки на ячейки C1 и С2. Только ссылки эти должны быть какими? Размножим. Посмотрите на формулы, которые получились от автозаполнения – относительные адреса должны измениться, абсолютные – остаться неизменными.

· Подвести итоги – выясним, сколько должен заплатить каждый поставщик. Сверните второй уровень структуры. Скройте лишние столбцы.

· Измените значение ячеек, содержащих процентные ставки: пусть основная будет полпроцента, повышенная – 1%. Видите, как все мгновенно пересчиталось?

3. Второй лист назвать «Выбор информации». В конце-концов он будет выглядеть примерно так (УКАЗАНИЯ К ИСПОЛНЕНИЮ – НА ОБОРОТНОЙ СТОРОНЕ):

Выбрать информацию

Какой товар вас интересует

Чайник

№ накладной

Дата поступления

Поставщик

Товар

Марка

Кол-во

Цена

Стоимость

10.01.97

Логис

Чайник

Tefal NL-235

10.01.97

Логис

Чайник

Moulinex 236

10.01.97

Арбат

Чайник

Roventa T-10-a

Порядок работы:

Пишете слова «Какой товар вас интересует», делаете ячейку рядом обрамленной жирненькой рамочкой и помещаете в ней название какого-нибудь товара – например, Чайник. Смысл в том, чтобы пользователь ввел в обрамленную ячейку название товара, нажал на кнопочку «Выбрать информацию» и снизу получил таблицу с информацией о товарах.

Решать задачу будем с помощью макроса.

Макрос – это программа,

которая получается путем записи последовательности ваших действий,

а затем привязывается к графическому объекту, например, кнопке,

и выполняется, если по объекту щелкнуть.

Подготовка:

· готовим диапазон критериев: на несколько строчек ниже обрамленной ячейки скопируйте заголовок основной таблицы (с листа «Поступление»), под заголовок «Товар» помещаете формулу со ссылкой на обрамленную ячейку.

· прорепетируйте сценарий макроса:

· начинать надо с листа «Выбор информации». Первое действие – переход на лист «Поступление», курсор – в ячейку A1.

· Установка расширенного фильтра (через меню Данные). В качестве диапазона критериев надо указать диапазон, который вы подготовили в предыдущем пункте (он находится на листе «Выбор информации» и содержит 2 строки!)

· Отфильтрованные ячейки выделить (с некоторым достаточно большим количеством пустых строк снизу – маленькая хитрость), и скопировать через буфер обмена, на лист «Выбор информации» под диапазон критериев. После копирования курсор – в обрамленную ячейку.

· Вернуться на лист «Поступление», снять фильтр.

· Вернуться на лист «Выбор информации». Все.

· После того, как все хорошо получилось, макрос надо записать:

· меню Вид | Запись макроса | Начать запись, имя задайте Выбор, Ok. (Обратите внимание, появилась новая кнопка с черненьким квадратиком – это кнопка Остановить запись.Только не нажимайте на нее сразу!).

· аккуратно проделайте все прорепетированные действия,

· остановите запись макроса с помощью соответствующей кнопки.

· Теперь надо создать кнопку «Выбрать информацию». Включите панель Рисование, найдите на ней инструмент Кнопка, с его помощью определите прямоугольник для кнопки, выберите только что записанный макрос Выбор, измените название кнопки.

· Используйте свой макрос – поместите в обрамленную ячейку какой-нибудь другой товар и нажмите на кнопку «Выбрать информацию». Если все получается хорошо, сделайте строки, содержащие диапазон критериев, скрытыми.

· Если интересно, посмотрите на лист «Модуль1», там находится запись вашего макроса на языке Visual Basic.

4. Из исходных данных с листа «Поступление» составить сводную таблицу (через меню Данные), такую, чтоб можно было увидеть помесячную стоимость товаров по поставщикам. (Строки для поставщиков и столбцы для месяцев, которые получаются путем автоматической группировки дат поступления). Лист назовите «Диаграммы».

5. Построим две диаграммы – Стоимость товаров по месяцам, Стоимость товаров по поставщикам

· Для первой диаграммы диапазон данных выделяем: строка с месяцами и СТРОКА «Общий итог», только те ячейки, которые соответствуют месяцам. Тип диаграммы пусть будет Гистограмма.

· Для второй диаграммы – столбец с названиями фирм-поставщиков и СТОЛБЕЦ «Общий итог», тоже только те ячейки, которые соответствуют поставщикам. Тип диаграммы – Круговая.

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

Файл назовите vybor