Word文書のすべてのブックマークを表示する2つのスマートな方法

この記事では、Word文書内のすべてのブックマークを表示する2つのスマートな方法を提供します。

時々、後で再訪したいテキストの選択のためにブックマークを挿入します。 しかし、Wordのブックマークの性質上、識別が困難です。 つまり、Wordのいくつかのオプションを切り替えずに、ブックマークを直接表示することはできません。    

この記事は、ブックマークを明確に表示できるようにすることを目的としています。 どちらの方法でも練習できます。

方法1：ブックマークブラケットを表示する

1. まず最初に、リボンの「ファイル」タブをクリックしてください。
2. 次に、「オプション」をクリックして、「Wordオプション」ダイアログボックスを開きます。
3. 次に、左側の列の「詳細」をクリックします。
4. [ドキュメントの内容を表示する]セクションまで下にスクロールし、[ブックマークを表示する]チェックボックスをオンにします。
5. 最後に、「OK」をクリックして変更を保存します。

これで、ブックマークされたアイテムの周りに角かっこが表示されます。 これらのブラケットが灰色であることがわかりますが、これは時々それほど明白ではありません。 また、通常の角括弧と混同する可能性があります。

したがって、ブックマークを目立たせるために、ブックマークを強調表示するマクロをお勧めします。

方法2：複数のブックマークを強調表示する

1. まず、「Alt + F11」を押してVBAエディターを呼び出します。
2. 次に、「通常」プロジェクトをクリックします。
3. 次に、メニューバーの[挿入]タブをクリックし、ドロップダウンメニューで[モジュール]を選択します。
4. そして、新しいモジュールをダブルクリックして、右側の編集スペースを開きます。
5. 次のマクロをそこに貼り付けます。

Sub HighlightBookmarkedItemsInADoc()
  Dim objBookmark As Bookmark
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
 
  With objDoc
    For Each objBookmark In .Bookmarks
      objBookmark.Range.HighlightColorIndex = wdBrightGreen
    Next objBookmark
  End With
  Application.ScreenUpdating = True
End Sub

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

次に表示されるのは、以下のように、すべてのブックマークが緑色で強調表示されていることです。

上記のマクロは、現在アクティブなドキュメント内のすべてのブックマークを強調表示しています。 処理するドキュメントが複数ある場合は、代わりに次のマクロが必要です。

Sub HighlightBookmarkedItemsInMultiDoc()
  Dim StrFolder As String
  Dim strFile As String
  Dim objDoc As Document
  Dim dlgFile As FileDialog
 
  Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
 
  With dlgFile
    If .Show = -1 Then
      StrFolder = .SelectedItems(1) & "\"
    Else
      MsgBox "You need to select a folder first!"
      Exit Sub
    End If
  End With
 
  strFile = Dir(StrFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
    Set objDoc = ActiveDocument
    With objDoc
      For Each objBookmark In .Bookmarks
        objBookmark.Range.HighlightColorIndex = wdBrightGreen
      Next objBookmark
    End With
    objDoc.Save
    objDoc.Close
    strFile = Dir()
 Wend
End Sub

このマクロを実行する前に、対象となるすべてのドキュメントを同じフォルダに保存してください。マクロを実行すると「参照」ウィンドウが表示されますので、ドキュメントを保存しているフォルダを選択してください。

ドキュメントを修復するユーティリティ

あなたが遭遇した場合 単語の損傷、コンピュータからいくつかの重要な情報を一掃する可能性が高いです。 参照する最新のバックアップがあれば、大したことではありません。 ただし、そうでない場合は、すぐに修復ツールが必要になります。

著者紹介：

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