Word sənədinizə məzmun cədvəlini tez daxil etməyin 3 yolu

Bu yazıda sizə Word sənədinizə məzmun cədvəlini necə tez bir zamanda daxil etməyin 3 yolunu göstərəcəyik.

Word-də sənədi oxuyarkən məzmuna tez baxmaq üçün məzmun cədvəlindən və ya naviqasiya panelindən istifadə edə bilərsiniz. Yenə də çapa gəldikdə, naviqasiya paneli sənədlə birlikdə çap edilə bilməz. Ancaq birincisi edir. Buna görə də Word sənədinə məzmun cədvəlini, xüsusən də uzun sənədi daxil etmək lazımdır. Aşağıda 3 təsirli üsul var.

Metod 1: Mündəricat Cədvəlini əl ilə daxil edin

1. Əvvəlcə kursoru məzmun cədvəlinin getməsini istədiyiniz yerə qoyun. "İstinadlar" sekmesini, sonra "Mündəricat" əmrini basın.
2. Sonra "Mündəricilər cədvəlini daxil et" seçin.
3. Açılan dialoq qutusunda “Səviyyələri göstər” kimi konfiqurasiyaları istədiyiniz kimi qurun.
4. "OK" düyməsini basın.

Adətən, məzmun cədvəlini sənədin ilk səhifəsinə yerləşdiririk. Əgər əvvəllər səhifə nömrəsi daxil etmisinizsə, əsas sənədin indi 2-ci səhifədən başladığını görəcəksiniz. Vəziyyət belədir. Bəzi insanlar əsas sənəd səhifəsinin həmişəki kimi 1-ci səhifədən başlamasını, məzmun cədvəlinin isə səhifə nömrələməsindən çıxarılmasını istəyəcəklər. Bunu etmək üçün əlavə əməliyyatlara ehtiyacınız olacaq. Ətraflı təlimatlar üçün bu məqaləni oxuyun: Word-də müəyyən bir səhifədən səhifə nömrələməsinə necə başlamaq olar

Bütün düzəlişlərdən sonra məzmun cədvəlinizi yeniləməyi unutmayın.

Metod 2: Word Makronunu işə salın

Gördüyünüz kimi, məzmun cədvəlini daxil etməyin əl yolu səhifə nömrələrinin sıfırlanması kimi məsələlərlə bir qədər yorucudur. Bu səbəbdən bu tapşırığı yerinə yetirmək üçün makro üsulundan istifadə etməyi tövsiyə edirik. Makro ilə bütün prosesi avtomatik olaraq saniyələr ərzində yerinə yetirə bilərsiniz.

1. Əvvəlcə sənədin əvvəlinə keçmək üçün "Ctrl + Home" düymələrini basın.
2. Sonra VBA redaktorunu işə salmaq üçün “Alt+ F11” düyməsini basın.
3. Sonra "Normal" və sonra "Daxil et" düyməsini basın.
4. "Modul" seçin və redaktə sahəsini açmaq üçün üzərinə iki dəfə vurun.
5. Sonra aşağıdakı kodları ora yapışdırın:

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

6. Sonuncu, lakin ən azı, "Çalış" düyməsini basın.

Makrosu işə saldıqdan sonra, yeni daxil edilmiş məzmun cədvəli birinci səhifəyə yerləşdiriləcək və səhifə nömrələməsi ikinci səhifədən başlayacaq. Həmçinin, məzmun cədvəli artıq yenilənib.

Metod 3: Mündəricat Cədvəllərini Çox Sənədə daxil edin

Toplu emalın asanlığını bəyənirsinizsə, aşağıdakı makrodan istifadə edirsiniz:

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

Makronu quraşdırmaq və işə salmaq üçün 2-ci üsuldakı eyni addımları yerinə yetirin.

Qeydlər

1. Əvvəlcə bütün sənədləri eyni kataloqda yerləşdirməlisiniz.
2. “C:\Users\Public\Documents\New folder\Test1\” qovluğunu əsl qovluq yolunuzla əvəz etməyi heç vaxt unutmayın. Sonuncu “\” işarəsini unutma.

Word üçün təmir aləti

Word birdən-birə qəzaya uğrayacağı üçün alət hazırlamaq lazımdır Word təmiri və Word sənədləri. Vaxtında bərpa mümkün qədər çox məlumat əldə etməyə imkan verir. Buna görə də, əvvəlcədən peşəkar bir məhsul əldə etməyiniz məsləhətdir.

Müəllif Giriş:

Vera Çen məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc Excel düzəlişi və pdf proqram məhsullarının təmiri. Ətraflı məlumat üçün ziyarət edin www.datanumen.com