Назначение макросов элементам управления
В зависимости от номера, присваиваемого договору и его даты заключения, присутствует возможность их ввода непосредственно в ячейки с клавиатуры. Естественно, в таком случае формулы, содержащиеся в этих ячейках, будут удалены. Для того чтобы не вводить их в последующем, назначьте элементам управления Переключатель и Флажок макросы, которые будут автоматически восстанавливать эти формулы при обращении к любому из этих элементов управления.
Ввод формул создания номера договора и сроков оплаты по нему
Задача макроса НомерДатаОплатыДоговор (рис. 6.8.) - при активизации любого переключателя предусмотреть возможность ввода формул в ячейки С3 и С7. Для этого запишите макрос, выполнив следующую последовательность действий:
предварительно введите формулы в ячейки С3 и С7;
запустите макрос на запись;
поместите табличный курсор в ячейку С3, нажмите последовательно клавиши F2 и Enter;
поместите табличный курсор в ячейку С7 и повторите операцию;
остановите запись макроса.
Рис. 6.8. Макросы, назначенные элементам управления для обновления формул
Ввод формулы заключения договора
Макрос ДатаЗаключенияДоговора (рис. 6.8.) вводит формулу в ячейку С5 при обращении к элементу управления Флажок и создается аналогично предыдущему.
Присвоение макросов элементам управления
Для присвоения макроса элементу управления, выделите его и нажатием на правую кнопку мыши и вызовите контекстное меню (рис. 6.9.), в котором выберите команду Назначить макрос. В появившемся диалоговом окне Назначить макрос объекту (рис. 4.18.) в поле Имя макроса выберите макрос и нажмите кнопку ОК.
Рис. 6.9. Контекстное меню при назначении макроса элементу управления
Область формирования элементов договора
Эта область объединяет элементы базы данных с введенными в нее реквизитами предприятий на рабочем листе Реквизиты и введенные данные в верхнюю часть рабочего листа Договор.
В свою очередь область формирования можно разделить на составляющие:
номер договора (ячейка В8);
преамбулу (диапазон ячеек А9:С11);
изменяющиеся пункты договора (объединенные ячейки А12:С12 и А13:С13);
реквизиты сторон (диапазон ячеек А15:С21).
Номер договора, дата и место его заключения
В ячейке В8 находится формула номера договора:
=ЕСЛИ(ИЛИ(B3=1;B3=3);C3;"__________")
в которой если в ячейку В3 введено значение 1 или 3, то формула возвращает значение указанное в ячейке С3, в противном случае возвращается значение "____" (подчеркивающая линия).
Формула в ячейке А9 определяет место заключения договора:
=C4
производит ссылку на ячейку, в которую вводится место заключения договора с клавиатуры.
Формула в ячейке С9 указывает дату заключения договора:
=ЕСЛИ(C5=0;"<___>_________ 200 г.";AC5)
Если дата не введена в ячейку С5, то тогда формула возвращает текстовое значение "<___>_________ 200 г.". Если введена, то тогда возвращает эту дату из ячейки AC5, которая является выходом модуля преобразования даты из формата Excel в текстовый. Модуль преобразования даты находится в диапазоне ячеек АА5:АС5 и с его входа - ячейки АА5 задана ссылка на ячейку С5, а выходом является ячейка АС5.