Как копировать с 1с в ворд

Как выгружать данные из 1С в Excel: как правильно перенести и скопировать документы, файлы и таблицы в Эксель

Почти каждому офисному работнику нужно знать, как выгружать из 1С в Excel. Работа многих из них основывается на взаимосвязи этих приложений, желательно понимать, как переносить информацию из одной в другую и обратно. На платформе предусмотрены механизмы, которые упрощают и облегчают процесс. Достаточно 1 раз запомнить, как это делается, чтобы потом повторять его. Удобство заключается в том, что полученные таблицы и базы можно редактировать, показывать поставщикам и распечатывать в любом количестве. Ниже — подробные инструкции, как правильно перемещать требуемые данные в документы.

Как из 1С выгрузить таблицу или файлы в Эксель (Excel)

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

Метод 1: Берем каждую ячейку отдельно

1. выделить требуемую строчку;

1. кликнуть на нее ПКМ;
2. выбрать пункт «копирование» или набрать «Ctrl+C»;
3. открыть лист Excel или документ другого формата, куда необходимо вставить символы;

1. кнопки «Ctrl+V» или через правую клавишу найти строку «сохранить как текст» — иногда выглядит как пиктограмма «А».

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

Единственный минус в том, что этот способ подойдет, только если требуется отправить что-то в ячейку. Если планируется транслировать массивы, стоит попробовать действовать иначе.

Метод 2: вставляем список в заранее подготовленный Excel

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

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

1. Запустить меню, найти строку «вывести».
2. Появится небольшое окно, в котором производится настройка. Там есть подпункт «выводить в» и два варианта — табличный или текстовый документ. Изначально стоит первый вид, он хорошо подходит для отправки в Эксель.
3. В блоке с названием «Выводить колонки» необходимо определиться, что придется послать в строчное пространство. Если в планах — перенести все содержимое, то здесь тоже ничего менять не надо. Если предстоит конвертировать отдельные столбцы, то с лишних снимаем галочку.
4. После выполнения всех настроек кликнуть на «Ок».

1. На экране отобразится перечень в таблицы. Чтобы отправить его в готовый файл, желательно выделить в нем левой кнопкой мыши нужную область и нажать правую клавишу. В высветившемся меню найти «Копировать». Для упрощения процесса советуем пользоваться стандартным «Ctrl+c».

1. Раскрыть лист, в котором выделяется верхняя левая строчка. Начиная оттуда начнется перечень. Затем — пункт «Вставить» на панели во вкладке «Главная».

1. Готово. Перенос обязательных данных из неудобного 1С в подходящий для модификаций и анализа Excel завершен.

Метод 3: оформляем отдельный новый документ

Еще один способ — сразу выслать в созданный для этих целей док. Для этого следует выполнить все шаги, что изучали выше, до момента форматирования списка.

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

• файл — при наведении на него система покажет комментарий с подсказкой;

• сохранить как — после этого придется решать между разными форматами.

Можно пойти другим путем. Кликнуть на «Сохранить» — выглядит как дискета в панели 1С. Она всегда находится в верхнем углу (доступно для ПО после обновления). Запустить окно сохранения легко с помощью «Ctrl+s».

Появляется нужное окошко. Следует перейти в то место, где необходимо сохранить книгу.

Важно выбрать правильный тип документа. Изначально всегда предлагается хранить и загружать базу в формате (*.xls), но это неудобно. В выпадающем перечне стоит другой вариант — «Лист Excel (*.xls)». Есть и совсем старые разновидности, но у них минимальный набор функционала, поэтому мы не рекомендуем их задействовать. Когда все настройки подобраны, можно сохранять изменения и получить номенклатуру в виде перечня в новой книге.

Метод 4: копируем диапазон

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

Как из стандартизированного 1С перенести таблицу в Эксель:

1. Выделите нужную область. Следует зажать Shift и кликнуть на те строки, которые необходимо перенести. Нажать на «все действия» и отыскать подпункт «вывести список».

1. Запустите окошко. Все настройки возьмем из предыдущих способов. Главное — не забыть поставить галочку напротив параметра «только выделенные». Позже — ищем «ок».

1. Программа соберет только выделенные столбцы. Затем действуем по пунктам из 2 или 3 способа.

