Как разбить word на несколько файлов

Содержание

Как разбить word на несколько файлов

Разделить файл word на два и больше

Есть задача — из одного файла Word создать несколько с задаваемыми названиями.
В принципе решение уже есть готовое — web-страница , только автор требует что-то там перечислить ему на счет.
Кто-нибудь решал такие задачки?

не совсем понятна постановка задачи. Требуется создать два-три файла из вордовского документа — почему бы не сделать это руками?

требуется создать по 10-12 файлов из 89 файлов (т.е. из каждого желательно с использованием стилей (заголовки) или просто меток
руками начинал — здох.

дык берешь и макрос фигачишь в ворде.

опиши задачу четко, я тебе код на vba дам

Ок.
Есть текст в ворде, предварительно подготовленный — с использованием стиля «заголовок-2» текст структурирован на разделы.
Требуется создать из каждого файла столько файлов, сколько этих заголовков с соотв. названиями — название исходного файла плюс заголовок из первичного файла, причем желательно сохранить все эти файлы в папку с названием исходного файла.
P.S. макросы писать я умею на уровне «изменить имеющееся», так что если мне дадут болванку, я уж с ней справлюсь.

выложи какой-нибудь пример

я сейчас на работе, не смогу выложить..
Пример:
Валовой региональный продукт
бла-бла-бла
создает файлы в той-же директории где лежит документ, есть две недоработки (лишний перевод строки в новых файлах + не обрабатывает последний «блок»).
Рабочий пример —
удачи
P.S. доработать предлагаю самому, что не ясно спрашивай

спасибо!
реально помог.
пять я тебе уже ставил, так что поставьте за меня кто-нибудь!

как заставить макрос в normal.dot работать? и на кнопку в панели или сочетание клавиш навесить? А то в шаблон копируется текст макроса, но на выполнение его никак не пустить

все, разобрался — настройкакомандамакросы
Теперь ищу, как в имя создаваемых файлов добавить имя папки, в которой хранится исходный файл

если захочешь помудрить, то вычленить имя папки из пути можно в одну строку (тоже самое, только запутанней выглядит)

P.S при перемещении кода в шаблон Normal, макрос SplitDocByHStype не будет работать должным образом, так как ThisDocument указывает на контекст кода, т.е. на шаблон Normal.dot, в этом конретном случае достаточно поменять ThisDocument на ActiveDocument, в общем случае лучше явно использовать нужный объект:

можно итоговый код запостить?
я никак не могу разобраться с GetFolderName, да и с Normal.dot тоже не все понятно.
Еще вопрос — если в тексте есть всякие разметки типа графиков, таблиц, разрывов страниц, то этот макрос падает. Можно вылечить?

редакция вторая. копирует картинки, таблицы, . далее не проверял

P.S. работающий пример, там же
P.S2 если код помещать в normal.dot, то With ThisDocument нужно заменить на With ActiveDocument

супер!
то что надо! вот еще разберусь как переменную вставить в текст )
p.s. это что за агрегат такой в примере?

Вот что у меня в итоге получилось (из шаблона normal.dot):

