Формат word с печатью - Word и Excel - помощь в работе с программами

07 январь 2022

Сегодня расскажем как вставить печать и подпись в документ Word.

Откройте новый документ Word, пройдите в раздел Вставка, далее Рисунок.
Найдите картинку с Печатью и Подписью, нажмите Вставить.
Выделите изображение с Подписью и нажмите на него правой кнопкой мыши на компьютере.
Далее Формат рисунка и в Положении выберете Перед текстом и Ок.
Аналогично проделайте с изображением с Печатью.
Теперь перейдите в раздел Работа с Рисунками. Нажмите Обрезка. При помощи маркера обрежьте границы рисунка максимально близко к контуру рисунка.
Нажмите в любом пустом месте документа. Снова выделите печать и перейдите в Работу с Рисунками.
В строке Высота укажите стандартный размер печати: 4,8 см. и далее Enter. В разделе Изменения нажмите Перекрасить и Установить прозрачный цвет.
Нажмите на белую область Печати. Аналогично удалите фон для Подписи.
Далее Перекрасить и Установить прозрачный цвет.
Нажмите на белую область подписи. При необходимости измените размер Изображения, используя угловой маркер. Чтобы переместить изображение перетащите его в нужное место.

Смотрите подробную пошаговую видео инструкцию как сделать подпись в Ворде от руки и поставить печать на документ Word:

Комментировать

В свое время, для оплаты моих услуг, приходилось высылать клиентам образец счета, на котором установлена синяя печать. В бухгалтерии не силен, но все мои аргументы что это только образец, оплачивайте и будет вам полный пакет документов с синей печатью, не проходили.

Пришлось поломать голову и решить поставленную задачу.

В этой статье, расскажу, как именно можно поставить синюю круглую печать, на любом документе Word.

Как сделать макет круглой печати;
Как вставить печать в документ.

Как сделать макет круглой печати

Первое что приходит на ум, это сделать макет печати в самом редакторе Word.

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

В ворде, существует набор графических фигур, имея опыт работы с которыми, вполне можно создать круглую, синюю печать, без особых хлопот.

Перейдите во вкладку «Вставка»;
В блоке «Текс», выберите кнопку WordArt (буква «А» наклоненная вправую сторону);
Добавьте текст, который будет располагаться по кругу печати, выберите интересующий шрифт и размер текста.
После того как активируете созданный только что текст, в ленте появится новая вкладка «Формат», в котором в пункте «Изменить фигура», нужно установить значение «По кругу».

Если надпись будет слишком сжатой, ее всегда можно увеличить при помощи маркеров.
Возвращаемся во вкладку «Вставка», нажимаем на кнопку «Фигуры» и выбираем «Круг».
Нарисуйте два круга с шириной линии 2 пп и один круг с шириной линии 4 пп.

Выбрать цвет и ширину линий можно в окне «Формат автофигуры», находящемся в всплывающем окне активируемом нажатием правой кнопкой мыши по фигуре.
Выделите все созданные объекты, перейдите во вкладку «Формат» и выберите кнопку «Выровнять объекты». Сначала выровняйте по центру, затем по середине.
Добавьте интересующий текст по центру созданной печати. В моем случае, печать созданная в Word выглядит так:
Снова выделите все созданные объекты и сгруппируйте фигуру, чтобы при перетаскивании ничего не рассыпалось.

Согласны, ничего сложного нет. Всего 9 пунтов и печать готова. Сохраните ее в отдельный файл и, при необходимости, просто копируйте в нужный документ.

И все же, нужно понимать, что нами была создана примитивная печать, не изобилующая большим количеством объектов.

Что делать, если живая печать гораздо лучше продумана?

Как вставить печать в документ

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

Совет один. Отсканируйте с бумаги круглую печать и сохраните ее как обычный рисунок.

Все что останется сделать, это просто добавить печать в виде рисунка в документ Word. Посмотрим на примере, как это делается.

Отсканируйте и сохраните в виде рисунка круглую печать.
Перейдите во вкладку «Вставка» и нажмите на кнопку «Рисунки».
В появившемся окне, выберите рисунок с изображением печати.
Установите печать в интересующем месте и выберите обтекание «За текстом».

На этом все. Вот такими не хитрыми способами, можно поставить печать на документе, сохранить и отправить на согласование.

Если знаете другие способы вставки печати в Ворд, пишите в комментариях.

Источник

Содержание

Печать документов в Ворде
- Печать стандартных документов
- Печать неформатных документов
- Решение возможных проблем
Заключение
Вопросы и ответы

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

Печать документов в Ворде

Процесс распечатки текстовых документов в редакторе от Microsoft мало чем отличается от такового в любых других программах, предоставляющих аналогичную возможность. Нюансы заключаются разве что в предварительном оформлении, подготовке и некоторых настройках. Забегая вперед, отметим, что Word позволяет печатать не только стандартные страницы A4, но и ряд других форматов.

Печать стандартных документов

Если вы имеете дело с обычным текстовым файлом, распечатать его не составит труда. Аналогичным образом обстоят дела и с документами, в которых есть графические объекты.

Читайте также: Как вставить изображение в Ворд

Прежде всего убедитесь в корректности оформления файла, который требуется отправить на печать. Содержащиеся в нем текстовые и/или графические данные, не должны выходить за пределы области печати, сам же текст должен иметь именно тот вид, который вы хотите в дальнейшем получить на бумаге. Избежать возможных проблем с разметкой или устранить их в случае обнаружения поможет следующая статья:

Подробнее: Настройка полей в Microsoft Word
Откройте меню «Файл», нажав по наименованию соответствующей вкладки на панели быстрого доступа.

Примечание: В версиях Ворд до 2007 года включительно кнопка, которую необходимо нажать для перехода в меню программы, выполнена в стиле старого логотипа офисного пакета от Майкрософт.
В списке доступных параметров выберите пункт «Печать».

