Объединение нескольких документов Word 2010

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

Для начала вам нужно поместить их в одну папку и убедиться, что все они принадлежат одной версии Word: Doc или Docx. Как видно на скриншоте ниже, мы открыли два документа, которые будут объединены.

Объединение нескольких документов Word 2010

Теперь откройте любой документ Word и сохраните его как документ с поддержкой макросов. Для этого перейдите в меню «Файл» и нажмите « Сохранить как».

Объединение нескольких документов Word 2010

Появится диалоговое окно, в котором в поле «Тип файла» выберите «Шаблон Word с поддержкой макросов» и нажмите «Сохранить».

Объединение нескольких документов Word 2010

Мы будем использовать редактор VB, поэтому сначала нужно сделать вкладку «Разработчик» видимой в окне Word. Если вкладка «Разработчик» не отображается , перейдите в меню «Файл» , выберите «Параметры» и в левой панели выберите «Настроить ленту» . В правой панели установите флажок «Разработчик» . Нажмите «ОК», чтобы вкладка «Разработчик» появилась на ленте.

Объединение нескольких документов Word 2010

Теперь перейдите на вкладку Разработчик и нажмите Visual Basic.

Объединение нескольких документов Word 2010

Откроется диалоговое окно редактора VB. В левой боковой панели дважды щёлкните по ThisDocument, чтобы открыть окно редактирования VB. Справа вы увидите окно кода. Теперь вставьте в него следующие строки кода.

Примечание: Не забудьте изменить путь к папке, где находятся документы, и версию документов Word в этих строках кода. Для упрощения работы мы также добавили эту меру предосторожности перед кодами.

Подраздел MergeDocs()

Dim rng As Range

Dim MainDoc As Document

Dim strFile As String

Const strFolder = “C:\Users\Usman Javaid\Desktop\Word documents\” ||| (Измените путь к папке, где находятся ваши документы)

Установить MainDoc = Documents.Add

strFile = Dir$(strFolder & “*.docx”) ||| (Измените расширение файла на .doc, если вы работаете с версией Word 97-03)

Выполнять до тех пор, пока strFile = “”

Установить rng = MainDoc.Range

rng.Collapse wdCollapseEnd

rng.InsertFile strFolder & strFile

strFile = Dir$()

Петля

Конечный перевод

Объединение нескольких документов Word 2010

Теперь нажмите Ctrl+S , чтобы сохранить добавленный макрос, и закройте редактор VB. Перейдите на вкладку «Разработчик» и нажмите «Макросы».

Объединение нескольких документов Word 2010

В диалоговом окне «Макросы» выберите макрос MergeDocs и нажмите «Выполнить» .

Объединение нескольких документов Word 2010

Если вы правильно указали путь и версию, то все документы будут объединены и открыты в новом документе.

Объединение нескольких документов Word 2010

Вы также можете ознакомиться с нашими ранее рассмотренными руководствами по возврату к последней отредактированной строке в Word 2010 и использованию функции слияния в Word 2010 .

[через Гэблера ]

Leave a Comment

Word 2010: Вставить номер строки в документ

Word 2010: Вставить номер строки в документ

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

Скрыть текст в Microsoft Word 2010/2007

Скрыть текст в Microsoft Word 2010/2007

Word 2007 Redaction Tool — это бесплатная надстройка для Microsoft Word 2010 и 2007, которая позволяет скрыть любой текст в документе. Под «Redact» подразумевается цензурирование.

Word 2010: изменение цвета шрифта с помощью градиентной заливки

Word 2010: изменение цвета шрифта с помощью градиентной заливки

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

Функция Excel 2010 PMT (платеж)

Функция Excel 2010 PMT (платеж)

Функция Excel Payment (PMT) чрезвычайно полезна, когда вам нужно узнать сумму ежемесячного платежа по полному погашению займа/кредита. Она фактически оценивает

Обновление Microsoft Office Starter 2010

Обновление Microsoft Office Starter 2010

После выпуска Office 2010 Starter компания Microsoft будет искать больше клиентов, желающих перейти с Starter на финальную версию или обновить ее. Похоже,

Excel 2010: Функция обратной матрицы (МОБР)

Excel 2010: Функция обратной матрицы (МОБР)

Ранее мы рассмотрели, как вычислить определитель матрицы. Теперь сосредоточимся на том, как найти обратную матрицу, которая, в основном,

Microsoft Office Publisher 2010: что нового?

Microsoft Office Publisher 2010: что нового?

Microsoft Office Publisher — известное приложение от Microsoft, позволяющее создавать брошюры, открытки, информационные бюллетени, веб-сайты, электронные письма и многое другое.

Исправление MathType в Office Word 2010: замена редактора формул

Исправление MathType в Office Word 2010: замена редактора формул

MathType — довольно популярная надстройка для пакета MS Office, используемая тысячами корпоративных пользователей. Это мощный редактор формул, добавляющий математические функции.

Применение стилистических наборов шрифтов и лигатур в Word 2010

Применение стилистических наборов шрифтов и лигатур в Word 2010

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

Инспектор документов Microsoft Office 2010

Инспектор документов Microsoft Office 2010

Функция «Инспектор документов» в Office позволяет проверять документ на наличие скрытых свойств и личных данных. Функция совместного редактирования