я добавил сохранение в формате htm для удобства последующего слияния файлов и вставку в начало результирующих файлов названия папки
Вопрос — как заставить word2000 сохранять в формате архива mht? wdFormatwebarchive он не распознает, работает только в Word XP
респект `у!

Читать еще:  Функция if в word

Как упростить расформирование одного большого документа Microsoft Word в отдельные файлы

Чтобы сохранить определённую часть текста внутри Microsoft Word в отдельном документе, не нужно знать никаких хитростей, касающихся работы с этим текстовым редактором. Просто выделяем блоком эту часть текста, копируем её в одном документе и вставляем в другом. Затем сохраняем новый DOCX-файл. Но что делать, если речь идёт о большом исходном документе? И нужно провести долгую, монотонную работу по его расформированию. Можно ли как-то упростить ручной труд по выделению разделов, подразделов или просто произвольных отрывков документа Microsoft Word в отдельные файлы? Не во многом, но можно. Ниже рассмотрим несколько таких способов.

В нашем случае имеем увесистый, тяжело открываемый Word-документ на почти что 150 тыс. слов. Он структурирован разделами и подразделами, и его необходимо расформировать на мелкие документы, содержащие текст отдельных подзаголовков. Проводить работу будем в среде Word актуальной версии пакета Microsoft Office 2016. Действия в старших версиях текстового редактора – 2010 и 2013 – будут аналогичны, каких-то принципиальных отличий в предлагаемых ниже операциях нет.

Чтобы было удобно расформировывать участки документа в отдельные файлы, клавишами Ctrl+F включаем панель навигации и для отображения структуры переключаемся на вкладку панели «Заголовки».

1. Быстрая установка блока выделения на раздел или подраздел документа

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

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

2. Сохранение разделов или подразделов документа в PDF

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

В Windows 10 в качестве принтера выбираем «Microsoft Print to PDF» – штатный PDF-принтер этой версии системы.

Называем и сохраняем файл.

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

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

В Windows 8.1 и 7 эта процедура проделывается таким же образом. Однако в этих версиях системы штатного PDF-принтера нет, и прежде его необходимо установить. Делается это с помощью сторонних программ, например, BullZip PDF Printer, PDFCreator, doPDF и т.п.

3. Макрос копирования и вставки текста в новый документ

Если расформировываемый документ не имеет структуры разделов, можно либо её сформировать, либо оставить всё как есть, и ставить блоки выделения вручную. Но даже в последнем случае какую-то часть работы всё равно можно автоматизировать. Копирование или вырезание из исходного документа текста и его вставку в новый Word-файл можно поручить макросам. А их задействование наряду с быстрой установкой блока на целый раздел (подраздел) и вовсе минимизирует труды.

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

Запускаем параметры центра управления безопасностью.

Далее отправляемся во вкладку «Вид» и кликаем «Запись макроса». В появившемся небольшом окошке записи макроса выбираем вариант его задействования в будущем – кнопка на панели быстрого доступа или горячие клавиши – и жмём «Ок».

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

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

казалось бы трудно, но вроде все просто

Поиск по этому блогу

Страницы

Как разделить файл Word на отдельные файлы

Как разделить файл Word на отдельные файлы

Привет, уважаемые читатели. Если у вас есть большой документ, который вам нужно разделить, то давайте узнаем, есть ли какой-нибудь способ его поделить на отдельные файлы. Для этого мы воспользуемся возможностями Visual Basic Application для Ворда. Эта программа использует специальные код, которые диктуют Ворду, что нужно сделать. Итак, приступим.

Скрипт, который разделит файл в местах-маркерах

Прежде, чем запускать этот код, нужно подготовить документ к разделению на отдельные файлы.

В тех местах, где файл Word будет разделен на несколько отдельных файлов, мы расставим маркеры в виде «///». Это скажет VBA, что в тех местах, где он встретит /// он поймет, что ему нужно будет дальнейшую часть сохранить в новый файл Word. Смотрите на скриншот, где я отметил маркером то место, где я хочу, чтобы был разделен документ.

Этот знак ставится в английской раскладке!

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

Читать еще:  Как вставить многостраничный pdf в word

В конце документа разделяющий маркер ставить нет смысла, иначе VBA создаст просто пустой файл Word.

Шаг 1.

В окне Ворда нажмите на сочетание клавиш ALT + F11 для запуска Visual Basic Application.

Шаг 2.

В меню «Insert» — «Module». Теперь скопируйте код скрипта (его вы встретите ниже) и вставьте его в окне VBA.

Шаг 3.

Запустите выполнение кода, нажав F5 на клавиатуре, либо на панели на зеленый треугольник.

Этот VBA код разделит документ на отдельные файлы в тех местах, где были установлены маркеры. Выделите его левой кнопкой мыши и скопируйте (правой кнопкой мыши — Копировать).

А вот результат разделения документа Ворд на отдельные файлы:

Скрипт, который разделит документ постранично

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

Этот код VBA разделит файл Word постранично, и каждую страницу сохранит в отдельные файлы. Выделите его левой кнопкой мыши и скопируйте (правой кнопкой мыши — Копировать).

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

Как разбить файл на отдельные файлы по одной странице

Страницы 1

Чтобы отправить ответ, вы должны войти или зарегистрироваться

Сообщений [ 21 ]

1 Тема от POLYARikSPb 19.05.2015 09:10:22

  • POLYARikSPb
  • рядовой
  • Неактивен
  • Зарегистрирован: 11.11.2013
  • Сообщений: 7

Тема: Как разбить файл на отдельные файлы по одной странице

Здравствуйте. Есть срочная необходимость разбить файл Word (состоящий из N-листов, например 10) на отдельные файлы, состоящие из 1 листа каждый. Подскажите пожалуйста, как решить такую «задачку»? Спасибо.

2 Ответ от Alex_Gur 19.05.2015 09:58:14

  • Alex_Gur
  • Модератор
  • Неактивен
  • Откуда: Москва
  • Зарегистрирован: 28.07.2011
  • Сообщений: 2,758
  • Поблагодарили: 492
  • За сообщение: 1

Re: Как разбить файл на отдельные файлы по одной странице

Посмотрите, пожалуйста, здесь:
http://wordexpert.ru/forum/viewtopic.php?id=2633
Мы как раз сейчас обсуждаем особенности программной работы со страницами.

3 Ответ от POLYARikSPb 19.05.2015 14:00:13

  • POLYARikSPb
  • рядовой
  • Неактивен
  • Зарегистрирован: 11.11.2013
  • Сообщений: 7

Re: Как разбить файл на отдельные файлы по одной странице

Спасибо, посмотрел Вашу ссылку, но не нашел ответа на свой вопрос. Может кто еще, что подскажет в решении данной задачки.

4 Ответ от Alex_Gur 19.05.2015 14:10:49

  • Alex_Gur
  • Модератор
  • Неактивен
  • Откуда: Москва
  • Зарегистрирован: 28.07.2011
  • Сообщений: 2,758
  • Поблагодарили: 492

Re: Как разбить файл на отдельные файлы по одной странице

Алгоритм макроса может быть такой: Вы выделяете первую страницу, копируете ее, открываете новый документ, вставляете страницу в новый документ, сохраняете его под соответствующим именем и так далее со всеми страницами.
Напишете сами такой макрос?

5 Ответ от POLYARikSPb 19.05.2015 15:00:12

  • POLYARikSPb
  • рядовой
  • Неактивен
  • Зарегистрирован: 11.11.2013
  • Сообщений: 7

Re: Как разбить файл на отдельные файлы по одной странице

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

6 Ответ от Alex_Gur 19.05.2015 15:03:27

  • Alex_Gur
  • Модератор
  • Неактивен
  • Откуда: Москва
  • Зарегистрирован: 28.07.2011
  • Сообщений: 2,758
  • Поблагодарили: 492

Re: Как разбить файл на отдельные файлы по одной странице

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

Попробую, если меня не обгонят другие эксперты.
Сейчас много работы.

7 Ответ от POLYARikSPb 19.05.2015 15:23:50

  • POLYARikSPb
  • рядовой
  • Неактивен
  • Зарегистрирован: 11.11.2013
  • Сообщений: 7

Re: Как разбить файл на отдельные файлы по одной странице

ОК, буду с нетерпением ждать

8 Ответ от Alex_Gur 19.05.2015 15:41:36

  • Alex_Gur
  • Модератор
  • Неактивен
  • Откуда: Москва
  • Зарегистрирован: 28.07.2011
  • Сообщений: 2,758
  • Поблагодарили: 492

Re: Как разбить файл на отдельные файлы по одной странице

Выложите, пожалуйста, пример файла, к которому нужно применить такой макрос.

9 Ответ от POLYARikSPb 19.05.2015 16:06:58

  • POLYARikSPb
  • рядовой
  • Неактивен
  • Зарегистрирован: 11.11.2013
  • Сообщений: 7

Re: Как разбить файл на отдельные файлы по одной странице

Бланк уставок ШЭ2607 081_205 Л-111.doc 1005 Кб, 8 скачиваний с 2015-05-19

You don’t have the permssions to download the attachments of this post.

10 Ответ от Alex_Gur 19.05.2015 16:47:57

  • Alex_Gur
  • Модератор
  • Неактивен
  • Откуда: Москва
  • Зарегистрирован: 28.07.2011
  • Сообщений: 2,758
  • Поблагодарили: 492

Re: Как разбить файл на отдельные файлы по одной странице

Получилось что-то такое:

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

11 Ответ от Alex_Gur 19.05.2015 16:54:23

  • Alex_Gur
  • Модератор
  • Неактивен
  • Откуда: Москва
  • Зарегистрирован: 28.07.2011
  • Сообщений: 2,758
  • Поблагодарили: 492

Re: Как разбить файл на отдельные файлы по одной странице

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

doc.zip 508.46 Кб, 7 скачиваний с 2015-05-19

You don’t have the permssions to download the attachments of this post.

12 Ответ от POLYARikSPb 19.05.2015 22:09:46

  • POLYARikSPb
  • рядовой
  • Неактивен
  • Зарегистрирован: 11.11.2013
  • Сообщений: 7

Re: Как разбить файл на отдельные файлы по одной странице

Спасибо, вроде работает

13 Ответ от Boris_R 20.05.2015 00:26:06

  • Boris_R
  • полковник
  • Неактивен
  • Зарегистрирован: 07.08.2012
  • Сообщений: 233
  • Поблагодарили: 110

Re: Как разбить файл на отдельные файлы по одной странице

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

Читать еще:  При отправке на печать word зависает

PDF_split.7z 415.23 Кб, 3 скачиваний с 2015-05-20

You don’t have the permssions to download the attachments of this post.

14 Ответ от POLYARikSPb 20.05.2015 08:38:04

  • POLYARikSPb
  • рядовой
  • Неактивен
  • Зарегистрирован: 11.11.2013
  • Сообщений: 7

Re: Как разбить файл на отдельные файлы по одной странице

Спасибо за овет. Этот способ я и сам знаю. Задача состоит именно в разбивке на листы ворд. В дальнейшем, которые нужно вставлять в автокад по-странично, так как при вставке файла ворд (состоящего из N-листов) вставляется только первый лист ворда. Вставлять в автокад в пдф формате мне не нужно.

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

15 Ответ от azur 07.09.2018 07:26:31

  • azur
  • сержант
  • Неактивен
  • Зарегистрирован: 06.08.2011
  • Сообщений: 26

Re: Как разбить файл на отдельные файлы по одной странице

Приветствую!
Помогите, пожалуйста, решить пару проблем.
1) При работе найденного на просторах инета макроса после разбиения word-документа на отдельные документы в них добавляется вторая пустая страница?
Что в макросе подкрутить, чтобы пустая страница не добавлялась?

—————
2. Ещё вопрос.
Планируется сделать паспорта ПК. Очень много.
Инфа из экселя сливается в word-форму через поля слияния (получается длинная простыня на много страниц), а вышеприведённым макросом разрезается на файлы и сохраняется. НО появились неудобство.
Документов после разбиения будет за 350 штук. Вышеприведённый макрос сохраняет нарезанные документы по шаблону «Название_исходного_файла+Номер«. Придётся каждый файл открывать, копировать и/н ПК, закрывать, переименовывать файл . Есть большое желание, чтобы макрос перед сохранением «заглядывал в определённое место в сохраняемом документе, брал с оттуда текст и присваивал этот текст как имя сохраняемого документа (инвентарный номер ПК).
Подскажите, как это сделать?

16 Ответ от Fck_This 07.09.2018 11:41:29

  • Fck_This
  • генерал-полковник
  • Неактивен
  • Откуда: Минск, Беларусь
  • Зарегистрирован: 13.07.2016
  • Сообщений: 648
  • Поблагодарили: 97
  • За сообщение: 1

Re: Как разбить файл на отдельные файлы по одной странице

Приветствую!
Помогите, пожалуйста, решить пару проблем.
1) При работе найденного на просторах инета макроса после разбиения word-документа на отдельные документы в них добавляется вторая пустая страница?
Что в макросе подкрутить, чтобы пустая страница не добавлялась?

—————
2. Ещё вопрос.
Планируется сделать паспорта ПК. Очень много.
Инфа из экселя сливается в word-форму через поля слияния (получается длинная простыня на много страниц), а вышеприведённым макросом разрезается на файлы и сохраняется. НО появились неудобство.
Документов после разбиения будет за 350 штук. Вышеприведённый макрос сохраняет нарезанные документы по шаблону «Название_исходного_файла+Номер«. Придётся каждый файл открывать, копировать и/н ПК, закрывать, переименовывать файл . Есть большое желание, чтобы макрос перед сохранением «заглядывал в определённое место в сохраняемом документе, брал с оттуда текст и присваивал этот текст как имя сохраняемого документа (инвентарный номер ПК).
Подскажите, как это сделать?

Как разделить файл Word на отдельные файлы

Привет, уважаемые читатели. Если у вас есть большой документ, который вам нужно разделить, то давайте узнаем, есть ли какой-нибудь способ его поделить на отдельные файлы. Для этого мы воспользуемся возможностями Visual Basic Application для Ворда. Эта программа использует специальные код, которые диктуют Ворду, что нужно сделать. Итак, приступим.

Скрипт, который разделит файл в местах-маркерах

Прежде, чем запускать этот код, нужно подготовить документ к разделению на отдельные файлы.

В тех местах, где файл Word будет разделен на несколько отдельных файлов, мы расставим маркеры в виде «///». Это скажет VBA, что в тех местах, где он встретит /// он поймет, что ему нужно будет дальнейшую часть сохранить в новый файл Word. Смотрите на скриншот, где я отметил маркером то место, где я хочу, чтобы был разделен документ.

Этот знак ставится в английской раскладке!

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

В конце документа разделяющий маркер ставить нет смысла, иначе VBA создаст просто пустой файл Word.

Шаг 1.

В окне Ворда нажмите на сочетание клавиш ALT + F11 для запуска Visual Basic Application.

Шаг 2.

В меню «Insert» — «Module». Теперь скопируйте код скрипта (его вы встретите ниже) и вставьте его в окне VBA.

Шаг 3.

Запустите выполнение кода, нажав F5 на клавиатуре, либо на панели на зеленый треугольник.

Этот VBA код разделит документ на отдельные файлы в тех местах, где были установлены маркеры. Выделите его левой кнопкой мыши и скопируйте (правой кнопкой мыши — Копировать).

А вот результат разделения документа Ворд на отдельные файлы:

Скрипт, который разделит документ постранично

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

Этот код VBA разделит файл Word постранично, и каждую страницу сохранит в отдельные файлы. Выделите его левой кнопкой мыши и скопируйте (правой кнопкой мыши — Копировать).

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

IT Новости из мира ПК
Добавить комментарий