Перейти до основного матеріалу

Як зберегти поточну або кожну сторінку як окремий документ Word?

Якщо у вашому документі Word кілька сторінок, то зараз вам просто потрібно зберегти лише одну поточну сторінку як новий файл Word. Зазвичай ви можете скопіювати та вставити дані поточної сторінки в новий файл Word, а потім зберегти їх. Але в цій статті я розповім про те, як зберегти поточну або кожну сторінку як окремі документи з файлу Word.

Збережіть поточну сторінку як новий документ Word із кодом VBA

Збережіть кожну сторінку як окремі документи Word за допомогою Kutools для Word


Збережіть поточну сторінку як новий документ Word із кодом VBA

Наступний код VBA може допомогти вам зберегти поточний вміст сторінки у новий файл Word. Будь ласка, зробіть так:

1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. Клацання Insert > Модуліта вставте наступний код у вікно модуля.

Код VBA: Зберегти поточну сторінку як новий документ Word:

Sub SaveCurrentPageAsANewDoc()
    Dim xDoc As Document
    Dim xNewDoc As Document
    Dim xFileName As String
    Dim xFolderPath As Variant
    Dim xDlg As FileDialog
    Set xDoc = ActiveDocument
    xFileName = InputBox("Enter file name here: ", "KuTools for Word")
    If xFileName = "" Then Exit Sub
    Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
    If xDlg.Show = -1 Then
        xFolderPath = xDlg.SelectedItems(1)
        xDoc.Bookmarks("\Page").Range.Select
        Selection.Copy
        Set xNewDoc = Documents.Add
        Selection.Paste
        xNewDoc.SaveAs xFolderPath & "\" & xFileName & ".docx"
        xNewDoc.Close
    End If
End Sub

3. А потім натисніть F5 клавішу для запуску цього коду, у спливаючому діалоговому вікні введіть ім'я нового файлу, див. знімок екрана:

doc зберегти поточну сторінку 1

4. Потім натисніть кнопку OK , а у другому спливаючому вікні виберіть папку для виведення нового файлу, див. знімок екрана:

doc зберегти поточну сторінку 2

5. Клацання OK , поточний вміст сторінки було збережено як новий файл Word, ви можете перейти до папки, щоб переглянути результат.


Збережіть кожну сторінку як окремі документи Word за допомогою Kutools для Word

Якщо ви хочете зберегти кожну сторінку всього документа як окремі файли, файл Kutools для WordАвтора розщеплений функція може зробити вам послугу.

Kutools для Word : з більш ніж 100 зручними надбудовами Word, які можна спробувати без обмежень протягом 60 днів. 

після установки Kutools для Word, виконайте такі дії:

1. Клацання Kutools Plus > розщеплений, див. скріншот:

2, в Розділити документ діалогове вікно:

(1.) Виберіть сторінка від Розділено на випадаючий список;

(1.) Клацніть doc зберегти поточну сторінку 5 кнопка вибору папки для виведення нових файлів;

(2.) А потім вкажіть префікс для нових збережених файлів, як вам потрібно.

3. Після закінчення налаштувань натисніть OK , щоб розпочати розбиття, а потім усі сторінки документа Word були збережені як окремі файли у певній папці, як показано на наступному знімку екрана:

doc зберегти поточну сторінку 6

Натисніть, щоб завантажити Kutools для Word і безкоштовну пробну версію зараз!

Найкращі інструменти продуктивності офісу

Kutools для Word - Підніміть свій досвід Word із Over 100 Чудові особливості!

🤖 Kutools AI Assistant: змініть свій текст за допомогою ШІ - Створення вмісту  /  Переписати текст  /  Узагальнити документи  /  Звертайтеся за інформацією на основі Документа, все в Word

📘 Майстерність документів: Розділити сторінки  /  Об’єднати документи  /  Експортувати вибране в різні формати (PDF/TXT/DOC/HTML...)  /  Пакетне перетворення в PDF  /  Експортувати сторінки як зображення  /  Друк кількох файлів одночасно...

Редагування змісту: Пакетний пошук та заміна між кількома файлами  /  Змінити розмір усіх зображень  /  Транспонування рядків і стовпців таблиці  /  Перетворити таблицю в текст...

🧹 Очищення без зусиль: Змітати Зайві простори  /  Розбиття розділів  /  Усі заголовки  /  Текстові поля  /  Гіперпосилання  / Щоб отримати більше інструментів для видалення, відвідайте наш сайт Вилучити групу...

Творчі вставки: Вставити Роздільники тисяч  /  Прапорці  /  радіо кнопки  /  QR-код  /  Штрих-код  /  Таблиця діагональних ліній  /  Заголовок рівняння  /  Підпис зображення  /  Заголовок таблиці  /  Кілька зображень  / Дізнайтеся більше в Вставити групу...

???? Точність вибору: Точне визначення конкретні сторінки  /  Таблиці  /  форми  /  заголовок абзаців  / Покращте навігацію за допомогою більше Виберіть функції...

Покращення зірок: Швидка навігація до будь-якого місця  /  автоматичне вставлення повторюваного тексту  /  плавно перемикатися між вікнами документів  /  11 Інструменти перетворення...

👉 Хочете спробувати ці функції? Kutools для Word пропонує a 60-денна безкоштовна пробна версія, без обмежень! ????
 
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I am using Office 365. I think I did everything right to split doc in pages, tried several times, mas the splited page docs are not saved on destination foler.
This comment was minimized by the moderator on the site
Have downloaded Kutools , however do not have ENTERPRISE as an option. Only KUTOOLS and KUTOOLS PLUS, please advise how to activate Enterprise
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations