ในบทความนี้เราขอเสนอ 2 วิธีอันชาญฉลาดในการแสดงบุ๊กมาร์กทั้งหมดในเอกสาร Word ของคุณ
ในบางครั้งเราจะแทรกบุ๊กมาร์กเพื่อเลือกข้อความที่เราต้องการกลับมาดูในภายหลัง แต่ลักษณะของบุ๊กมาร์กใน Word ทำให้ไม่สบายใจในการระบุ กล่าวอีกนัยหนึ่งคือเราไม่สามารถดูบุ๊กมาร์กได้โดยตรงโดยไม่ต้องสลับตัวเลือกบางอย่างใน Word 
บทความนี้จัดทำขึ้นเพื่อช่วยให้คุณเห็นบุ๊กมาร์กได้อย่างชัดเจน คุณสามารถเลือกวิธีใดก็ได้ในการฝึกฝน
วิธีที่ 1: แสดงวงเล็บคั่นหน้า
- อันดับแรก ให้คลิกแท็บ “ไฟล์” บนแถบ Ribbon
- จากนั้นคลิก“ ตัวเลือก” เพื่อเปิดกล่องโต้ตอบ“ ตัวเลือกของ Word”
- จากนั้นคลิก“ ขั้นสูง” ในคอลัมน์ทางซ้าย
- เลื่อนลงไปที่ส่วน“ แสดงเนื้อหาเอกสาร” แล้วเลือกช่อง“ แสดงบุ๊กมาร์ก”
- สุดท้ายคลิก“ ตกลง” เพื่อบันทึกการแก้ไข
ตอนนี้มีวงเล็บเหลี่ยมรอบรายการที่บุ๊กมาร์ก คุณสามารถเห็นวงเล็บเหล่านี้เป็นสีเทาซึ่งบางครั้งก็ไม่ชัดเจนนัก และคุณอาจสับสนกับวงเล็บเหลี่ยมปกติ
ดังนั้นเราจึงอยากแนะนำให้คุณใช้มาโครเพื่อเน้นบุ๊กมาร์กเพื่อให้โดดเด่นในทางที่ดีขึ้น
วิธีที่ 2: เน้นที่คั่นหน้าหลายรายการ
- ในการเริ่มต้นให้กด“ Alt + F11” เพื่อเรียกใช้ตัวแก้ไข VBA
- จากนั้นคลิกโครงการ "ปกติ"
- จากนั้นคลิกแท็บ "แทรก" บนแถบเมนูและเลือก "โมดูล" ในเมนูแบบเลื่อนลง
- และดับเบิลคลิกที่โมดูลใหม่เพื่อเปิดพื้นที่แก้ไขทางด้านขวา
- วางมาโครต่อไปนี้ที่นั่น:
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
- สุดท้าย แต่ไม่ท้ายสุดให้คลิก“ วิ่ง” หรือกด“ 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 และ pdf ซ่อมแซมผลิตภัณฑ์ซอฟต์แวร์ ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.



