W tym artykule chcielibyśmy przedstawić 2 inteligentne sposoby wyświetlania wszystkich zakładek w dokumencie programu Word.
Co jakiś czas wstawiamy zakładkę do zaznaczenia tekstu, do którego chcemy wrócić później. Ale natura zakładki w programie Word sprawia, że trudno ją zidentyfikować. Innymi słowy, nie możemy bezpośrednio wyświetlać zakładek bez przełączania niektórych opcji w programie Word. 
Ten artykuł ma na celu pomóc Ci zobaczyć zakładki w przejrzysty sposób. Możesz wybrać dowolny sposób ćwiczenia.
Metoda 1: Pokaż nawiasy zakładek
- Przede wszystkim kliknij kartę „Plik” na wstążce.
- Następnie kliknij „Opcje”, aby otworzyć okno dialogowe „Opcje programu Word”.
- Następnie kliknij „Zaawansowane” w lewej kolumnie.
- Przewiń w dół do sekcji „Pokaż treść dokumentu” i zaznacz pole „Pokaż zakładki”.
- Na koniec kliknij „OK”, aby zapisać modyfikację.
Teraz wokół elementów dodanych do zakładek znajdują się nawiasy kwadratowe. Możesz zobaczyć te nawiasy w kolorze szarym, co czasami nie jest tak oczywiste. Możesz je pomylić z normalnymi nawiasami kwadratowymi.
Dlatego też chcemy polecić Ci makro do podświetlania zakładek, aby lepiej je wyróżniać.
Metoda 2: Podświetl wiele zakładek
- Na początek naciśnij „Alt + F11”, aby wywołać edytor VBA.
- Następnie kliknij „Normalny” projekt.
- Następnie kliknij zakładkę „Wstaw” na pasku menu i wybierz „Moduł” z menu rozwijanego.
- Kliknij dwukrotnie nowy moduł, aby otworzyć jego przestrzeń edycji po prawej stronie.
- Wklej tam następujące 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
- Wreszcie, kliknij „Uruchom” lub naciśnij „F5”.
Następną rzeczą, którą zobaczysz, jest to, że wszystkie zakładki są podświetlone na zielono, tak jak poniżej:
Powyższe makro podświetla wszystkie zakładki w bieżącym aktywnym dokumencie. W przypadku, gdy istnieje kilka dokumentów do przetworzenia, zamiast tego potrzebujesz tego makra:
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
Przed uruchomieniem tego makra należy umieścić wszystkie dokumenty docelowe w tym samym folderze. Uruchomienie makra spowoduje wyświetlenie okna „Przeglądaj”. Wystarczy wybrać folder, w którym przechowywane są dokumenty.
Narzędzie do naprawy dokumentów
Jeśli napotkasz Szkoda słów, istnieje duże prawdopodobieństwo, że spowoduje to usunięcie niektórych krytycznych informacji z komputera. Jeśli masz najnowszą kopię zapasową, do której możesz się odnieść, to nic wielkiego. Jeśli jednak nie, będziesz potrzebować narzędzia do naprawy natychmiast.
Wprowadzenie autora:
Vera Chen jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym napraw xlsx i pdf oprogramowanie do naprawy. po więcej informacji odwiedź www.datanumen.com