Метод 5: можно ли из 1С выгрузить документ в привычном уже формате Excel и сохранить

Иногда требуется не просто скопировать список или область, а целые файлы — накладные, фактуры, платежные поручения. Большинству пользователей проще заниматься редактированием прямо в Эксель, к тому же в таблицах не страшно вносить изменения, легче печатать. Можно даже очистить автозаполнение и пользоваться бланком для оформления вручную.

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

• Откроется форма предварительного просмотра. Но нужно его не распечатывать, а конвертировать. Поэтому нажимаем на «сохранить», если версия 8.3. Для более старых модификаций есть сочетание клавиш «ctrl+s».

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

Форматы переноса данных любого вида и размера из 1С в удобный Эксель

В этой программе 5 частых видов:

• mxl — специально созданный для возможности сохранять сразу в формате таблицы, даже сбрасывать в базы на других компьютерах;
• xls — стандартный тип;
• txt — текстовый, вся информация в блокноте;
• pdf — подойдет, если планируется работать с разновидностями Adobe Reader;
• html — веб-формат, используется для размещения на странице в интернете.

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

На огромных объемах табличных строчек они размещаются на разных листах для удобной обработки.

Помните, что максимальное количество строк зависит от версии Екселя:

• до 97 — предел 16 000;
• 97-2003 — до 65 000;
• от 2007 — не больше 1 048 000.

Как сделать выгрузку клиентов или отчетов из 1С в Excel программным путем

Для продвинутых пользователей есть более сложные варианты произвести быстрое сохранение отдельных областей на компьютер. Сделать это можно 2 основными способами, о которых мы поговорим ниже.

Метод 1: вызываем сохранение таблицы

У каждого табличного документа имеется функция «записать», среди параметров которого есть тип файла. Следует выбрать заполнение табличного пространства, кликнуть на «записать».

Метод 2: задействуем механизм Excel.Aplication

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

Всю документацию по этому объекту можно найти на официальном сайте Microsoft. Для записи в нужной последовательности и формате пишут простейший код. Из всех инструментов ПО непосредственно к копированию информации относится строчка:

КнигаЭксель = Новый СОМОбъект

Как вывести данные из 1С и перенести их в Excel: способы выгрузки из 1C

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

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

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

Как выгрузить из 1С любые понадобившиеся данные ячейки по товару или по созданному ранее справочнику в 1C в Excel (Эксель)

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

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

В более старых версиях программы достаточно просто щелкнуть ПКМ и найти там тот же пункт про вывод.

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

Как сделать выгрузку из 1С 8 в Эксель (Excel) большого количества данных

Перенос крупных баз практически ничем не отличается от копирования небольших списков. Чтобы не допустить ошибок вида «недостаточно памяти на клиенте» и сократить потраченное на процесс время, нужно пользоваться таким способом:

• создать книгу, в которую будут складываться все для будущего анализа;

• начать выгрузку через команды — кликнуть на «записать ТабДок»;

• указать путь к созданному пространству;

• выбрать формат, в котором будет храниться и редактироваться информация.

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

Как из «1С: Предприятие» выгрузить печатные формы документов или файлов в Excel

Это еще один метод, который подходит в большинстве случаев. Сначала открываем нужную вариацию накладной или акта в формате окна перед печатью.

Затем — ткнуть «ctrl+s». Появится диалоговое окошко, где предстоит придумать имя для будущего табличного пространства и его подвид.

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

Пользоваться можно всеми основными форматами — word, html, и другими, о которых мы говорили выше. Как сохранить накладную из жесткого 1С в подходящий для редактирования Excel — вызвать меню, подготовить название и пройти по короткому пути извлечения строк из программы.

Как отправить базу целиком (в файл .dt)

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

После этого — открыть подпункт «администрирование». Следующий шаг — выбор опции «выгрузка информационной базы».

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

Выгрузка из 1С в Excel отчетности и ее форм для комфортной печати

Сделать это достаточно просто, ведь практически все в программе имеет печатные формы. А сохранение начинается из этого поля.

Чтобы собрать информацию из платежного поручения, действуем по шагам:

• кликнуть на него;
• найти в верхнем поле пиктограмму принтера;

• появится страница предпросмотра, на которой необходимо найти дискету или другой значок, указывающий на хранение;

• нажать на «сохранить»;
• на экран выведется окно, в котором следует указать путь для сохранения будущего файла;

• ниже — выбор формата, в рамках которого будет содержаться информация;
• по надобности — поставить галочки на дополнительную упаковку в архив и транслитерацию имен;
• подтвердить свои действия нажатием на кнопку.

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

Как скопировать и вывести таблицу или данные любого объема в доступный для редактирования Эксель (Excel) — для версии 1С 8.3

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

Например, для анализа отбираются все поступления от конкретного производителя, которые были выполнены более чем на 1500 рублей.

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

На экране вы увидете бумаги к выдаче. Здесь следует запросить контекстное меню правой кнопкой мыши или с помощью функции «действия». В появившемся поле ищем пункт «вывести».

Система покажет, что есть 2 варианта отображения — текстовый формат и табличный. Вам пригодится последний. Через программу информация появится в отдельном окошке, из которого его реально отправлять в нужном виде через сохранение.

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

Мы рассмотрели, как выгрузить любые данные отчета или акта с 1с в более подходящий для анализа Эксель (Excel) из любых папок, что требуется сделать, чтобы получилось сохранить их в виде таблицы или книги. Изучили, как правильно переносить печатные формы, какие комбинации клавиш для этого необходимы и без чего не обойтись. Есть разные способы транслировать цифры и строчки в табличное пространство. Достаточно попробовать сделать один раз и запомнить, чтобы потом свободно повторять те же действия.

Количество показов: 54246

Статьи по схожей тематике

Кассовый аппарат на рынке и ярмарках: нужны ли ККТ для уличной торговли

ЭКЛЗ: что это такое в кассовом аппарате, как и зачем используется защищенная электронная контрольная лента

Онлайн-касса для интернет-магазина: какую ККМ лучше выбрать, регистрация кассового оборудования

Чек коррекции: когда используется, как выглядит и как сделать его на онлайн-кассе — инструкция

Ошибка ФН 235 на кассе АТОЛ: что это такое, и как ее исправить на ККМ

1С: подключение — инструкция по настройке электронного документооборота, как правильно подключить клиента

Проверка ТТН ЕГАИС: как правильно проверить накладную по идентификационному номеру

Установка 1С: как правильно установить платформу на компьютер, пошаговая инструкция по настройке

Подписаться на новости

117105, г. Москва, Варшавское шоссе, д. 37А
Отдел продаж: +7 (495) 662 98-03
sales@cleverence.ru

Пн-пт: с 07-00 до 19-00

Как копировать с 1с в ворд

4
Под выгрузкой в ворд подразумевается что есть документ в 1с 8 конфигурация УПП, нужно выгрузить данные этого документа в ворд

(5) все-равно не понятно
объясняй на пальцах, и на конкретном примере
Ну табличную то часть можно же выгрузить, или нужны все реквизиты?
Сделай нужный макет,сформируй печ форму и сохранив формате ВОРД

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

(8) похоже это будет слишком сложно.

