Сөздік құжатқа мазмұнын жылдам енгізудің 3 тәсілі

Word шешімдері Қыркүйек 28, 2025
Қазір бөлісу:

Бұл жазбада біз сізге Word құжатына мазмұн кестесін қалай тез енгізудің 3 жолын көрсетеміз.

Құжатты Word бағдарламасында оқып жатқанда, мазмұнды жылдам қарауға көмектесу үшін мазмұн кестесін немесе шарлау тақтасын пайдалануға болады. Басып шығару туралы айтатын болсақ, шарлау тақтасын құжатпен бірге басып шығару мүмкін емес. Бірақ, біріншісі жасайды. Сондықтан Word құжатына мазмұн кестесін енгізу қажет, әсіресе ұзақ. Төменде 3 тиімді әдіс көрсетілген.

1 -әдіс: Мазмұн кестесін қолмен енгізіңіз

  1. Алдымен курсорды мазмұн кестесі қалаған жерге қойыңыз. «Әдебиеттер» қойындысын, содан кейін «Мазмұны» пәрменін нұқыңыз.
  2. Содан кейін «Мазмұн кестесін енгізу» таңдаңыз.«Сілтемелер» -> «Мазмұны» -> «Мазмұнын енгізу» батырмасын басыңыз
  3. Ашылған тілқатысу терезесінде «Деңгейлерді көрсету» сияқты конфигурацияларды қажет етіп орнатыңыз.
  4. «OK» түймесін басыңыз.Конфигурацияны орнатыңыз-> «ОК» түймесін басыңыз.

Әдетте, біз мазмұн кестесін құжаттың бірінші бетіне орналастырамыз. Егер сіз бұрын бет нөмірін енгізген болсаңыз, негізгі құжат енді 2-беттен басталатынын көресіз. Міне, жағдай. Кейбір адамдар негізгі құжат бетінің әдеттегідей 1-беттен басталуын, ал мазмұн кестесінің бет нөмірлеуінен алынып тасталуын қалайды. Ол үшін сізге қосымша операциялар қажет болады. Толық нұсқаулар алу үшін осы мақаланы оқыңыз: Word бағдарламасындағы белгілі бір беттен бет нөмірлеуді қалай бастау керек

Барлық түзетулерден кейін мазмұн кестесін жаңартуды ұмытпаңыз.

2-әдіс: Word макросын іске қосыңыз

Көріп отырғаныңыздай, мазмұн кестесін енгізудің қолмен әдісі беттің нөмірлерін қалпына келтіру сияқты мәселелермен біраз шаршайды. Осы себепті сізге бұл тапсырманы орындау үшін макро әдісті қолдануды ұсынамыз. Макростың көмегімен сіз бүкіл процесті секундтарда автоматты түрде орындай аласыз.

  1. Алдымен құжаттың басына өту үшін «Ctrl+Home» пернелер тіркесімін басыңыз.
  2. Содан кейін VBA редакторын іске қосу үшін «Alt+ F11» пернелерін басыңыз.
  3. Содан кейін «Қалыпты», содан кейін «Кірістіру» түймесін басыңыз.
  4. «Модульді» таңдап, өңдеу аймағын ашу үшін оны екі рет нұқыңыз.«Қалыпты» -> «Кірістіру» -> «Модуль» батырмасын басыңыз
  5. Содан кейін келесі кодтарды қойыңыз:
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
  1. Соңғысы, бірақ ең азы емес, «Іске қосу» түймесін басыңыз.Кодтарды қою -> «Іске қосу» батырмасын басыңыз

Макросты іске қосқаннан кейін, жаңадан енгізілген мазмұн кестесі бірінші бетке қойылады, ал бет нөмірлеуі екінші беттен басталады. Сондай-ақ, мазмұн кестесі жаңартылған.Макросты іске қосудың әсері

3 -әдіс: Мазмұн кестелерін бірнеше құжаттарға енгізу

Егер сізге пакеттік өңдеудің жеңілдігі ұнайтын болса, сіз келесі макросты қолданасыз:

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

Макросты орнату және іске қосу үшін тек 2-тәсілдегі әрекеттерді орындаңыз.

Ескертулер

  1. Алдымен сіз барлық құжаттарды бір каталогта орналастыруыңыз керек.
  2. «C: \ Users \ Public \ Documents \ New folder \ Test1 \» қалтасының нақты жолын ауыстыруды ешқашан ұмытпаңыз. Соңғы «\» белгісін ұмытпаңыз.

Word қалпына келтіру құралы

Word кенеттен бұзылатындықтан, оған құрал дайындау қажет Word бағдарламасын жөндеу және Word құжаттары. Уақытылы қалпына келтіру мүмкіндігінше көп деректерді алуға мүмкіндік береді. Сондықтан, алдын ала білікті өнімді сатып алған жөн.

Автордың кіріспесі:

Вера Чен - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. Excel түзету және pdf бағдарламалық жасақтама өнімдерін жөндеу. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com

Қазір бөлісу:

Пікірлер жабылды.