Объединение нескольких документов 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

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

Access 2010: построение связей между таблицами базы данных

Access 2010: построение связей между таблицами базы данных

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

MS Access 2010: запрос с функцией IFF

MS Access 2010: запрос с функцией IFF

В MS Access функция IIF возвращает одно значение, если указанное условие имеет значение ИСТИНА, или другое значение, если оно имеет значение ЛОЖЬ. Функция IIF

Диаграммы и графики Office Excel 2010

Диаграммы и графики Office Excel 2010

Диаграммы и графики — отличный способ представления данных. Microsoft Excel 2010 предлагает практически все типы диаграмм и упрощает их построение.

Интервалы в Microsoft Word 2010

Интервалы в Microsoft Word 2010

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

Экспорт/импорт параметров ленты и панели быстрого доступа [Office 2010]

Экспорт/импорт параметров ленты и панели быстрого доступа [Office 2010]

Пакет приложений Microsoft Office обеспечивает самый простой способ настройки ленты, вкладок и панели быстрого доступа, но что делать, если вам нужно установить новую копию

Access 2010: экспорт таблицы базы данных в Excel 2010

Access 2010: экспорт таблицы базы данных в Excel 2010

Выполнять различные операции в Access не так-то просто, поскольку СУБД (система управления реляционными базами данных) требует особого синтаксиса и ограничений.

Удалить скрытые метаданные и элементы из документа Word

Удалить скрытые метаданные и элементы из документа Word

Почти каждый документ содержит такую ​​информацию, как: скрытый текст, информация об объекте, личная информация (идентифицирующая информация: имя автора) и др.

Сравнительная гистограмма в Excel 2010

Сравнительная гистограмма в Excel 2010

Диаграммы — одна из самых важных функций Excel, но иногда их нужно использовать по-другому. Мы попробуем создать сравнительную гистограмму.

Объединение электронных таблиц с помощью консолидации данных в Excel 2010

Объединение электронных таблиц с помощью консолидации данных в Excel 2010

Мы обычно храним данные в нескольких рабочих листах, чтобы проверять данные для каждого экземпляра и просматривать их по отдельности, но было бы здорово объединить все