(9) печатная форма документа есть? тогда в ней выделить всё что нужно, копировать и вставить в ворд. возможно кривовато получится, но попробовать стоит (:

э..эх, наверняка не поможет, а вдруг:

Процедура КнопкаВыполнитьНажатие(Кнопка)
Перем ИмяФайла;

Для Каждого СтрокаСписка Из СписокРаботников Цикл

//№ 1528 от 19.10.2005 г.
НомерДоговора = СокрЛП(УбратьНулиИзНомера(СтрокаСписка.ТрудовойДоговор.Номер));
НомерДатаДоговора = » » + НомерДоговора + » от » + Формат(СтрокаСписка.ТрудовойДоговор.Дата,»ДФ=dd.MM.yyyy»»г.»»»);

ФИО = ИмяФайла;
ФИОРодительный = омЕТС.Падеж(ФИО);
ФИОТворительный = омЕТС.Падеж(ФИО,5);

ДолжностьИменительный = СтрокаСписка.Должность.Наименование;
ПодразделениеРодительный = СтрокаСписка.Подразделение.ПадежР;

ДолжностьИменительный = НРег(Лев(ДолжностьИменительный,1)) + Сред(ДолжностьИменительный,2);
ПодразделениеРодительный = НРег(Лев(ПодразделениеРодительный,1)) + Сред(ПодразделениеРодительный,2);

Если Не ЗначениеЗаполнено(ПодразделениеРодительный) Тогда
ПодразделениеРодительный = омЕТС.ПадежП(СтрокаСписка.Подразделение.Наименование,2);
КонецЕсли;

АдресПоРегистрации = СокрЛП(СтрокаСписка.АдресРегистрации);
АресФактический = СокрЛП(СтрокаСписка.АдресФактический);

// Заменить заранее определенные ключевые конструкции на требуемый текст.
//Execute(FindText1, MatchCase2, MatchWholeWord3, MatchWildcards4, MatchSoundsLike5, MatchAllWordForms6, Forward7, Wrap8, Format9, ReplaceWith10, Replace11, MatchKashida12, MatchDiacritics13, MatchAlefHamza14, MatchControl15)
Замена.Execute(«>», Ложь, Истина, Ложь, , , Истина, , Ложь, НомерДатаДоговора,2);
Замена.Execute(«>», Ложь, Истина, Ложь, , , Истина, , Ложь, ФИОРодительный,2);
Замена.Execute(«>», Ложь, Истина, Ложь, , , Истина, , Ложь, ФИОТворительный,2);
Замена.Execute(«>», Ложь, Истина, Ложь, , , Истина, , Ложь, ДолжностьИменительный,2);
Замена.Execute(«>», Ложь, Истина, Ложь, , , Истина, , Ложь, ПодразделениеРодительный,2);
Замена.Execute(«>», Ложь, Истина, Ложь, , , Истина, , Ложь, ФИО,2);
Замена.Execute(«>», Ложь, Истина, Ложь, , , Истина, , Ложь, Паспорт,2);
Замена.Execute(«>», Ложь, Истина, Ложь, , , Истина, , Ложь, АдресПоРегистрации,2);
Замена.Execute(«>», Ложь, Истина, Ложь, , , Истина, , Ложь, АресФактический,2);

КомОбъект.SaveAS(КаталогСохраненияФайлов + «\» + ИмяФайла + «.doc»);
//КомОбъект.Application.Quit();

суть — в макет кладешь готовый шаблон докмуента, и заполняешь его заменой «ключевых слов»

Рассказали как сделать! Вот, посмотрите

Word = Новый COMОбъект(«Word.Application»);
Word.Documents.Add(«D:\Documents and Settings\Aton\Рабочий стол\Комаров на постоянную работу.doc»);
Документ=Word.ActiveDocument;
ЗначениеВЗакладку(Документ,»Антон»,123);
Документ.Save();
КонецПроцедуры

Процедура ЗначениеВЗакладку(Документ,Закладка,Значение) Экспорт
Попытка
Документ.Bookmarks(СокрЛП(Закладка)).Select();
Значение=СокрЛП(Значение);
Документ.Application.Selection.TypeText(Значение);
Исключение
Сообщить(«Не найдена закладка! «+Закладка,СтатусСообщения.Важное);
Сообщить(ОписаниеОшибки(),СтатусСообщения.Важное);
КонецПопытки;
КонецПроцедуры // ЗначениеВЗакладку()

(0) а если серьезно, то найди какую-нить универсальную внешнюю обработку по печати документов (есть на ИТС, и в инете много подобного добра). Потом распечатай свой документ в xml или txt формате, а уж оттуда в Ворд перетянуть — пара секунд (см. (12)).

(14) дык, если работает, то и пользуйся!

Можно и без шаблона:

Попытка
scr = СоздатьОбъект(«MSScriptControl.ScriptControl»);
scr.language = «vbscript»;
WordApp = scr.eval(«CreateObject(«»Word.Application»»)»);
Исключение
Попытка
WordApp = СоздатьОбъект(«Word.Application»);
Исключение
Сообщить(«Не удалось открыть Word. » + ОписаниеОшибки());
Возврат;
КонецПопытки;
КонецПопытки;

Selection.ParagraphFormat.Alignment = wdAlignParagraphRight;
Selection.Font.Size = 11;
Selection.Font.Italic = xlTrue;
Selection.TypeText(«Приложение №1»);
Selection.TypeParagraph();

Selection.Font.Italic = xlFalse;
Selection.TypeText(«к Договору о перечислении денежных средств»);
Selection.TypeParagraph();

//Selection.TypeText(«от «»____»»________________ 2007 г. № MOUR»);
MOUR = «от «»____»»________________ 2007 г. № MOUR»;
Если спФирм.ТекущаяСтрока() > 0 Тогда
Зн = спФирм.ПолучитьЗначение(спФирм.ТекущаяСтрока());
Если ПустоеЗначение(Зн) = 0 Тогда
MOUR = Зн.Получить(«MOUR»);
КонецЕсли;
КонецЕсли; //»Если ПустоеЗначение(спФирм.ТекущаяСтрока()) > 0 Тогда
Selection.TypeText(MOUR);

Selection.TypeParagraph();
Selection.TypeParagraph();
Selection.TypeParagraph();

Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter;
Selection.Font.Bold = xlTrue;
Selection.TypeText(«Реестр №________»);
Selection.TypeParagraph();
Selection.TypeParagraph();

Selection.TypeText(«для зачисления денежных средств Работникам»);
Selection.TypeParagraph();

НазваниеФирмы = «_____________________________________________________________»;
Если спФирм.ТекущаяСтрока() > 0 Тогда
Зн = спФирм.ПолучитьЗначение(спФирм.ТекущаяСтрока());
Если ПустоеЗначение(Зн) = 0 Тогда
НазваниеФирмы = Зн.Получить(«Наименование»);
КонецЕсли;
КонецЕсли; //»Если ПустоеЗначение(спФирм.ТекущаяСтрока()) > 0 Тогда
Selection.TypeText(НазваниеФирмы);
Selection.TypeParagraph();

Selection.Font.Size = 10;
Selection.Font.Italic = xlTrue;
Selection.Font.Superscript = xlTrue;
Selection.TypeText(«(наименование Клиента — юридического лица, ФИО индивидуального предпринимателя)»);
Selection.Font.Superscript = xlFalse;
Selection.TypeParagraph();

Selection.Font.Italic = xlFalse;
Selection.Font.Size = 11;
Selection.TypeText(«в ОАО «»АЛЬФА-БАНК»» (ИНН хххххх БИК ххххххх к/с № ххххххххххххххххх»);
Selection.TypeParagraph();
Selection.TypeText(«в ОПЕРУ Московского ГТУ Банка России)»);
Selection.TypeParagraph();

Selection.TypeText(«за _________________ 200 ___ года»);
Selection.TypeParagraph();

Selection.TypeText(«согласно платежному поручению № _______ от «»____»» _______________ 200__ года»);
Selection.TypeParagraph();
Selection.TypeParagraph();
Selection.TypeParagraph();
Selection.TypeParagraph();

Selection.ParagraphFormat.Alignment = wdAlignParagraphRight;
Selection.TypeText(«»»___»» ____________ 200__ год»);
Selection.TypeParagraph();
Selection.TypeParagraph();
Selection.TypeParagraph();

Если СписокСотрудников.КоличествоСтрок() > 0 Тогда
Таб = Документ.Tables.Add(Selection.Range, СписокСотрудников.КоличествоСтрок() + 1, 4);
Иначе
Таб = Документ.Tables.Add(Selection.Range, 2, 4);
КонецЕсли; //»Если СписокСотрудников.КоличествоСтрок() > 0 Тогда

Таб.Columns.PreferredWidthType = wdPreferredWidthPoints;
Таб.Columns(1).PreferredWidth = WordApp.CentimetersToPoints(1.3);
Таб.Columns(2).PreferredWidth = WordApp.CentimetersToPoints(7);
Таб.Columns(3).PreferredWidth = WordApp.CentimetersToPoints(5);
Таб.Columns(4).PreferredWidth = WordApp.CentimetersToPoints(3);

Таб.Style = «Сетка таблицы»;
Таб.ApplyStyleHeadingRows = xlTrue;
Таб.ApplyStyleLastRow = xlTrue;
Таб.ApplyStyleFirstColumn = xlTrue;
Таб.ApplyStyleLastColumn = xlTrue;

Таб.Cell(1, 1).Range.Text = «№№»;
Таб.Cell(1, 1).Range.Font.Bold = xlTrue;

Таб.Cell(1, 2).Range.Text = «ФИО Работника»;
Таб.Cell(1, 2).Range.Font.Bold = xlTrue;

Таб.Cell(1, 3).Range.Text = «№ текущего счета в рублях»;
Таб.Cell(1, 3).Range.Font.Bold = xlTrue;

Таб.Cell(1, 4).Range.Text = «сумма перечислений»;
Таб.Cell(1, 4).Range.Font.Bold = xlTrue;

СписокСотрудников.ВыбратьСтроки();
Пока СписокСотрудников.ПолучитьСтроку() > 0 Цикл
НомерСтроки = СписокСотрудников.НомерСтроки + 1;
Таб.Cell(НомерСтроки, 1).Range.Text = Строка(СписокСотрудников.НомерСтроки);
Таб.Cell(НомерСтроки, 2).Range.Text = СокрЛП(СписокСотрудников.Сотрудник.Наименование);
Таб.Cell(НомерСтроки, 3).Range.Text = СписокСотрудников.НомерСчета;
Таб.Cell(НомерСтроки, 4).Range.Text = СписокСотрудников.Сумма;
КонецЦикла; //»Пока СписокСотрудников.ПолучитьСтроку() > 0 Цикл

Документ.Paragraphs.Last.Range.Select();
Selection = WordApp.Application.Selection;
Selection.TypeParagraph();

Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft;
Selection.TypeText(«Итого » + Табуляция + СокрЛП(СписокСотрудников.КоличествоСтрок()) + » количество перечислений,»);
Selection.TypeParagraph();
Selection.TypeText(Табуляция + СокрЛП(СписокСотрудников.КоличествоСтрок()) + » количество Работников,»);
Selection.TypeParagraph();
Selection.TypeText(Табуляция + СокрЛП(СписокСотрудников.Итог(«Сумма»)) + » общая сумма перечислений.»);
Selection.TypeParagraph();
Selection.TypeParagraph();
Selection.TypeParagraph();
Selection.TypeText(«Информационный файл прилагается.»);
Selection.TypeParagraph();
Selection.TypeParagraph();
//Selection.TypeText(«М.П.» + Табуляция + Табуляция + «__________________________» + Табуляция + «_______________/_______________________»);
Должность = «__________________________»;
Фамилия = «_______________________»;
Если спФирм.ТекущаяСтрока() > 0 Тогда
Зн = спФирм.ПолучитьЗначение(спФирм.ТекущаяСтрока());
Если ПустоеЗначение(Зн) = 0 Тогда
Должность = Зн.Получить(«Должность»);
Если СтрДлина(Должность) < 27 Тогда
Должность = Лев(Должность + «_____________________________», 27);
КонецЕсли;

Фамилия = Зн.Получить(«Фамилия»);
Если СтрДлина(Фамилия) < 22 Тогда
Фамилия = Лев(Фамилия + «_____________________________», 22);
КонецЕсли;
КонецЕсли;
КонецЕсли; //»Если ПустоеЗначение(спФирм.ТекущаяСтрока()) > 0 Тогда
Selection.TypeText(«М.П.» + Табуляция + Табуляция + Должность + Табуляция + «_______________/ » + Фамилия);
Selection.TypeParagraph();

Selection.Font.Superscript = xlTrue;
Selection.TypeText(Табуляция + Табуляция + » (должность руководителя Клиента)» + Табуляция + Табуляция + Табуляция + «(подпись)» + Табуляция + Табуляция + Табуляция + «(ФИО)»);
Selection.Font.Superscript = xlFalse;
Selection.TypeParagraph();
Selection.TypeParagraph();
Selection.TypeText(Табуляция + Табуляция + Табуляция + «Главный бухгалтер» + Табуляция + Табуляция + «_______________/_______________________»);
Selection.TypeParagraph();

Selection.Font.Superscript = xlTrue;
Selection.TypeText(Табуляция + Табуляция + Табуляция + Табуляция + Табуляция + Табуляция + Табуляция + Табуляция + «(подпись)» + Табуляция + Табуляция + Табуляция + «(ФИО)»);

ИмяФайла = СокрЛП(Путь);
Если Прав(Путь, 1) <> «\» Тогда
ИмяФайла = ИмяФайла + «\»;
КонецЕсли;

ИмяФайла = ИмяФайла + Формат(ТекущаяДата(),»ДГГГГММДД») + » » + СокрЛП(НазваниеФирмы) + «.doc»;
ИмяФайла = СтрЗаменить(ИмяФайла, «»»», «»);

Если ФС.СуществуетФайл(ИмяФайла) = 1 Тогда
Если Вопрос(«Перезаписать файл» + РазделительСтрок + «»»» + ИмяФайла + «»»?», «Да+Нет+Отмена», 30) <> «Да» Тогда
Попытка
Документ.Close(xlFalse);
WordApp.Quit();
Исключение
КонецПопытки;

КонецЕсли;
КонецЕсли; //»Если ФС.СуществуетФайл(ИмяФайла) = 1 Тогда

Сообщить(«Записан файл: » + ИмяФайла);

Попытка
Документ.Close(xlFalse);
WordApp.Quit();
Исключение
КонецПопытки;

Копировать страницу в word

Суть вопроса в следующем. Есть active document ворда. В документе есть таблица, которая занимает всю страницу. Есть выбора данных и в зависимости от количества строк в этой выборке мне необходимо скопировать эту таблицу на новую страницу, ну или скопировать всю страницу целиком. Помогите. Реализуемо ли такое вообще?

По теме из базы знаний

• Заполнение шаблонов в Word и Excel
• Печать в Word без COM объектов или печать в Word под Linux
• Перенос инструкций из word во встроенную справку 1С с сохранением картинок и форматирования
• Печать уведомлений по кадровому переводу в файл Word (например, перевод сотрудников на другой график или ставку)
• Учим БСП печатать активные ссылки и подложку в документе WORD

• Дата
• Дата
• Рейтинг всех уровней
• Рейтинг 1-го уровня
• Древо развёрнутое
• Древо свернутое

Свернуть все

2. protexprotex 125 21.02.18 19:07 Сейчас в теме

(1) Методы OLE-word документа используйте — реализуемо.

3. kild 89 21.02.18 20:56 Сейчас в теме

Обычным способом выводятся данные в таблицу
https://infostart.ru/public/65996/

4. Pavel Rodinchenko 22.02.18 06:34 Сейчас в теме

Спасибо всем. Уже разобрался. Буду у компьютера скину пример кода

5. Pavel Rodinchenko 22.02.18 09:21 Сейчас в теме

ДиапазонКопирования = ДокументВорд.goTo(1,1,2); НачалоДиапазонаКопирования = ДиапазонКопирования.start; ДиапазонКопирования = ДокументВорд.goTo(1,2,2); ДиапазонКопирования.start = НачалоДиапазонаКопирования; ДиапазонКопирования.copy(); ДиапазонВставки = ДокументВорд.goTo(1,1,2); ДиапазонВставки.PasteAndFormat(16);

Работа c форматом MS Word в 1С

В этой статье обсудим, как в 1С можно работать с форматом текста Word: создание, редактирование, копирование документов MS Word. Самый распространенный вариант использования программного заполнения документов MS Word – это заполнение шаблонов в ворде. То есть после создания шаблона word, пользователь помечает параметры квадратными скобками [] (это наиболее частый вариант экранирования параметров) или знаками больше меньше <>, после чего при нажатии кнопки «Печать Word» или «Сохранить Word» открывается заполненный документ MS Word. Большинству шаблонов, конечно, подойдут и табличные документы, но лично мною было создано множество шаблонов, которые требовали форматирования текстового документа именно в MS Word (чаще из-за удобства редактирования шаблона MS Word для пользователя). Это были договора, сертификаты, письма и различные заявления. Все они сохранялись в формат текста Word и в дальнейшем отправлялись по почте или уходили на печать.

2. Как работать программно с документами MS WORD (расширениями .doc и .docx)?

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

Рис. 1 Пример оформления документа word, который будет использован как шаблон
Получаем шаблон Word, например, из макета и сохраняем его во временный файл Word.

Рис. 2 Сохранение временного файла Word
Создаем Com-объект и сам документ Word, передавая в метод Add путь к ранее сохраненному шаблону.

Рис. 3 Программное создание COM-объекта и документа Word
Для заполнения параметров я использую структуру (или соответствие), ключ и значение. Имя ключа – это параметр замены, а значение – то, на которое меняем экранированный параметр.
В итоге параметры заполнения (структуру) мы размещаем где удобно, получаем ее и заполняем уже созданный документ MS Word.

Рис. 4 Определение параметров заполнения
С методом Find. Execute (Word) лучше всего ознакомится отдельно на официальном сайте Microsoft. Там же можно посмотреть описание и других методов, которые могут пригодится.
После замены разворачиваем окно и делаем его активным (то есть показываем пользователю заполненный шаблон MS word).

Рис. 5 Активация окна Word
И это – весь процесс заполнения шаблона 1С Word! Да, это так просто! Однако на моей практике встречались случаи, когда в шаблоне необходимо было заполнить табличную часть, например, приложение к договору со спецификацией. Здесь необходим отдельный блок кода и особенный шаблон.

3. Заполнение таблиц в программе Word

В шаблоне создаем одну строку с нужным форматированием. Получаем таблицу или выборку со значениями строк для заполнения их в документе MS Word. Заполнение таблицы в программе Word происходит по номеру строки и колонки, то есть мы точно должны знать нумерацию колонок (но можно подумать и о другом заполнении). Итак, получаем таблицу word по номеру и заполняем значениями.

Рис. 6 Заполнение таблицы в Word
В итоге скажу, что работа с Microsoft Word может быть на очень высоком уровне, но для этого необходимо изучить документацию от Microsoft по Word. И тогда в ворде из 1С можно будет творить настоящие чудеса (как собственно и в Excel)!
Специалист компании «Кодерлайн» Вадим Хоменко

Вас могут заинтересовать следующие статьи:

94 [PROP_CODE] => TAGS2 [TITLE] => Вас могут заинтересовать следующие семинары: ) —> 95 [PROP_CODE] => TAGS [TITLE] => Вас могут заинтересовать следующие вебинары: ) —>

