Aşağıdaki makalede, Word belgenizdeki bir yer imi adını değiştirmenin 2 doğru yolunu size sunmak istiyoruz.
Uzun bir Word belgesi hazırlarken, yer imleri ve çapraz referanslar, aynı noktayı yeniden açıklamak için bize çok zaman kazandırarak en iyi arkadaşımız olabilir. Ancak beklenmeyen bir sorun ortaya çıkabilir. Örneğin, bir yer imi adını değiştirir ve çapraz referansları güncellerseniz, kesinlikle başarısız olursunuz ve aşağıdaki gibi referans hatalarıyla sonuçlanırsınız:
Bunun nedeni, yer imi adını değiştirdiğinizde yanlışlıkla yer iminin kendisini silmenizdir. Şimdi size bu sorunu çözmek için 2 yöntem göstereceğiz.
Yöntem 1: Yer İşareti Adını Değiştirin ve Çapraz Referansları Manuel Olarak Güncelleyin
- Başlamak için, önce “Ekle” sekmesine tıklayın, ardından “Bağlantılar” grubundaki “Yer İşareti” seçeneğine tıklayın.

- Ardından hedef yer işaretini seçmek için tıklayın ve "Git" seçeneğine tıklayın.
- O zamana kadar yer imi metinlerinin seçimde olduğunu göreceksiniz. "Sil"i tıklayın.

- Ardından yeni bir yer imi adı girin ve "Ekle"yi tıklayın.
- Alan kodlarını göstermek için “Alt+F9” tuşlarına basın.
- Birden fazla çapraz referansınız olması durumunda “Bul ve Değiştir” işlevini kullanmanızı öneririz. "Bul ve Değiştir" iletişim kutusunu çağırmak için "Ctrl+H"ye basmanız yeterlidir.
- Şimdi "Neyi Bul" metin kutusuna "REF DWORDR" ve "Şununla değiştir" kutusuna "REF DWORDR2" yazın. “DWORDR” orijinal yer imi adıdır ve “DWORDR2” yeni isimdir.
- Sonra "Tümünü Değiştir"e tıklayın.
- “Bul ve Değiştir” kutusunu kapatın ve referans içeriğini tekrar göstermek için “Alt+F9” tuşlarına basın.
- Ardından, belgedeki tüm alanları güncellemek için "Ctrl + A" ve yanındaki "F9" tuşlarına basın.
İmleci çapraz referansın üzerine getirdiğinizde, ekran ipucu kutusunda yeni yer imi adını görebilirsiniz.
Yöntem 2: Yer İşareti Adını Değiştirin ve VBA aracılığıyla Çapraz Referansları Güncelleyin
- İlk olarak, VBA editörünü tetiklemek için “Alt+ F11” tuşlarına basın.
- Önce “Ekle” sekmesine tıklayarak yeni bir modül eklemek için “Normal” projesine gidin.
- Ardından açılır menüsünden "Modül"ü seçin.
- Sağ taraftaki düzenleme alanını açmak için yeni oluşturulan modüle çift tıklayın.
- Sonra aşağıdaki makroyu oraya yapıştırın:
Sub ChangeTheBookMarkNameAndUpdateCrossReference()
Dim strBookMarkName As String
Dim strNewName As String
Dim objBookMarkRange As Range
Dim objField As Field
Dim strFieldCode As String
' Rename the bookmark name.
strBookMarkName = InputBox("Enter the bookmark name which you want to change", "BookMark Name", "For example: DWORDR")
strNewName = InputBox("Enter the New bookmark Name", "New Bookmark Name", "For example: New text")
With ActiveDocument
If .Bookmarks.Exists(strBookMarkName) Then
Set objBookMarkRange = .Bookmarks(strBookMarkName).Range
.Bookmarks(strBookMarkName).Delete
.Bookmarks.Add Name:=strNewName, Range:=objBookMarkRange
' Update the cross-reference
If .Fields.Count >= 1 Then
For Each objField In .Fields
strFieldCode = objField.Code.Text
If strFieldCode = " REF " & strBookMarkName & " \h " Then
objField.Code.Text = Replace(strFieldCode, strBookMarkName, strNewName, , 1, vbTextCompare)
objField.Update
MsgBox ("Code = " & objField.Code & vbCr & "Result = " & objField.Result & vbCr)
End If
Next objField
End If
Else
MsgBox ("The Bookmark: " & strBookMarkName & " is not founded.")
End If
End With
Set objBookMarkRange = Nothing
End Sub
- "Çalıştır"a tıklayın veya "F5"e basın.
- Şimdi açılan ilk kutuya orijinal yer imi adını girin ve "Tamam" ı tıklayın.
- İkinciye yeni adı girin ve "Tamam" ı tıklayın.
Son olarak, size sonucu gösteren bir kutu olacaktır.
Word Belgelerine Bakın
Bir maliyeti bozuk Word Belge, şaşırtıcı iş kaybıyla sınırlı değil, aynı zamanda insanları duygusal olarak perişan ediyor. Bu nedenle, belgelerin yedeklenmesi gibi şanssızlığı atlamak için önleyici tedbirler almak son derece gereklidir.
Yazar Tanıtımı:
Vera Chen bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. xlsx onarımı hem de pdf onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com







