Dalam catatan ini, kami akan menunjukkan kepada anda 3 cara untuk memasukkan senarai kandungan ke dalam dokumen Word anda dengan cepat.
Semasa membaca dokumen di Word, anda boleh menggunakan jadual kandungan atau panel navigasi untuk membantu anda melihat kandungan dengan cepat. Namun ketika mencetak, panel navigasi tidak dapat dicetak bersama dengan dokumen. Tetapi, yang pertama tidak. Oleh itu, perlu memasukkan senarai isi ke dalam dokumen Word, terutama yang panjang. Berikut adalah 3 kaedah berkesan.
Kaedah 1: Masukkan Jadual Kandungan Secara Manual
- Pertama, letakkan kursor di tempat di mana anda mahu jadual kandungan berjalan. Klik tab "Rujukan" kemudian arahan "Jadual Kandungan".
- Seterusnya pilih "Masukkan Jadual Kandungan".

- Dalam kotak dialog terbuka, siapkan konfigurasi yang anda perlukan, seperti "Show level".
- Klik "OK".
Biasanya, kita meletakkan senarai kandungan pada halaman pertama dokumen. Jika anda pernah memasukkan nombor halaman sebelum ini, anda akan mendapati dokumen utama kini bermula pada halaman 2. Maka beginilah keadaannya. Sesetengah orang mahu halaman dokumen utama bermula pada halaman 1 seperti biasa manakala senarai kandungan dikecualikan daripada penomboran halaman. Untuk melakukan ini, anda memerlukan operasi tambahan. Baca artikel ini untuk arahan terperinci: Cara Memulakan Penomboran Halaman dari Halaman Tertentu dalam Word Anda
Dan ingatlah untuk mengemas kini senarai kandungan anda setelah semua penyesuaian.
Kaedah 2: Jalankan Makro Word
Seperti yang anda lihat, cara manual untuk memasukkan daftar isi agak meletihkan, dengan masalah seperti menetapkan semula nombor halaman. Atas sebab ini, kami mengesyorkan anda menggunakan kaedah makro untuk memenuhi tugas ini. Dengan makro, anda dapat melakukan keseluruhan proses secara automatik dalam beberapa saat.
- Pertama sekali, tekan "Ctrl+ Home" untuk pergi ke permulaan dokumen.
- Kemudian tekan "Alt + F11" untuk mencetuskan editor VBA.
- Klik seterusnya pada "Normal" dan kemudian "Insert".
- Pilih "Modul" dan klik dua kali padanya untuk membuka kawasan penyuntingan.
- Kemudian tampal kod berikut di sana:
Sub InsertTOC()
Selection.InsertBreak Type:=wdSectionBreakNextPage
Selection.HomeKey Unit:=wdStory
With ActiveDocument
.TablesOfContents.Add Range:=Selection.Range, RightAlignPageNumbers:= _
True, UseHeadingStyles:=True, UpperHeadingLevel:=1, _
LowerHeadingLevel:=9, IncludePageNumbers:=True, AddedStyles:="", _
UseHyperlinks:=True, HidePageNumbersInWeb:=True, UseOutlineLevels:= _True
.TablesOfContents(1).TabLeader = wdTabLeaderDots
.TablesOfContents.Format = wdIndexIndent
End With
ActiveDocument.Sections(1).PageSetup.DifferentFirstPageHeaderFooter = True
With ActiveDocument.Sections(2)
.Footers(wdHeaderFooterPrimary).LinkToPrevious = False
.Footers(wdHeaderFooterPrimary).PageNumbers.RestartNumberingAtSection = True
.Footers(wdHeaderFooterPrimary).PageNumbers.StartingNumber = 1
End With
ActiveDocument.TablesOfContents(1).Update
End Sub
- Akhir sekali, klik "Jalankan".
Selepas menjalankan makro, senarai kandungan yang baru dimasukkan akan diletakkan di halaman pertama dan penomboran halaman bermula di halaman kedua. Selain itu, senarai kandungan telah dikemas kini.
Kaedah 3: Masukkan Jadual Kandungan ke dalam Beberapa Dokumen
Sekiranya anda menyukai kemudahan pemprosesan kumpulan, anda menggunakan makro berikut:
Sub InsertTOCForMultiDoc()
Dim objDoc As Document
Dim strFile As String, strFolder As String
' Initialization
strFolder = "C:\Users\Public\Documents\New folder\Test1\"
strFile = Dir(strFolder & "*.docx", vbNormal)
' Precess each document in the folder.
While strFile <> ""
Set objDoc = Documents.Open(FileName:=strFolder & strFile)
Selection.InsertBreak Type:=wdSectionBreakNextPage
Selection.HomeKey Unit:=wdStory
With ActiveDocument
.TablesOfContents.Add Range:=Selection.Range, RightAlignPageNumbers:= _
True, UseHeadingStyles:=True, UpperHeadingLevel:=1, _
LowerHeadingLevel:=9, IncludePageNumbers:=True, AddedStyles:="", _
UseHyperlinks:=True, HidePageNumbersInWeb:=True, UseOutlineLevels:= _
True.TablesOfContents(1).TabLeader = wdTabLeaderDots
.TablesOfContents.Format = wdIndexIndent
End With
ActiveDocument.Sections(1).PageSetup.DifferentFirstPageHeaderFooter = True
With ActiveDocument.Sections(2)
.Footers(wdHeaderFooterPrimary).LinkToPrevious = False
.Footers(wdHeaderFooterPrimary).PageNumbers.RestartNumberingAtSection = True
.Footers(wdHeaderFooterPrimary).PageNumbers.StartingNumber = 1
End With
ActiveDocument.TablesOfContents(1).Update
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
Ikuti langkah yang sama dalam kaedah 2 untuk memasang dan menjalankan makro.
Nota
- Anda mesti menyusun semua dokumen di bawah direktori yang sama terlebih dahulu.
- Jangan lupa untuk mengganti "C: \ Users \ Public \ Documents \ New folder \ Test1 \" dengan folder folder sebenar anda. Jangan lupa “\” terakhir.
Membaiki Alat untuk Word
Oleh kerana Word akan tiba-tiba hancur, adalah mustahak untuk menyediakan alat untuk membaiki Word dan dokumen Word. Pemulihan yang tepat pada masanya dapat memperoleh sebanyak mungkin data. Oleh itu, adalah dinasihatkan untuk mendapatkan produk yang mahir terlebih dahulu.
Pengenalan Pengarang:
Vera Chen adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk Pembaikan Excel dan pdf membaiki produk perisian. Untuk maklumat lebih lanjut, lawati www.datanumen.com