Вас могут заинтересовать следующие вебинары:

1С: Конвертация данных [1] => Конвертация данных [2] => Программирование в 1С [3] => Как сделать в 1С [4] => 1С:Бухгалтерия [5] => Отчеты в 1С [6] => Обмен между базами [7] => Закрытие месяца [8] => 1С:Управление производственным предприятием [9] => 1С: Розница [10] => 1С: CRM [11] => Оценка задач [12] => СКД [13] => РСБУ [14] => Администрирование 1С [15] => Оптимизация [16] => 1С: ERP [17] => Моделирование [18] => Продажи [19] => 1С: Управление торговлей [20] => Бюджетирование [21] => HTTP [22] => Управление проектами [23] => MS SQL Server [24] => МСФО [25] => БУ [26] => Внедрение ERP [27] => com-объекты [28] => 1С: WMS Управление складом [29] => Перенос данных [30] => Торговое оборудование [31] => 1С: Сценарное тестирование [32] => 1С: Колледж [33] => Запросы 1С [34] => LINUX [35] => WEB [36] => Лицензии 1С [37] => 1С:Зарплата и Управление Персоналом [38] => 1С: Документооборот [39] => Excel [40] => ADO [41] => Транспортная логистика [42] => Внедрение [43] => Техническое задание [44] => Отчетность [45] => Ценообразование [46] => 1С:Комплексная автоматизация [47] => Производство [48] => Интеграция 1С [49] => Планирование [50] => Налоги [51] => Отпуск [52] => Полезные обработки [53] => Расширение конфигурации [54] => XML [55] => Word [56] => WEB-сервисы 1С [57] => Лизинг [58] => 1С:Управление нашей фирмой [59] => 1С:Управление корпоративными финансами [60] => 1С: Аренда и управление недвижимостью [61] => Правила обмена [62] => 1С: Платформа [63] => Финансовый учет ) —>