При необходимости включите предварительный просмотр документа – это поможет еще раз перепроверить правильность оформления.

Подробнее: Предварительный просмотр документов в Word

Примечание: Перейти к разделу «Печать» рассматриваемого текстового редактора можно и значительно проще – достаточно нажать клавиши «CTRL+P», которые являются универсальными для большинства программ, наделенных аналогичной функциональностью.

Читайте также: Горячие клавиши для удобной работы в Ворде
В разделе «Принтер» из выпадающего списка выберите подключенное к компьютеру, заведомо работающее и правильно настроенное печатающее устройство.

Читайте также:
Настройка принтера по сети в Windows
Установка драйверов для принтера
В блоке опций «Параметры» (ранее «Настройка») определите основные параметры печати. Доступны следующие:
- Количество распечатываемых страниц – все, отдельные страницы или диапазон таковых;
- Тип печати – односторонняя или на обеих сторонах листа (последнее возможно только вручную);
- Количество копий (опционально);
- Ориентация страницы – книжная или альбомная, но лучше делать это еще перед настройкой печати;
- Формат страницы – A4, A5, A3 и т.д. Как и в случае с ориентацией, это нужно определять заранее, чтобы не нарушить оформление документа. К тому же данная возможность зависит в первую очередь от особенностей принтера;
- Размеры и тип полей;
- Количество страниц на листе.
Завершив с настройкой и, ориентируясь на окно предварительного просмотра, убедившись в ее правильности, нажмите по кнопке «Печать», расположенной в самом верху.

Примечание: Возле кнопки «Печать» можно также указать желаемое количество копий документа.
Если с принтером все в порядке и сам Word работает корректно, будет начата процедура печати, по завершении которой вы сможете забрать бумажные копии файлов из лотка печатающего устройства.

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

Печать неформатных документов

Если текстовый документ, который вы выводите на печать, имеет стандартный формат A4 и он точно правильно оформлен, проблем с его печатью возникнуть не должно. Но ведь Microsoft Word позволяет создавать и отличные от «стандарта» текстовые файлы, и нередко процесс их распечатки сопряжен с рядом трудностей. Собственно, последние могут возникнуть еще на этапе создания документа того или иного формата. Об основных из них, а также о нюансах печати, мы писали ранее, просто найдите в представленном ниже списке интересующую вас тему, ознакомьтесь с соответствующей инструкцией, и в результате получите уже готовый бумажный документ нужного типа.

Подробнее:
Создание документов книжного формата
Создание брошюр и буклетов
Создание форматов, отличных от A4
Изменение фона документа
Создание подложки и водяного знака

Правильно оформить текстовый документ перед его печатью на принтере поможет следующая статья:

Подробнее: Форматирование текста в документе Ворд

Решение возможных проблем

Иногда при попытке печати текстовых документов можно столкнуться с разного рода проблемами. К счастью, причины большинства из них легко обнаружить и устранить.

Принтер не печатает документы
В случае возникновения проблем с печатью первым делом следует проверить оборудование, ответственное за этот нехитрый процесс. Возможно, дело в его неправильной настройке или отсутствии актуального драйвера. Не исключено и механическое повреждение. Установить точную причину и избавиться от нее помогут представленные по ссылкам ниже материалы.

Подробнее:
Устранение проблем в работе принтеров HP и Epson
Печать документов на принтере в Windows

Не печатает только Word
Если же в работоспособности и правильной настройке печатающего оборудования вы убедились, и даже проверили его в других программах, остается винить только Ворд. Иногда этот текстовый редактор и сам недвусмысленно дает понять, что он не может распечатывать документы (характерные сбои, ошибки), но бывает и так, что проблема зарыта значительно глубже — в программных или системных компонентах. Выявить ее и наверняка решить поможет наша подробная статья по данной теме.

Подробнее: Что делать, если Word не печатает документы

Печатается не все содержимое
Бывает и так, что документ печатается, но некоторые из содержащихся на его страницах элементов не выводятся на печать (например, изображения, фигуры или измененный фон страницы). В данном случае нужно просто проверить параметры печати и, если потребуется, активировать в них отключенные пункты.

Откройте меню «Файл» и перейдите к разделу «Параметры».

На боковой панели перейдите во вкладку «Отображение» (ранее данный раздел назывался «Экран») и в блоке «Параметры печати» установите галочки напротив тех пунктов, описание которых соответствует тому, что вам требуется распечатать помимо основного содержимого документа.

Нажмите «ОК», чтобы сохранить внесенные изменения, и попробуйте повторно инициировать процесс печати.

Как видите, даже самые серьезные проблемы с печатью документов в Ворде всегда можно обнаружить и устранить. Избежать их вовсе поможет четкое следование инструкции, изложенной в первой части статьи.

Заключение

Распечатать файл в Microsoft Word не составит труда даже для малоопытного пользователя. Более того, данный текстовый редактор позволяет создавать и печатать на принтере не только стандартные форматы документов, и теперь вы знаете, как это делается.

Источник

Довольно распространенная задача, но так как пока не реализованная в типовых, поэтому и пишу.

Итак, к примеру, необходимо формировать некоторый типовой текст на основе имеющегося в организации шаблона в формате docx — MS Word. Обычно это договора (с контрагентами, сотрудниками), а также всевозможные приказы и т.д. Формат Word позволяет подготовить красиво оформленный документ, однако некоторые данные необходимо подставить из базы (ФИО и проч).

Данную задачу в данной статье буду реализовывать через расширение на примере печати договора с контрагентом. Конфигурация 1С:Бухгалтерия — типовая на поддержке 3.0.121.31, релиз платформы — 8.3.22.1704).
Для реализации задачи будем использовать подсистему БСП «Работа с печатью», с помощью которой можем быстро добавлять на формы списков и элементов команды Печати и формировать документы из шаблона Word.

Забегая вперед, добавлю, что при формировании документа MS Word использована серверная процедура формирования документа без создания COM-объекта. Однако, для формирования PDF документа — пришлось создавать COM-объект Word.Application, соответственно, это действие рекомендуется делать исключительно на клиенте, поэтому я задействовал клиентскую процедуру.

Сами шаблоны договоров оказания услуг — мои рабочие — можете брать и использовать или для образца (Скачать с Инфостарта https://infostart.ru/public/1753205/). Все переменные типа ФИО, должностей, ИНН и т.д. — беру из данных базы.
В общем, если нужно быстро сделать печать из шаблона MS Word — это вам подойдет как пример. Можно использовать и как готовый вариант текста договора оказания услуг по 1С, но это на ваше усмотрение.

Итак

Создаем новое расширение, снимаем галку безопасный режим

2. Создаем файл-шаблон MS Word. Формат файла MS Word должен соответствовать формату БСП.

Файл должен состоять из набора именованных областей. Каждая область начинается тэгом {v8 Область.ИмяОбласти1} {/v8 Область.ИмяОбласти1}.
Внутри области могут использоваться параметры, в которые мы впоследствии передадим нужные нам значения (типа ФИО). Параметры маркируются как {v8 Параметр1}.
Можно создавать даже таблицы для вывода табличных частей (например спецификация по договору), но в данном примере мы это не используем. Вот подробная статья про формат шаблона infostart.ru/1c/articles/1052233/.
Даже проще понять на примере, см скрины ниже

3. Далее Переходим к нужному объекту метаданных, в нашем случае — к справочнику Договоры. Далее макеты, добавить-двоичные данные-выбираем нужный файл Ворд

4. Добавим команды печати в справочник «Договоры контрагентов». Для этого в модуле менеджера объекта (справочника Договоры) находим процедуру «ДобавитьКомандыПечати» и добавляем ее в наше расширение с директивой &После. И добавляем команды

&После("ДобавитьКомандыПечати")
Процедура пп_ДобавитьКомандыПечати(КомандыПечати)
    КомандаПечати = КомандыПечати.Добавить();
    КомандаПечати.Идентификатор = "ДоговорОказанияУслуг";
    КомандаПечати.Представление = "Договор оказания услуг (PDF)";
    КомандаПечати.Обработчик = "пп_ПечатьКлиент.ПечатьДоговораОказанияУслуг";
    КомандаПечати.Картинка = БиблиотекаКартинок.ФорматPDF;

    КомандаПечати = КомандыПечати.Добавить();
    КомандаПечати.Идентификатор = "ДоговорОказанияУслугWord";
    КомандаПечати.Представление = "Договор оказания услуг (Word)";
    КомандаПечати.Картинка = БиблиотекаКартинок.ФорматWord;
КонецПроцедуры

Обратите внимание, что для выполнения команды печати PDF используется обработчик с процедурой пп_ПечатьКлиент.ПечатьДоговораОказанияУслуг. Модуль пп_ПечатьКлиент — сделаем клиентский, для работы с Com-объектом на клиенте (так рекомендуется стандартами 1С). Почему так — распишу поподробнее ниже.

Далее в модуле менеджера добавляем предопределенную процедуру «Печать». Если таковая уже есть в основной конфигурации — тогда размещаем ее с другим именем и директивой &После(«Печать»). В нашем примере этого не нужно. Если не указана другая процедура-обработчик — по умолчанию вызывается именно серверная процедура «Печать». Задействуем ее для формирования документа в Word.

Процедура Печать(МассивОбъектов, ПараметрыПечати, КоллекцияПечатныхФорм, ОбъектыПечати, ПараметрыВывода) Экспорт
	
	ИмяМакета = "ДоговорОказанияУслуг";
	ИмяМакетаWord = "ДоговорОказанияУслугWord";
	НаименованиеДокумента = "Договор оказания услуг";
	
	Если УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, ИмяМакетаWord) Тогда
		ПечатнаяФорма = УправлениеПечатью.СведенияОПечатнойФорме(КоллекцияПечатныхФорм, ИмяМакетаWord);     
		Если ПечатнаяФорма <> Неопределено Тогда  
		    ПечатнаяФорма.ОфисныеДокументы =  СформироватьДокументыWord(МассивОбъектов, ИмяМакета, НаименованиеДокумента);
		    ПечатнаяФорма.СинонимМакета = НаименованиеДокумента;
		КонецЕсли;
	КонецЕсли;
	
КонецПроцедуры

Тут используется типовая технология формирования офисных документов. Основная функция тут СформироватьДокументWord(Ссылка, ИмяМакета), которая использует несколько функций БСП.

УправлениеПечатью.ИнициализироватьМакетОфисногоДокумента(МакетДоговора, Неопределено) — инициализация структуры с нужными параметрами
УправлениеПечатью.ДобавитьОписаниеОбласти(ОписаниеОбластей, «Основная», «Общая») — формирует структуру с описанием, необходимым далее при формировании макета
УправлениеПечатью.ИнициализироватьПечатнуюФорму(Неопределено, Неопределено, Макет) — инициализирует макет
УправлениеПечатью.ОбластьМакета(Макет, ОписаниеОбластей[«Основная»]) — формирование макета с параметрами
УправлениеПечатью.ПрисоединитьОбластьИЗаполнитьПараметры(ПечатнаяФорма, Область, ПолучитьДанныеДоговора(Ссылка)) — окончательно формирует макет документа с переданными параметрами
Адрес = УправлениеПечатью.СформироватьДокумент(ПечатнаяФорма) — кладет готовый макет в Хранилище значений и отдает ссылку с адресом

Функция СформироватьДокументыWord(МассивОбъектов, ИмяМакета, НаименованиеДокумента)
Шаблон = НаименованиеДокумента + " %1 от %2";
ОфисныеДокументы = Новый Соответствие;

Для каждого Ссылка Из МассивОбъектов Цикл

    Адрес = СформироватьДокументWord(Ссылка, ИмяМакета);
    ИмяДокумента = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(Шаблон, Ссылка.Номер, Формат(Ссылка.Дата,"ДФ=dd.MM.yyyy"));
    ОфисныеДокументы.Вставить(Адрес, ИмяДокумента);

КонецЦикла;

Возврат ОфисныеДокументы;
КонецФункции

Функция СформироватьДокументWord(Ссылка, ИмяМакета)
	УстановитьПривилегированныйРежим(Истина);
	МакетДоговора = УправлениеПечатью.МакетПечатнойФормы("Справочник.ДоговорыКонтрагентов." + ИмяМакета);
    Макет = УправлениеПечатью.ИнициализироватьМакетОфисногоДокумента(МакетДоговора, Неопределено);
	
	ОписаниеОбластей = Новый Структура;
	УправлениеПечатью.ДобавитьОписаниеОбласти(ОписаниеОбластей, "Основная", "Общая");
	ПечатнаяФорма = УправлениеПечатью.ИнициализироватьПечатнуюФорму(Неопределено, Неопределено, Макет);
	
	Область = УправлениеПечатью.ОбластьМакета(Макет, ОписаниеОбластей["Основная"]);
	
	УправлениеПечатью.ПрисоединитьОбластьИЗаполнитьПараметры(ПечатнаяФорма, Область, ПолучитьДанныеДоговора(Ссылка));
	
	Адрес = УправлениеПечатью.СформироватьДокумент(ПечатнаяФорма);
	
	УстановитьПривилегированныйРежим(Ложь);
	
	Возврат Адрес; 
	
КонецФункции

ПолучитьДанныеДоговора(Ссылка) — структура со значениями переменных, самая рутинная, но самая смысловая в части данных. Только ее вам и нужно написать свою для своего объекта

Функция ПолучитьДанныеДоговора(ДоговорСсылка)
УстановитьПривилегированныйРежим(Истина);

Текст = "ВЫБРАТЬ
        |   ДоговорыКонтрагентов.Ссылка КАК Договор,
        |   ДоговорыКонтрагентов.Номер КАК НомерДоговора,
        |   ДоговорыКонтрагентов.Дата КАК ДатаДоговора,
        |   ДоговорыКонтрагентов.СрокДействия КАК ДатаОкончанияДействия,
        |   ДоговорыКонтрагентов.Владелец КАК Контрагент,
        |   ДоговорыКонтрагентов.Владелец.НаименованиеПолное КАК КонтрагентПолноеНаименование,
        |   ДоговорыКонтрагентов.Организация КАК Организация,
        |   ДоговорыКонтрагентов.Организация.НаименованиеПолное КАК ОрганизацияПолноеНаименование,
        |   ДоговорыКонтрагентов.Организация.ИНН КАК ОрганизацияИНН,
        |   ДоговорыКонтрагентов.Организация.КПП КАК ОрганизацияКПП,
        |   ДЕНЬ(ДоговорыКонтрагентов.Дата) КАК ДатаЧисло,
        |   МЕСЯЦ(ДоговорыКонтрагентов.Дата) КАК ДатаМесяц,
        |   ГОД(ДоговорыКонтрагентов.Дата) КАК ДатаГод,
        |   ДоговорыКонтрагентов.Организация.ОсновнойБанковскийСчет КАК БанковскийСчет,
        |   ДоговорыКонтрагентов.Владелец.ОсновнойБанковскийСчет КАК БанковскийСчетКонтрагента
        |ИЗ
        |   Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
        |ГДЕ
        |   ДоговорыКонтрагентов.Ссылка = &ДоговорСсылка";
Запрос = Новый Запрос(Текст); 

Запрос.УстановитьПараметр("ДоговорСсылка", ДоговорСсылка); 
РезЗапроса = Запрос.Выполнить();
Если РезЗапроса.Пустой() Тогда

    Возврат Неопределено;   

КонецЕсли; 

ДанныеЗапроса = РезЗапроса.Выгрузить()[0];

ДанныеШапки = Новый Структура("СтавкаСДополнением, НомерДоговора, КонтрагентПолноеНаименование");

ЗаполнитьЗначенияСвойств(ДанныеШапки, ДанныеЗапроса);
ДанныеШапки.Вставить("ДатаДоговора", Формат(ДанныеЗапроса.ДатаДоговора, "ДФ='d MMMM yyyy ''г.'''"));
ДанныеШапки.Вставить("ДоговорПредставление", ДанныеЗапроса.НомерДоговора + " от " 
    + Формат(ДанныеЗапроса.ДатаДоговора, "ДФ=dd.MM.yyyy"));

КонтрагентПодписант = ДанныеЗапроса.Контрагент.ОсновноеКонтактноеЛицо;
КонтрагентПодписантФИО = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку("%1 %2 %3", 
    КонтрагентПодписант.Фамилия, КонтрагентПодписант.Имя, КонтрагентПодписант.Отчество);
ПодписантДолжность = ДанныеЗапроса.Контрагент.ОсновноеКонтактноеЛицо.Должность;

СтавкаВЧас = УправлениеСвойствами.ЗначениеСвойства(ДоговорСсылка, "ДоговорСтавкаВЧас"); 
Если СтавкаВЧас <> Неопределено Тогда

    ДанныеШапки.Вставить("СтавкаСДополнением", РаботаСКурсамиВалют.СформироватьСуммуПрописью(СтавкаВЧас, 
        Константы.ВалютаРегламентированногоУчета.Получить(), Истина) +"(НДС не облагается)");

КонецЕсли;

КонтрагентПодписант_Инициалы = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку("%1 %2.%3.", 
    КонтрагентПодписант.Фамилия, Сред(КонтрагентПодписант.Имя, 1, 1), Сред(КонтрагентПодписант.Отчество, 1, 1));
ДанныеШапки.Вставить("КонтрагентПодписант_Инициалы", КонтрагентПодписант_Инициалы);
ДанныеШапки.Вставить("КонтрагентПодписантРП", СклонениеПредставленийОбъектов.ПросклонятьФИО(КонтрагентПодписантФИО, 2,,1));
ДанныеШапки.Вставить("КонтрагентПодписантДолжностьРП", СклонениеПредставленийОбъектов.ПросклонятьПредставление(Строка(ПодписантДолжность), 2, КонтрагентПодписант));
ДанныеШапки.Вставить("КонтрагентПодписантДолжность", ПодписантДолжность);

ДанныеШапки.Вставить("КонтрагентНаОсновании", "Устава");

ОтветственныеЛица = ОтветственныеЛицаБППереопределяемый.ОтветственныеЛица(ДанныеЗапроса.Организация,ТекущаяДатаСеанса(),);  

ДанныеОрганизации = БухгалтерскийУчетПереопределяемый.СведенияОЮрФизЛице(
    ДанныеЗапроса.Организация, ДанныеЗапроса.ДатаДоговора,ДанныеЗапроса.БанковскийСчет,,);
ПредставлениеОрганизации = ОбщегоНазначенияБПВызовСервера.ОписаниеОрганизации(ДанныеОрганизации, 
    "НаименованиеДляПечатныхФорм,ИНН,ЮридическийАдрес,Телефоны,НомерСчета,Банк,БИК,КоррСчет");
ОрганизацияДоп = РегламентированнаяОтчетностьВызовСервера.ПолучитьСведенияОбОрганизации(
    ДанныеЗапроса.Организация, ТекущаяДатаСеанса(), "ОргСубъект");

СведенияОКонтрагенте = БухгалтерскийУчетПереопределяемый.СведенияОЮрФизЛице(
    ДанныеЗапроса.Контрагент,ДанныеЗапроса.ДатаДоговора,,,);
ПредставлениеКонтрагента= ОбщегоНазначенияБПВызовСервера.ОписаниеОрганизации(СведенияОКонтрагенте,
    "НаименованиеДляПечатныхФорм,ИНН,ЮридическийАдрес,Телефоны,НомерСчета,Банк,БИК,КоррСчет");

РуководительДолжностьПредставление = ОтветственныеЛица.РуководительДолжностьПредставление; 
ОрганизацияПодписантДолжностьРП = СклонениеПредставленийОбъектов.ПросклонятьПредставление(
    РуководительДолжностьПредставление, 2,); 
ОрганизацияПодписант = ОтветственныеЛица.Руководитель;
ОрганизацияПодписантРП = СклонениеПредставленийОбъектов.ПросклонятьФИО(ОрганизацияПодписант.ФИО, 
    2, ОрганизацияПодписант, 1);
ДанныеШапки.Вставить("ОрганизацияПодписантРП", ОрганизацияПодписантРП);
ДанныеШапки.Вставить("ОрганизацияПодписантДолжностьРП", ОрганизацияПодписантДолжностьРП);

ШаблонВЛицеНаОсновании = "%1%2%3, действующ%4 на основании %5, именуем%6";
ШаблонОГРН = "свидетельства о регистрации ОГРНИП №";
Если Справочники.Организации.КодыСтатистики(ДанныеЗапроса.Организация).КодОКОПФ = "50102" Тогда

    ОрганизацияВЛицеНаОсновании = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонВЛицеНаОсновании, 
        "","","","ий", 
        ШаблонОГРН + ДанныеОрганизации.ОГРН,
        "ый");
    ЕстьКПП = Ложь;
Иначе   

    ОрганизацияВЛицеНаОсновании = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонВЛицеНаОсновании, 
        " в лице ", ОрганизацияПодписантДолжностьРП + " ", ОрганизацияПодписантРП,"его", 
        "Устава", 
        "ое");
    ЕстьКПП = Истина;

КонецЕсли;          
ДанныеШапки.Вставить("ОрганизацияВЛицеНаОсновании", ОрганизацияВЛицеНаОсновании);

Если СведенияОКонтрагенте.ЮридическоеФизическоеЛицо = Перечисления.ЮридическоеФизическоеЛицо.ФизическоеЛицо Тогда

    КонтрагентВЛицеНаОсновании = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонВЛицеНаОсновании, 
        "", "", "", "ий", 
        ШаблонОГРН + СведенияОКонтрагенте.ОГРН, 
        "ый");
    ЕстьКППКонтрагента  = Ложь;
Иначе   

    КонтрагентВЛицеНаОсновании = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонВЛицеНаОсновании, 
        " в лице ", ДанныеШапки.КонтрагентПодписантДолжностьРП + " ", ДанныеШапки.КонтрагентПодписантРП, "его", 
        "Устава", 
        "ое");
    ЕстьКППКонтрагента  = Истина;

КонецЕсли;          
ДанныеШапки.Вставить("КонтрагентВЛицеНаОсновании", КонтрагентВЛицеНаОсновании);

ИНН_КПП_Строкой = "ИНН" + "%1" + " " + ДанныеОрганизации.ИНН + "%2";

ИНН_КПП_Строкой = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ИНН_КПП_Строкой, 
    ?(ЕстьКПП, "/КПП", ""), ?(ЕстьКПП, "/" + ДанныеОрганизации.КПП, ""));

ДанныеШапки.Вставить("Город", ОрганизацияДоп.ОргСубъект);

ДанныеШапки.Вставить("ОрганизацияПодписантДолжность", РуководительДолжностьПредставление);

ДанныеШапки.Вставить("ОрганизацияПодписантДолжностьРП", СклонениеПредставленийОбъектов.ПросклонятьПредставление(РуководительДолжностьПредставление, 2, ОрганизацияПодписант));

ДанныеШапки.Вставить("ОрганизацияПодписант_Инициалы", ОтветственныеЛица.РуководительПредставление);

ДанныеШапки.Вставить("ОрганизацияПолноеНаименование", ДанныеОрганизации.ПолноеНаименование);

ДатаОкончанияДействия = ?(ЗначениеЗаполнено(ДанныеЗапроса.ДатаОкончанияДействия), ДанныеЗапроса.ДатаОкончанияДействия, 
    КонецГода(ТекущаяДатаСеанса()));
СрокОкончанияДоговора = Формат(ДатаОкончанияДействия, "ДФ='d MMMM yyyy ''г.'''");

ДанныеШапки.Вставить("СрокОкончанияДоговора", СрокОкончанияДоговора); 
РеквизитыСтрокой = "%1: %2
                    |%3
                    |ОГРН %4
                    |Банковские реквизиты:
                    |р/с  %5
                    |В банке %6
                    |БИК %7
                    |e-mail: %8";

ДанныеБанкСчета = Справочники.БанковскиеСчета.РеквизитыСчета(ДанныеЗапроса.БанковскийСчет);

ОрганизацияРеквизитыСтрокой = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(РеквизитыСтрокой, 
    ДанныеОрганизации.НаименованиеДляПечатныхФорм,
    ДанныеОрганизации.ЮридическийАдрес,
    ИНН_КПП_Строкой,
    ДанныеОрганизации.ОГРН,
    ДанныеБанкСчета.НомерСчета,
    ДанныеБанкСчета.НаименованиеБанка,
    ДанныеБанкСчета.БИКБанка, 
    ДанныеОрганизации.Email);

АдрЮР = УправлениеКонтактнойИнформацией.КонтактнаяИнформацияОбъекта(ДанныеЗапроса.Контрагент, 
    Справочники.ВидыКонтактнойИнформации.ЮрАдресКонтрагента, ТекущаяДатаСеанса(), Истина);

ДанныеБанкСчетаКонтрагента = Справочники.БанковскиеСчета.РеквизитыСчета(ДанныеЗапроса.БанковскийСчетКонтрагента);

EmailКонтрагента = УправлениеКонтактнойИнформацией.КонтактнаяИнформацияОбъекта(ДанныеЗапроса.Контрагент, 
    Справочники.ВидыКонтактнойИнформации.EmailКонтрагенты, ТекущаяДатаСеанса(), Истина);

Если ДанныеБанкСчетаКонтрагента = Неопределено Тогда

    ДанныеБанкСчетаКонтрагента = Новый Структура("НомерСчета, НаименованиеБанка, БИКБанка");    

КонецЕсли;  

ИНН_КПП_Строкой = "ИНН" + "%1" + " " + СведенияОКонтрагенте.ИНН + "%2";

ИНН_КПП_Строкой = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ИНН_КПП_Строкой, 
    ?(ЕстьКППКонтрагента, "/КПП", ""), ?(ЕстьКППКонтрагента, "/" + СведенияОКонтрагенте.КПП, ""));

КонтрагентРеквизитыСтрокой = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(РеквизитыСтрокой, 
    СведенияОКонтрагенте.НаименованиеДляПечатныхФорм,
    АдрЮР,
    ИНН_КПП_Строкой,
    ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ДанныеЗапроса.Контрагент, "РегистрационныйНомер"),
    ДанныеБанкСчетаКонтрагента.НомерСчета,
    ДанныеБанкСчетаКонтрагента.НаименованиеБанка,
    ДанныеБанкСчетаКонтрагента.БИКБанка,
    EmailКонтрагента);


ДанныеШапки.Вставить("ОрганизацияРеквизитыСтрокой", ОрганизацияРеквизитыСтрокой); 
ДанныеШапки.Вставить("КонтрагентРеквизитыСтрокой", КонтрагентРеквизитыСтрокой);  
ДанныеШапки.Вставить("ОрганизацияРеквизитыСтрокойВАкте", ПредставлениеОрганизации); 
ДанныеШапки.Вставить("КонтрагентРеквизитыСтрокойВАкте", ПредставлениеКонтрагента);  


УстановитьПривилегированныйРежим(Ложь);

Возврат ДанныеШапки; 
КонецФункции

С серверной частью все. Переходим к клиентской. Во первых почему нужен клиентский вызов. Потому что MS Word умеет сохранять документы в PDF, вот такой процедурой: WordDocument.SaveAs(FilePDF, 17). Причем умеет только из приложения, то есть нужно создавать COM-объект Word.Application. А вот COM-объект на сервере — это не только регистрация ком-объекта, но и проблемы с зависанием сессий и затем полная остановка данной функции. Поэтому 1С и сообщество не рекомендует, нужно делать на клиенте.

В клиентском модуле добавляем две процедуры. Собственно наш обработчик ПечатьДоговораОказанияУслуг и собственно процедуру открытия СформироватьWordИОткрытьPDF.

Функция ПечатьДоговораОказанияУслуг(Парам) Экспорт
МассивОбъектов = Парам.ОбъектыПечати;
ИмяМакета = Парам.Идентификатор;    
МакетИДанныеОбъекта = УправлениеПечатьюВызовСервера.МакетыИДанныеОбъектовДляПечати(Парам.МенеджерПечати, ИмяМакета, МассивОбъектов);
СформироватьWordИОткрытьPDF(МассивОбъектов, МакетИДанныеОбъекта, ИмяМакета);
Возврат Истина;

КонецФункции

Процедура СформироватьWordИОткрытьPDF(МассивОбъектов, МакетИДанныеОбъекта, ИмяМакета)

ТипМакета               = МакетИДанныеОбъекта.Макеты.ТипыМакетов[ИмяМакета];
ДвоичныеДанныеМакетов   = МакетИДанныеОбъекта.Макеты.ДвоичныеДанныеМакетов;
Области                 = МакетИДанныеОбъекта.Макеты.ОписаниеОбластей;

