2.7.2 Ввод формулы заключения договора
Макрос ДатаЗаключенияДоговора (рис. 6.8.) вводит формулу в ячейку С5 при обращении к элементу управления Флажок и создается аналогично предыдущему.
2.7.3 Присвоение макросов элементам управления
Для присвоения макроса элементу управления, выделите его и нажатием на правую кнопку мыши и вызовите контекстное меню (рис. 2.7.), в котором выберите команду Назначить макрос. В появившемся диалоговом окне Назначить макрос объекту в поле Имя макроса выберите макрос и нажмите кнопку ОК.
Рис. 2.7. Контекстное меню при назначении макроса элементу управления
2.8 Область формирования элементов договора
Эта область объединяет элементы базы данных с введенными в нее реквизитами предприятий на рабочем листе Реквизиты и введенные данные в верхнюю часть рабочего листа Договор.
В свою очередь область формирования можно разделить на составляющие:
номер договора (ячейка В8);
преамбулу (диапазон ячеек А9:С11);
изменяющиеся пункты договора (объединенные ячейки А12:С12 и А13:С13);
реквизиты сторон (диапазон ячеек А15:С21).
2.9 Номер договора, дата и место его заключения
В ячейке В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.
2.10 Преамбула договора
В объединенной ячейке А11:С11 формируется преамбула договора. Формула, находящаяся в ячейке А11, с помощью текстовой функции СЦЕПИТЬ соединяет текст, функции и ссылки (рис. 2.8.).
=СЦЕПИТЬ(A16;", в лице ";ВПР(A$1;Реквизиты!$A$3:$K$1000;7;ЛОЖЬ);" ";ВПР(A$1;Реквизиты!$A$3:$K$1000;9;ЛОЖЬ);", который действует на основании ";ВПР(A$1;Реквизиты!$A$3:$K$1000;11;ЛОЖЬ);", в дальнейшем ";A15;", с одной стороны и ";C16;", в лице ";ВПР(C$1;Реквизиты!$A$3:$K$1000;7;ЛОЖЬ);" ";ВПР(C$1;Реквизиты!$A$3:$K$1000;9;ЛОЖЬ);", который действует на основании ";ВПР(C$1;Реквизиты!$A$3:$K$1000;11;ЛОЖЬ);", в дальнейшем ";C15;" заключили настоящий ДОГОВОР о нижеследующем:")
Рис. 2.8. Формула формирования текста на основе функции СЦЕПИТЬ
В формуле последовательно происходит соединение следующих элементов:
ссылка на ячейку А16 в области реквизитов, в которой уже определено наименование предприятия - продавца;
текст - ", в лице ";
функция ВПР - производящая поиск наименования должности, внесенной в базу данных на листе Реквизиты;
" " - текст (пробел) соединяющий наименование должности и фамилии, имени и отчества руководителя предприятия - продавца;
функция ВПР -производит поиск полностью фамилии, имени и отчества руководителя предприятия, который подписывает договор;
текст - ", который действует на основании ";
функция ВПР -для поиска наименования документа, на основании которого руководитель подписывает договор;
текст - ", в дальнейшем ";
ссылка на ячейку A15 - в которой происходит поиск предприятия - покупателя товара;
текст - ", с одной стороны и ";
ссылка на ячейку C16 - наименование организации Покупателя;
текст - ", в лице ";
функция ВПР - производит поиск наименование должности, внесенное в базу данных на рабочем листе Реквизиты;
" " - текст (пробел) соединяющий наименование должности и фамилии, имени и отчества руководителя предприятия - покупателя;
и так далее