Word文書に目次をすばやく挿入する3つの方法

このpでost、目次をWord文書にすばやく挿入する3つの方法を紹介します。

Wordでドキュメントを読んでいるときに、目次またはナビゲーションペインを使用して、コンテンツをすばやく確認できます。 ただし、印刷に関しては、ナビゲーションペインをドキュメントと一緒に印刷することはできません。 しかし、前者はそうします。 したがって、目次、特に長い目次をWord文書に挿入する必要があります。 以下は3つの効果的な方法です。

方法1：目次を手動で挿入する

1. まず、目次を移動したい場所にカーソルを置きます。 「参照」タブをクリックしてから、「目次」コマンドをクリックします。
2. 次に、「目次を挿入」を選択します。
3. 開いたダイアログボックスで、「レベルの表示」など、必要に応じて構成を設定します。
4. [OK]をクリックします。

通常、目次はドキュメントの最初のページに配置します。 以前にページ番号を挿入したことがある場合は、メインドキュメントが表示されます。tar2ページのts次に状況があります。 一部の人々はメインドキュメントページを必要としますtar通常どおり1ページにありますが、目次はページ番号から除外されます。 これを行うには、追加の操作が必要になります。 詳細な手順については、この記事をお読みください。 ハウツーtartあなたの言葉の特定のページからのページ番号

そして、すべての調整が終わったら、目次を更新することを忘れないでください。

方法2：Wordマクロを実行する

ご覧のとおり、目次を手動で挿入する方法は、ページ番号のリセットなどの問題があり、少し面倒です。 このため、このタスクを実行するにはマクロ方式を使用することをお勧めします。 マクロを使用すると、プロセス全体を数秒で自動的に実行できます。

1. まず、「Ctrl + Home」を押してsに移動しますtarドキュメントのt。
2. 次に、「Alt + F11」を押してVBAエディターをトリガーします。
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

6. 最後になりましたが、「実行」をクリックしてください。

マクロを実行した後、新しく挿入された目次が最初のページとページ番号に配置されます。tarXNUMX番目のものでts。 また、目次はすでに更新されています。

方法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と同じ手順に従って、マクロをインストールして実行します。

Notes

1. 最初に、すべてのドキュメントを同じディレクトリに配置する必要があります。
2. 「C：\ Users \ Public \ Documents \ Newfolder \ Test1 \」を実際のフォルダパスに置き換えることを忘れないでください。 最後の「\」を忘れないでください。

Wordの修復ツール

Wordは突然クラッシュするので、次のツールを準備する必要があります。 Wordを修復する およびWord文書。 タイムリーな回復はmとして得ることができますost 可能な限りデータ。 したがって、事前に熟練した製品を入手することをお勧めします。

著者紹介：

Vera Chenは、のデータ復旧の専門家です。 DataNumen、Inc。は、以下を含むデータ復旧技術の世界的リーダーです。 Excelの修正 and pdf ソフトウェア製品を修理します。 詳細については、次のWebサイトをご覧ください。 WWW。datanumen.com