Макет = УправлениеПечатьюКлиент.ИнициализироватьМакетОфисногоДокумента(ДвоичныеДанныеМакетов[ИмяМакета], ТипМакета, ИмяМакета);
Если Макет = Неопределено Тогда
    Возврат;
КонецЕсли;

ЗакрытьОкноПечатнойФормы = Ложь;
Попытка
    ПечатнаяФорма = УправлениеПечатьюКлиент.ИнициализироватьПечатнуюФорму(ТипМакета, Макет.НастройкиСтраницыМакета, Макет);
    Если ПечатнаяФорма = Неопределено Тогда
        УправлениеПечатьюКлиент.ОчиститьСсылки(Макет);
        Возврат;
    КонецЕсли;

    Для каждого ДокументСсылка Из МассивОбъектов Цикл

        ДанныеОбъекта = МакетИДанныеОбъекта.Данные[ДокументСсылка][ИмяМакета];
        Область = УправлениеПечатьюКлиент.ОбластьМакета(Макет, Области[ИмяМакета]["Основная"]);
        УправлениеПечатьюКлиент.ПрисоединитьОбластьИЗаполнитьПараметры(ПечатнаяФорма, Область, ДанныеОбъекта, Ложь);

    КонецЦикла;         

Исключение
    ОбщегоНазначенияКлиентСервер.СообщитьПользователю(КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
    ЗакрытьОкноПечатнойФормы = Истина;
    Возврат;
КонецПопытки;

FilePDF = ПолучитьИмяВременногоФайла("pdf"); 
FileDOC = ПолучитьИмяВременногоФайла("docx"); 

MSWordApp = ПечатнаяФорма.COMСоединение;
MSWordApp.Application.Selection.Collapse();

// Восстановить вид просмотра документа.
Если ПечатнаяФорма.Свойство("ViewType") Тогда
    MSWordApp.Application.ActiveWindow.View.Type = ПечатнаяФорма.ViewType;
КонецЕсли;

MSWordApp.Application.Visible = Истина;
MSWordApp.Activate();

WordDocument = MSWordApp.Application.Documents(1);
WordDocument.SaveAs(FilePDF, 17);
WordDocument.Close(0);

MSWordApp.Application.Quit(); 

УдалитьФайлы(FileDOC);
УправлениеПечатьюКлиент.ОчиститьСсылки(ПечатнаяФорма, ЗакрытьОкноПечатнойФормы);
УправлениеПечатьюКлиент.ОчиститьСсылки(Макет);

ОписаниеОповещения = Новый ОписаниеОповещения();    

НачатьЗапускПриложения(ОписаниеОповещения, FilePDF,);   
КонецПроцедуры

Ну и вуаля — все готово.

Вообще весь код в статье, он мой рабочий, шаблон ворда — изготовите сами на 5 мин, ну а если нужно готовое — качайте готовое с Инфостарта https://infostart.ru/public/1753205/ (если есть стартмани конечно)

Источник

Word для Microsoft 365 Word для Интернета Word 2021 Word 2019 Word 2016 Word 2013 Word 2010 Word 2007 Word Starter 2010 Еще…Меньше

Перед печатью можно просмотреть документ и указать, какие страницы требуется напечатать.

Предварительный просмотр документа

Выберите Файл > Печать.
Для предварительного просмотра каждой страницы используйте стрелки вперед и назад в нижней части страницы.

Если текст отображается слишком мелко, увеличьте масштаб с помощью ползунка в нижней части страницы.
Выберите количество копий и любые другие нужные параметры, а затем нажмите кнопку Печать.

Выберите Файл > Печать.
Чтобы напечатать только определенные страницы, свойства документа или исправления и комментарии, в разделе Параметры выберите стрелку рядом с пунктом Напечатать все страницы (по умолчанию), чтобы просмотреть все варианты.
Чтобы напечатать только определенные страницы, выполните одно из указанных ниже действий.
- Чтобы напечатать страницу, отображаемую в режиме предварительного просмотра, выберите Текущая страница.
- Чтобы напечатать последовательные страницы, например 1–3, выберите вариант Настраиваемая печать и введите номера первой и последней страниц в поле Страницы.
- Чтобы напечатать отдельные страницы и диапазон одновременно (например, страницу 3 и страницы 4–6), выберите Настраиваемая печать и введите через запятую номера и диапазоны (например, 3, 4-6).

Примечание: Если принтер, который вы выбрали в разделе Принтер, поддерживает цветную, черно-белую печать и печать с использованием оттенков серого, соответствующие параметры появятся в списке в разделе Настройка.

Выберите Файл > Печать.
В разделе Параметры выберите параметр цветной печати и любые другие нужные параметры, а затем нажмите кнопку Печать.

Откройте документ, который содержит примечания. Если параметр примечаний не отображается, откройте вкладку Рецензирование, щелкните элемент Показать исправления и выберите в списке только пункт Примечания.

Вы можете напечатать примечания определенного рецензента, выбрав его в разделе Конкретные пользователи.
Выберите Файл > Печать.
В разделе Настройка щелкните Напечатать исправления.
Нажмите Печать.

Документ с примечаниями будет распечатан.

Примечание: Если вы хотите напечатать документ без примечаний, откройте вкладку Рецензирование, в группе Запись исправлений выберите Без исправлений и отправьте документ на печать.

Печать в Word в Интернете может показаться немного запутанной. Это вызвано тем, что для сохранения макета и форматирования сначала создается PDF-файл, который затем можно распечатать.

Примечание: Если вы используете Internet Explorer в Windows версии 7 и более ранней, для печати документа нужно скачать и установить бесплатное приложение Adobe Reader.

Печать документа

На вкладке Файл выберите пункт Печать и нажмите кнопку Печать.
Примечания:
- Если вы находитесь в режиме чтения, нажмите кнопку Печать в верхней части экрана.
Word в Интернете создает копию документа в формате PDF.
Выберите Щелкните здесь, чтобы просмотреть документ в формате PDF для предварительного просмотра PDF.

Совет: Если в качестве средства просмотра PDF-файлов по умолчанию используется Word, отмените задание печати Word в Интернете, откройте документ в Word (Редактировать документ > Изменить в Word) и распечатайте его из Word (Файл > Печать).
Печать документа:
- В Windows 7 выберите принтер, при необходимости измените параметры и нажмите кнопку Печать.
- В Windows 8 в приложении «Средство просмотра» проведите от нижнего края экрана вверх (или щелкните правой кнопкой мыши в любом месте) и выберите Печать. На странице «Печать» выберите принтер, задайте нужные параметры и нажмите кнопку Печать.
- В Windows 10 в приложении «Ридер» проведите от нижнего края экрана вверх (или щелкните правой кнопкой мыши в любом месте) и выберите Печать. На странице «Печать» выберите принтер, задайте нужные параметры и нажмите кнопку Печать.

Если вы хотите распечатать несколько экземпляров, измените число копий на странице «Печать»:

В Windows 7 и более ранних версиях в верхней части страницы «Печать» есть поле Копии со стрелками вверх и вниз, позволяющее выбрать количество копий документа. Введите нужное число или выберите его с помощью стрелок, а затем нажмите кнопку Печать.
В Windows 8 или Windows 10 введите нужное число копий или выберите его с помощью кнопок + и –, а затем нажмите кнопку Печать.

На вкладке Файл нажмите Печать.
В разделе Настройка выберите параметр цветной печати и другие нужные параметры, а затем нажмите кнопку Печать.

Дополнительные сведения

Черно-белая печать
Веб-сайт производителя принтера (где можно найти обновленные драйверы для принтера)
Форумы сообщества Microsoft 365
Учебник: проблемы с принтером в Windows

Нужна дополнительная помощь?

Источник

Сейчас я покажу на простом примере вы можете быстро создать круглую печать в Микрософт Word. Как создать прямоугольный штамп показывать не буду, поскольку это ещё проще. В процессе будут использованы обычные ранее изученные средства Ворд, но несколько иначе.

Чтобы при чтении статьи возникало меньше вопросов, крайне рекомендую предварительно прочитать про общие принципы работы с картинками и другими нетекстовыми объектами в Word. Дело в том, что при создании печатей это тоже пригодится.

Также стоит заметить, что данная статья предназначена не для того, чтобы вы научились делать «липовые» печати при помощи распространённой офисной программы. Это просто демонстрация возможностей. Кстати, иногда требуется нанести на документ факсимильную подпись или печать в 1С, причём там для этого есть стандартный функционал.

Пример созданной в Ворд круглой печати

Результат всех операций приведён ниже в виде рисунка. Созданная «печать», конечно, является очень примитивной, но принцип демонстрирует. Напоминаю, что если вы хотите сделать что-то сложнее, то и времени нужно затратить куда больше, причём самостоятельно. Не следует надеяться, что в интернете есть именно то, что вам нужно — о последствиях такого отношения к работе я уже говорил раньше.

[нажмите на картинку для увеличения]

Справка: как сохранять фото с сайтов

Любая круглая печать имеет ободок, текст по кругу, текст или картинку в центре. Здесь возможные варианты, один из которых и приведён на картинке. Сделать это просто, но стоит учесть одну особенность.

Основные затруднения при создании круглой печати в Word

Основная «сложность» при создании круглой печати в Word заключается в том, что вы не знаете как сделать текст по кругу. Именно из-за этого и полезли в интернет для решения такой примитивной задачи. Угадал? Скорее всего именно так.

Говорит это только о плохом знании Word, больше ни о чём. Посмотрим, как сделать текст по кругу и всё прочее.

Делаем круглую печать в Word самостоятельно

Как сделать ободок и картинку в центре я пояснять не буду. Это автофигура и обычная картинка из внешнего файла — тут всё просто. А вот изогнутый текст делается с помощью свойств объекта Надпись. Для начала добавляем надпись на лист и пишем внутри текст. Писать лучше сразу весь текст, по крайней мере тот, что образует один круг внутри «печати». Это всё потому, что кривизну текста так настраивать удобнее.

Далее выделяем Надпись и в меню Лента открываем появившуюся вкладку Формат, ищем там «Текстовые эффекты», а в них — «преобразовать / круг». Вот, собственно, и весь фокус с искривлённым по кругу текстом. Там же при желании можно выбрать любой тип искажения текста.

Если выбран вариант искажения «круг», то нужно потом ещё подобрать размер надписи и шрифта таким образом, чтобы кривизна текста совпадала с кривизной ободка «печати», иначе текст не будет идти ровно вдоль ободка, а будет уходить в сторону. Всё остальные операции ясны и без комментариев.

Подведём итоги

Вот таким способом можно создать круглую печать в Word. Стоит заметить, что при печати на чёрно-белом принтере все цвета преобразуются в градации серого. Также вместо лазерного принтера для печатей лучше использовать струйный (вспомните почему?) или выполнить печать в файл и отнести его туда, где есть цветной принтер.

Также ещё раз напоминаю, что это всего лишь демонстрация возможностей программы. Ещё стоит заметить, что существуют специальные программы для создания круглых картинок (не обязательно штампов/печатей, но принцип похож) — использовать их гораздо удобнее (например, есть программа для печати на CD/DVD дисках). Опять же в программе 1С есть нанесение печатей на документы.

Просьба не обращаться к нам с предложениями сделать печать, штамп или иные работы за вознаграждение. Мы не занимаемся подобной деятельностью.

Уникальная метка публикации: 038C20E2-D64C-E139-666E-C3EB69325815
Источник: //artemvm.info/information/uchebnye-stati/microsoft-office/kak-sozdat-pechat-ili-shtamp-v-word/

Источник