2 smarte måder at vise alle bogmærker i dit Word-dokument

I denne artikel vil vi gerne give dig 2 smarte måder at vise alle bogmærker i dit Word-dokument.

Hver gang imellem indsætter vi bogmærker til et udvalg af tekst, som vi senere vil se igen. Men karakteren af ​​bogmærke i Word gør det uroligt at identificere. I et andet ord kan vi ikke se bogmærker direkte uden at skifte nogle muligheder i Word.    Vis alle bogmærker i dit Word-dokument

Denne artikel er dedikeret til at hjælpe dig med at se bogmærker på en klar måde. Du kan vælge begge måder at øve på.

Metode 1: Vis bogmærkebeslag

  1. Først og fremmest skal du klikke på fanen "Filer" i båndet.
  2. Klik derefter på "Indstillinger" for at åbne dialogboksen "Wordindstillinger".
  3. Klik derefter på "Avanceret" i venstre kolonne.
  4. Rul ned til afsnittet "Vis dokumentindhold" og marker "Vis bogmærker".
  5. Til sidst skal du klikke på “OK” for at gemme ændringen.Klik på "Avanceret" -> Marker "Vis bogmærker" -> Klik på "OK"

Nu er der firkantede parenteser omkring bogmærkevarer. Du kan se, at disse parenteser er i grå farve, hvilket nogle gange ikke er så tydeligt. Og du kan forveksle dem med normale firkantede parenteser.

Derfor vil vi anbefale dig en makro til at fremhæve bogmærker for at skille dem ud på en bedre måde.

Metode 2: Fremhæv flere bogmærker

  1. Til at begynde med skal du trykke på “Alt + F11” for at påkalde VBA-editor.
  2. Klik derefter på “Normal” -projektet.
  3. Klik derefter på fanen "Indsæt" i menulinjen, og vælg "Modul" i rullemenuen.Klik på "Normal" -> Klik på "Indsæt" -> Klik på "Modul"
  4. Og dobbeltklik på nyt modul for at åbne dets redigeringsplads på højre side.
  5. Indsæt følgende makro der:
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
  1. Sidst men ikke mindst skal du klikke på "Kør" eller trykke på "F5".Indsæt makro-> Klik på "Kør"

Den næste ting, du ser, er at alle bogmærker er fremhævet i grønt, som nedenfor:Fremhæv bogmærker

Over makroen fremhæver alle bogmærker i det aktuelle aktive dokument. Hvis der er flere dokumenter, der skal behandles, skal du i stedet bruge denne makro:

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

Før du kører denne makro, skal du placere alle måldokumenter i den samme mappe. Kørsel af makroen vil udløse vinduet "Gennemse". Vælg blot den mappe, hvor du gemmer dine dokumenter.

Hjælpeprogram til at reparere dokumenter

Hvis du løber ind Ordskade, er der stor mulighed for, at det kan udslette nogle vigtige oplysninger fra din computer. Det kan ikke være noget stort, hvis du har en nyeste sikkerhedskopi til at henvise til. Hvis ikke, skal du straks bruge et reparationsværktøj.

Forfatter Introduktion:

Vera Chen er en datagendannelsesekspert i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder reparation xlsx og pdf produkter til reparation af software. For mere information besøg www.datanumen.com

Kommentarer er lukket.