Bu yazıda, size Word belgenizdeki tüm yer imlerini göstermenin 2 akıllı yolunu sunmak istiyoruz.
Arada bir, daha sonra tekrar ziyaret etmek istediğimiz bir metin seçimi için yer imi ekleriz. Ancak Word'deki yer iminin doğası, tanımlanmasını zorlaştırır. Başka bir deyişle, Word'deki bazı seçenekleri değiştirmeden yer imlerini doğrudan görüntüleyemeyiz. 
Bu makale, yer işaretlerini net bir şekilde görmenize yardımcı olmaya ayrılmıştır. Pratik yapmak için her iki yolu da seçebilirsiniz.
Yöntem 1: Yer İşareti Parantezlerini Göster
- Öncelikle, Şerit menüsündeki "Dosya" sekmesine tıklayın.
- Ardından “Kelime Seçenekleri” iletişim kutusunu açmak için “Seçenekler”e tıklayın.
- Ardından sol sütundaki "Gelişmiş"i tıklayın.
- "Belge içeriğini göster" bölümüne gidin ve "Yer işaretlerini göster" kutusunu işaretleyin.
- Son olarak, değişikliği kaydetmek için “Tamam”a tıklayın.
Artık yer imi eklenmiş öğelerin etrafında köşeli parantezler var. Bu parantezlerin bazen çok belirgin olmayan gri renkte olduğunu görebilirsiniz. Ve onları normal köşeli parantezlerle karıştırabilirsiniz.
Bu nedenle, yer imlerini daha iyi bir şekilde öne çıkarmak için vurgulamak için size bir makro önermek istiyoruz.
Yöntem 2: Birden Çok Yer İmini Vurgulayın
- Başlamak için, VBA editörünü çağırmak için "Alt + F11" tuşlarına basın.
- Ardından “Normal” projesine tıklayın.
- Ardından menü çubuğundaki “Ekle” sekmesine tıklayın ve açılır menüden “Modül” seçeneğini seçin.
- Ve sağ taraftaki düzenleme alanını açmak için yeni modüle çift tıklayın.
- Aşağıdaki makroyu buraya yapıştırın:
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
- Son olarak, "Çalıştır"a tıklayın veya "F5"e basın.
Göreceğiniz bir sonraki şey, aşağıdaki gibi tüm yer imlerinin yeşil renkle vurgulanmasıdır:
Makronun üzerinde, geçerli etkin belgedeki tüm yer imlerini vurgulayın. İşlenecek birkaç belge olması durumunda, bunun yerine bu makroya ihtiyacınız vardır:
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
Bu makroyu çalıştırmadan önce, tüm hedef belgeleri aynı klasöre koymalısınız. Makroyu çalıştırdığınızda "Gözat" penceresi açılacaktır. Belgelerinizi sakladığınız klasörü seçmeniz yeterlidir.
Belgeleri Onarma Yardımcı Programı
Eğer karşılaşırsan Kelime hasarı, bazı kritik bilgileri bilgisayarınızdan silme olasılığı yüksektir. Başvurmak için en son yedeğiniz varsa, önemli olamaz. Ancak, değilse, hemen bir onarım aletine ihtiyacınız olacaktır.
Yazar Tanıtımı:
Vera Chen bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. onarım xlsx hem de pdf onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com



