2 pametna načina za prikaz vseh zaznamkov v dokumentu Word

V tem članku vam želimo predstaviti dva pametna načina za prikaz vseh zaznamkov v dokumentu Word.

Vsake toliko časa vstavimo zaznamek za izbor besedila, ki ga želimo pozneje ponovno obiskati. Toda narava zaznamkov v Wordu otežuje prepoznavanje. Z drugo besedo, zaznamkov si ne moremo ogledati neposredno, ne da bi v Wordu preklopili nekatere možnosti.    

Ta članek je namenjen lažjemu ogledovanju zaznamkov na jasen način. Za vajo lahko izberete kateri koli način.

1. način: prikaži oklepaje zaznamkov

1. Najprej in predvsem kliknite zavihek »Datoteka« na traku.
2. Nato kliknite »Možnosti«, da odprete pogovorno okno »Možnosti besede«.
3. Nato v levem stolpcu kliknite »Advanced«.
4. Pomaknite se do razdelka »Pokaži vsebino dokumenta« in potrdite polje »Pokaži zaznamke«.
5. Na koncu kliknite »V redu«, da shranite spremembo.

Zdaj so okrogli oklepaji okoli zaznamkov. Vidite, da so ti oklepaji v sivi barvi, kar včasih ni tako očitno. Lahko jih zamenjate z običajnimi oglati oklepaji.

Zato vam priporočamo makro, da označite zaznamke, da jih bolje izstopate.

2. način: Označite več zaznamkov

1. Za začetek pritisnite »Alt + F11«, da pokličete urejevalnik VBA.
2. Nato kliknite projekt »Normal«.
3. Nato v menijski vrstici kliknite jeziček »Vstavi« in v spustnem meniju izberite »Modul«.
4. In dvokliknite nov modul, da odprete prostor za urejanje na desni strani.
5. Tam prilepite naslednji makro:

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. Nenazadnje kliknite »Zaženi« ali pritisnite »F5«.

Naslednje, kar vidite, so vsi zaznamki označeni z zeleno, na primer spodaj:

Nad makro označite vse zaznamke v trenutnem aktivnem dokumentu. V primeru, da je treba obdelati več dokumentov, potem raje uporabite ta 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

Preden zaženete ta makro, morate vse ciljne dokumente shraniti v isto mapo. Zagon makra bo sprožil okno »Brskaj«. Samo izberite mapo, v kateri shranjujete dokumente.

Pripomoček za popravilo dokumentov

Če naletite Poškodbe besed, obstaja velika verjetnost, da bi lahko iz vašega računalnika izbrisal nekatere ključne podatke. Če imate najnovejšo varnostno kopijo, ki jo lahko uporabite, ne bo nič hudega. Če pa ne, boste takoj potrebovali orodje za popravilo.

Uvod avtorja:

Vera Chen je strokovnjakinja za obnovitev podatkov v DataNumen, Inc., ki je vodilna na svetu na področju tehnologij za obnovitev podatkov, vključno z popravilo xlsx in pdf popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com