Разработка программы по учету заявок клиентов туристического агентства Истлайн (стр. 2 из 4)
6. Выделить ячейку А1
7. Команда Правка – Вставить
8. Перейти на лист «Отели»
9. Команда Сервис – Макрос – Остановить запись
После этого возвращаемся на лист «Туры» и рисуем кнопку в левом верхним углу рабочего листа, появится диалоговое окно «Назначить макрос объекту», в нем выбирается имя созданного макроса «Выбор тура».
Проверяется работа макроса, т.е. при каждом нажатии на кнопку «Выбрать тур» должен копироваться тот тур, который будет выбран, в первую строку листа и автоматический переход на лист «Отели».
3. Лист «Отели»
На листе «Отели» содержится подробная информация об отелях, включая их месторасположения, категорию, адреса и телефоны, суточные цены, наличие баров и ресторанов и многое другое, взятое из буклетов и каталогов отелей и принимающих сторон.
В третьей строке таблицы должна отражаться справочная информация выбранного клиентом тура, а именно название отеля и регион, которая необходима для правильного выбора номера в заказанной клиентом гостинице. Для этого в ячейки А3 заносятся формула со ссылкой на лист «Туры» (=Туры!Е1), а в клетку В3 (=Туры!А1). После чего в ячейке А3 листа «Отели» появится название выбранного отеля, а в клетке B3 – тура. Это нужно для того, что бы с помощью автофильтра, установленного в «шапке» таблице подобрать номер в отеле для клиента (команда Данные/Фильтр/Автофильтр).
Строка-«шапка» справочника отелей включает: название отеля, регион, категорию, адрес, типы номеров, суточные цены номера, даты начала и окончания сезона, телефон и факс отеля, месторасположения отеля, наличии баров, ресторанов, бассейнов, пляжей, пляжного оборудования, парковок, теннисных кортов, саун, тренажерных залов, спортинвентаря, гостиничного и сейфов в номерах, услуг по обмену валюты, наличия в номерах телефона, туалета, холодильника, телевизора, ванны, душа, балкона, кондиционера, а также вид из окна и другие особенности номера.
В справочник заносится информация по каждому отелю, по соответствующим турам, указанным в справочнике листа «Туры». Тип номеров по каждому отелю должен быть не менее трех. Информация подбирается из буклетов, проспектов и каталогов.
После того, как вся информация будет занесена, во всей четвертой строке устанавливается автофильтр (команд Данные/Фильтр/Автофильтр) для выбора номера в отеле указанного в заявке клиента. При выборе номера сначала активизируется кнопка наименование отеля, выбирается тот отель, который указан в заявке, а потом «мышью» «подсвечивается» строка с выбранным типом номера.
Вторая строка листа используется для позиционирования управляющей кнопки выбора номера в отеле тура и перехода на лист «Авиа». Для этого записывается следующий макрос:
1. Выбирается нужный тип номера отеля
2. Вся выбранная строка выделяется
3. Команда Сервис – Макрос – Начать запись
4. Дать имя макросу Выбор отеля
5. Команда Правка – Копировать
6. Выделить ячейку А1
7. Команда Правка – Вставить
8. Перейти на лист «Авиа»
9. Команда Сервис – Макрос – Остановить запись
После этого возвращаемся на лист «Отели» и рисуем кнопку в левом верхним углу рабочего листа, появится диалоговое окно «Назначить макрос объекту», в нем выбирается имя созданного макроса «Выбор отеля».
Проверяется работа макроса, т.е. при каждом нажатии на кнопку «Выбрать отель» должен копироваться тот отель с выбранным типом номера, который будет выделен, в первую строку листа и автоматический переход на лист «Авиа».
4. Лист «Авиа»
На листе «Авиа» размещается информация о расписании движения самолетов, авиакомпаниях, номерах рейсов, типах мест, маршруты, цены на авиабилеты, тип самолетов, о времени отправления.
В четвертой строке таблице отражается справочная информация выбранного клиентом тура, а именно страна и регион. Эта информация необходима для правильного подбора рейса туда и обратно. Для этого в ячейку А5 заносится формула со ссылкой на лист туры (=Туры!А1), в ячейку С5 (=Туры!D1), в ячейку D4(=Туры!В1), и в ячейку Е4 (Туры!С1). В результате в ячейке А5 листа «Авиа» появится название тура, а в ячейках D4 и Е4 – даты начала и окончания тура.
Для того чтобы правильно подобрать рейс самолета, нужно знать дни недели, соответствующие началу и концу тура. Для этого, в ячейки D5 и Е5 заносятся формулы ДЕНЬНЕД(D4;1) и ДЕНЬНЕД(Е4;1). Эти формулы можно найти Вставка/Функции.
В строку-«шапка» заносится следующая информация: номер рейса, наименование авиакомпании, маршрут, отправление, прибытие, дни отправления, тип места, цена, описание рейса и тип самолета.
В справочник заносится информация по каждому рейсу (прямому и обратному), соответственно пунктам назначения, срокам начала и окончания туров, указанным в справочнике листа «Туры». Информация подбирается из действующих расписания авиакомпаний.
Во всей строке-«шапке» устанавливается автофильтр (команда Данные/Фильтр/Автофильтр). Для выбора сначала активизируется кнопка с указанием маршрута, а затем «мышью» «подсвечивается» строка с выбранным типом места. По выбранным данным подбирается авиарейс сначала «туда», а затем «оттуда».
Треть строка используется для позиционирования двух управляющих кнопок выбора рейса «рейс туда» и «рейс обратно». Для этого нужно записать два макроса. Сначала записывается макрос для кнопки «рейс туда»:
1. Выбирается нужный рейс
2. Вся выбранная строка выделяется
3. Команда Сервис – Макрос – Начать запись
4. Дать имя макросу Выбор рейса туда
5. Команда Правка – Копировать
6. Выделить ячейку А1
7. Команда Правка – Вставить
8. Команда Сервис – Макрос – Остановить запись
Макрос для второй кнопке «рейс обратно» записывается следующим образом:
1. Выбирается нужный рейс
2. Вся выбранная строка выделяется
3. Команда Сервис – Макрос – Начать запись
4. Дать имя макросу Выбор рейса обратно
5. Команда Правка – Копировать
6. Выделить ячейку А2
7. Команда Правка – Вставить
8. Перейти на лист «Клиенты»
9. Команда Сервис – Макрос – Остановить запись
После этого возвращаемся на лист «Авиа» и рисуем 2 кнопки в правом верхним углу рабочего листа, появится диалоговое окно «Назначить макрос объекту», в нем выбирается имя созданных макросов: для кнопки «рейс туда» выбирается им макроса «Выбор рейса туда», а для кнопки «рейс обратно» - «Выбор рейса обратно».
Проверяется работа макросов, т.е. при каждом нажатии на кнопку «рейс туда» должен копироваться рейс, который был выбран, в первую строку листа «Авиа», а при каждом нажатии на кнопку «рейс обратно» должен копироваться обратный рейс, который был выбран, во вторую строку листа «Авиа» и автоматический переход на лист «Клиенты».
5. Лист «Клиенты»
На листе «Клиенты» содержится информация о клиентах: именах, датах рождения, адресах, телефонах и паспортных данных.
В третьей строке листа располагается «шапка» справочника данных о клиентах: фамилия и имя, паспорт, дата рождения, адрес, телефон.
Справочник заполняется данными о 20 клиентах в произвольном порядке. По окончанию ввода выделяется весь диапазон записей, начиная с четвертой строки, и выполняется сортировка таблицы по возрастанию командой Данные/Сортировка.
В этой таблице в строке-«шапке» фильтр не будет устанавливаться, поскольку поиск в отсортированной таблице ведется прокруткой строк. Но для того, чтобы «шапка» и управляющая кнопка постоянно присутствовали на экране, три верхних строки закрепляются с помощью команды Окно/Закрепить области.
Во второй строке располагается управляющая кнопка выбора данных из справочника и перехода на следующий лист «ТУР-1». Перед тем, как нарисовать кнопку «Выбрать клиента» записывается макрос:
1. Выбирается нужный клиент
2. Вся выбранная строка выделяется
3. Команда Сервис – Макрос – Начать запись
4. Дать имя макросу Выбор клиента
5. Команда Правка – Копировать
6. Выделить ячейку А1
7. Команда Правка – Вставить
8. Перейти на лист «ТУР-1»
9. Команда Сервис – Макрос – Остановить запись
После этого возвращаемся на лист «Клиенты» и рисуем кнопку в левом верхним углу рабочего листа, появится диалоговое окно «Назначить макрос объекту», в нем выбирается имя созданного макроса «Выбор клиента».
Проверяется работа макросов, т.е. при каждом нажатии на кнопку «Выбрать клиента» должны копироваться данные о выбранном клиенте в первую строку листа «Клиенты» и автоматический переход на лист «ТУР-1».
6. Лист «ТУР-1»
Лист «ТУР-1» содержит маску типовой формы путевки ТУР-1, оформленную средствами Excel в полном соответствии с установленными требованиями. Данные формы заполняются автоматически для каждого клиента, а затем распечатываются.