Petua: Bahasa lain diterjemahkan Google. Anda boleh melawat English versi pautan ini.
Log masuk
x
or
x
x
Daftar Sekarang
x

or

Bagaimana untuk menyimpan semasa atau setiap halaman sebagai dokumen Word berasingan?

Jika terdapat banyak halaman dalam dokumen Word anda, sekarang, anda hanya perlu menyimpan satu halaman semasa sebagai fail Word baru. Biasanya, anda boleh menyalin dan menyisipkan data halaman semasa ke fail Word yang baru dan kemudian menyimpannya. Tetapi, dalam artikel ini saya akan bercakap mengenai bagaimana untuk menyimpan semasa atau setiap halaman sebagai dokumen berasingan dari fail Word.

Simpan halaman semasa sebagai dokumen Word baru dengan kod VBA

Simpan setiap halaman sebagai dokumen Word berasingan dengan Kutools untuk Word


Simpan setiap halaman dokumen Word ke dalam fail berasingan:

dengan Kutools untuk Word's Split ciri, anda boleh menyimpan dokumen Word yang besar dengan cepat ke beberapa fail berasingan berdasarkan Heading1, rehat halaman, pecahan bahagian dan halaman.

kata pembahagi doc setiap halaman n 9

Kutools untuk Word: dengan lebih daripada 100 Word add-in berguna, bebas untuk mencuba tanpa had pada hari 60. Klik untuk Muat turun dan percubaan percuma Sekarang!


Simpan halaman semasa sebagai dokumen Word baru dengan kod VBA

Kod VBA berikut boleh membantu anda menyimpan kandungan halaman semasa ke dalam fail Word baru, sila lakukan seperti ini:

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi tingkap.

2. Klik Memasukkan > Modul, dan tampal kod berikut dalam Tetingkap Modul.

Kod VBA: Simpan halaman semasa sebagai dokumen Word baru:

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. Kemudian, tekan F5 kunci untuk menjalankan kod ini, dalam kotak dialog yang muncul, sila masukkan nama untuk fail baru, lihat tangkapan skrin:

doc menyelamatkan halaman semasa 1

4. Kemudian, klik OK butang, dan dalam tetingkap kedua muncul, sila pilih folder untuk mengeluarkan fail baru, lihat tangkapan skrin:

doc menyelamatkan halaman semasa 2

5. Klik OK butang, kandungan halaman semasa telah disimpan sebagai fail Word baru, anda boleh pergi ke folder untuk melihat hasilnya.


Simpan setiap halaman sebagai dokumen Word berasingan dengan Kutools untuk Word

Jika anda mahu menyimpan setiap halaman keseluruhan dokumen sebagai fail berasingan, maka Kutools untuk Word'S Split fungsi boleh memberi anda nikmat.

Kutools untuk Word : dengan lebih daripada 100 Word add-in berguna, bebas untuk mencuba tanpa had pada hari 60.

Selepas memasang Kutools untuk Word, sila lakukan dengan langkah berikut:

1. Klik Enterprise > Split, lihat tangkapan skrin:

doc menyelamatkan halaman semasa 3

2. Di dalam Dokumen Split kotak dialog:

(1.) Klik doc menyelamatkan halaman semasa 5 butang untuk memilih folder untuk mengeluarkan fail baru;

(2.) Dan kemudian pilih Page daripada Berpecah oleh senarai jatuh.

doc menyelamatkan halaman semasa 4

3. Selepas menamatkan tetapan, klik OK butang untuk memulakan pemisahan, dan kemudian, semua halaman dalam dokumen Word telah disimpan sebagai fail berasingan dalam folder tertentu seperti tangkapan skrin berikut:

doc menyelamatkan halaman semasa 6

Klik untuk memuat turun Kutools untuk Word dan percubaan percuma sekarang!

Alat produktiviti Word yang disyorkan

shot kutools perkataan kutools tab 1180x121
shot kutools perkataan kutools plus tab 1180x120

Kutools For Word - Lebih Daripada Ciri-ciri Lanjutan 100 Untuk Microsoft Word, Simpan 50% Time anda

  • Operasi yang rumit dan berulang boleh dilakukan pemprosesan satu kali dalam beberapa saat.
  • Sisipkan beberapa imej merentas folder ke dalam dokumen Word sekaligus.
  • Gabungkan dan menggabungkan beberapa fail Word merentas folder ke dalam satu dengan pesanan yang anda inginkan.
  • Pisah dokumen semasa ke dalam dokumen berasingan mengikut tajuk 1, pecahan bahagian atau kriteria lain.
  • Tukar fail antara Doc dan Docx, Docx dan PDF, koleksi alat untuk penukaran dan pilihan biasa, dan sebagainya...
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.