Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
VB_metodichka.pdf
Скачиваний:
15
Добавлен:
26.03.2015
Размер:
1.88 Mб
Скачать

12.2.Задание для выполнения на компьютере

1.Создать на листе рабочей книги Excel интерфейс бланка счетфактуры, соответствующий виду, представленному на рис. 12.1.

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

3.Добавить в проект табличного документа пользовательскую форму и создать на ней интерфейс, приведенный на рис. 12.3.

4.Создать программу для кнопки «Заказ» на листе «Бланк».

5.Создать программу для комбинированного списка ComboBox2, выводящую на форму количество оставшегося на складе товара.

6.Создать программу для кнопки «Принять» на пользовательской форме UserForm1.

7.Создать программы для командных кнопок «Очистить» и «Отменить»

8.Создать макрос для проекта, выделяющий заполненный бланк счет-фактуры и выводящий его на печать.

9.Проверить и отладить работу всех программ счет-фактуры.

12.3.Контрольные вопросы

1.Как добавить в проект табличного документа Excel пользовательскую форму?

2.Как создать программу для элемента управления в проекте табличного документа Excel?

3.Как организовать заполнение комбинированных списков на пользовательской форме исходно информацией?

4.Как вывести дату в ячейку электронных таблиц?

5.Как организовать подсчет номера оформленной счет-

фактуры?

6.Как вывести на пользовательскую форму количество оставшегося на складе товара?

7.Как организовать учет стоимости доставки в стоимости това-

ра?

8.Как заполнить бланк счет-фактуры после диалога на пользовательской форме?

9.Как очистить бланк счет-фактуры заполняемой информацией?

10.Как распечатать заполненный бланк счет-фактуры?

110

13. СОВМЕСТНАЯ ОБРАБОТКА НА VBA ДОКУМЕНТОВ

WORD И EXCEL

13.1.Общие сведения

Вкачестве простейшего примера совместной работы двух приложений, входящих в пакет Microsoft Office Excel и Word, рассмотрим задачу рассылки извещений, созданных в редакторе Word, тем предполагаемым заказчикам, которые сделали заказ в соответствии с оформленной в Excel счет-фактурой, но не перевели деньги на счет фирмы, отправившей товар.

Заказчик

Товар

Кол-во

Стоимость

Дата

№ сч-

Оплата

 

 

 

 

 

факт.

 

Луч

Стул

10

1100

11 Март, 2002

25

да

Восток

Кресло

5

2000

11 Март, 2002

26

 

Восток

Стол

5

1600

12 Март, 2002

28

да

Вест

Кресло

5

2000

12 Март, 2002

29

 

Рис. 13.1. Структура листа «Заказы» для создания архива заказов

Предварительно надо усовершенствовать программу работы электронной счет-фактуры, добавив в нее процедуру создания архива всех заказов в соответствии с заполняемым бланком. Для фиксирования информации о заказанных товарах необходимо в проект счетфактуры добавить лист «Заказы», куда должна заноситься информация о произведенном заказе перед ее удалением. Это может выполнить программа для уже имеющейся кнопки «Очистить» на бланке счет-фактуры (рис. 13.1), в начало которой нужно добавить следующий программный код

i = 1

Do While Worksheets(«Заказы»).Cells(i, 1) <> «» i = i + 1

Loop

Worksheets(«Заказы»).Cells(i, 1) = Range(«c6») Worksheets(«Заказы»).Cells(i, 2) = Range(«b11») Worksheets(«Заказы»).Cells(i, 3) = Range(«c11») Worksheets(«Заказы»).Cells(i, 4) = Range(«c14») Worksheets(«Заказы»).Cells(i, 5) = Range(«c17») Worksheets(«Заказы»).Cells(i, 6) = Range(«e5»)

111

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]