Делопроизводство в кадровой службе. Фионова Л.Р - 48 стр.

        .Caption = "Приказ о прекращении действия трудового договора с
работниками"
        .OnAction = "прекращение_1"
       End With
       End With
       End With
     ….
     …..
     ….
     End Sub

      При нажатии на соответствующие кнопки панели инструментов, на
экран будут создаваться новые документы на основе шаблонов.
      Пример текста процедур, введенные в Окне кода модуля, приведен
ниже:
     Sub прием()
     Documents.Add Template:="D:\Шаблоны\табель.dot"
     End Sub

     Пример созданной панели приведен на рисунке 2.




          Рисунок 2 – Панель для работы с кадровыми документами

                    Порядок выполнения работы
     1   Изучить теоретическую часть работы.
     2   Скрыть все панели инструментов при открытии документа
программным образом и добавить свою панель инструментов.
     3   Добавить на свою панель различные элементы для создания
документов на основе шаблона.



                                       48