Anonim

Bir belgeye yorum, açıklama ve referans eklemek isterseniz dipnotlar ve son notlar çok yararlı olabilir. Ek notları metnin gövdesinden ayırmayı kolaylaştırırlar.

Ayrıca Makalemize Bakın Metnin Arkasına Bir Görüntü Nasıl Koyulur - Microsoft Word

Ancak bazen, varsayılan olarak, ihtiyacınız olmayabilir. Yararlı bulamadığınız dipnotlarla dolu bir belge alabilirsiniz. Bunları silmek istiyorsanız, Word bunu yapmanın birden çok yolunu sunar.

El ile kaldırılması için çok fazla varsa, hepsini bir kerede silmek için 3 yolu vardır.

Bul ve Değiştir Seçeneğini Kullanarak Dipnotları ve Sonnotları Kaldırma

Hızlı Linkler

  • Bul ve Değiştir Seçeneğini Kullanarak Dipnotları ve Sonnotları Kaldırma
        • Düzenlemekte olduğunuz belgede, Bul ve Değiştir iletişim kutusunu açın: Mac'te Düzenle> Bul'a gidin ve Gelişmiş Bul ve Değiştir'i seçin. Word 2013 veya 2016 kullanıyorsanız, bunu Ctrl + H tuşlarına basarak yapabilirsiniz.
        • İletişim kutusunu açtıktan sonra Değiştir düğmesine tıklayın.
        • Ne Bulun altında, dipnotlar için ^ f ve sonnotlar için ^ e girin. Bunu, Seçim'i tıklatarak, Özel'i tıklatarak ve listede Dipnot İşareti veya Sonnot İşareti'ni bularak da yapabilirsiniz.
        • Değiştir kutusunu boş bırakın, sonra Tümünü Değiştir'e gidin.
  • Makroları Kaydetme
  • VBA Kodlarını Kullanma
        • VBA Düzenleyiciyi çalıştırmak için Alt + F11 tuşlarına basın.
        • Ekle> Modül'e gidin.
        • Modülü açmak için çift tıklayın, ardından tüm dipnotları kaldırmak için aşağıdaki kodu yapıştırın:
        • Çalıştır'ı seçin.
  • Dipnotları Elle Silme
  • Son Söz

Bu en yaygın kullanılan yöntemdir, aynı zamanda en kolay yöntemlerden biridir. Sadece birkaç tıklamayla tüm dipnotlardan kurtulabilirsiniz. İşte nasıl yapılacağı.

  1. Düzenlemekte olduğunuz belgede, Bul ve Değiştir iletişim kutusunu açın: Mac'te Düzenle> Bul'a gidin ve Gelişmiş Bul ve Değiştir'i seçin. Word 2013 veya 2016 kullanıyorsanız, bunu Ctrl + H tuşlarına basarak yapabilirsiniz.

  2. İletişim kutusunu açtıktan sonra Değiştir düğmesine tıklayın.

  3. Ne Bulun altında, dipnotlar için ^ f ve sonnotlar için ^ e girin. Bunu, Seçim'i tıklatarak, Özel'i tıklatarak ve listede Dipnot İşareti veya Sonnot İşareti'ni bularak da yapabilirsiniz.

  4. Değiştir kutusunu boş bırakın, sonra Tümünü Değiştir'e gidin.

Bu dipnotları ve son notları almanın üç yolundan en kolay olanıdır. Biraz daha teknoloji meraklısıysanız ve kodlamayı denemek istiyorsanız, iki seçenek daha var.

Makroları Kaydetme

Çok fazla dipnot içeren birden fazla belgeyle uğraşmak zorundaysanız, bir makroyu kaydetme hepsini kaldırmak için en iyi yoldur. Bunu yaptığınızda, klavyedeki bir tuşa veya Word'deki bir seçeneğe bir makro atayabilirsiniz. Bu, tüm dipnotları bir belgeden çıkarmanız gerektiğinde kullanmanıza olanak sağlar. Bunu yapacak bir makroyu kaydetmek için aşağıdaki kodları kullanın:

Sub DeleteFootnotes()
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^f"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Sonnotları aynı şekilde silebilirsiniz, sadece ^ f yerine ^ e kullanın. Makroyu bir düğmeye veya anahtara atarsanız, belgede bulunan tüm dipnotları hiçbir zaman silemezsiniz.

VBA Kodlarını Kullanma

Bu, çok basit olduğu için, herhangi bir kodlama bilgisine ihtiyaç duymadığınız bir yöntemdir. Makrolar gibi çoklu kullanımlara izin vermez, ancak dipnotları ve son notları bir belgeden çıkarmanın çok hızlı bir yoludur. İşte yapmanız gerekenler.

  1. VBA Düzenleyiciyi çalıştırmak için Alt + F11 tuşlarına basın.

  2. Ekle> Modül'e gidin.

  3. Modülü açmak için çift tıklayın, ardından tüm dipnotları kaldırmak için aşağıdaki kodu yapıştırın:

Sub DeleteAllfootnotes()
Dim objFootnote As Footnote
For Each objFootnote In ActiveDocument.Footnotes
objFootnote.Delete
Next
End Sub

Son notları kaldırmak için şu kodu yapıştırın:

Sub DeleteAllEndnotes()
Dim objEndnote As Endnote
For Each objEndnote In ActiveDocument.Endnotes
objEndnote.Delete
Next
End Sub

  1. Çalıştır'ı seçin.

Bu yöntem, tüm işaretler kod olmadan kaldırılamadığından el ile kaldıramayacağınız tüm dipnotları ve son notları kaldırmanıza olanak sağlar. Bu, bir makronun gerekli olduğu özelleştirilmiş işaretleri içerir.

Dipnotları Elle Silme

Son olarak, yalnızca bazılarını silmek isteyebilirsiniz. Bu durumda, bunu yapmanın tek yolu el ile. Her dipnot, metnin gövdesinde karşılık gelen bir numaraya sahiptir.

Dipnot silmek için yapmanız gereken tek şey sayıyı gövdeden kaldırmaktır ve otomatik olarak kaybolur. Dipnotun üzerinde sağ tıklayıp Dipnot'a Git'i seçip numarayı oradan silebilirsiniz.

Son Söz

Duruma bağlı olarak, dipnotlardan ve son notlardan kurtulmak için yukarıdaki yöntemlerden birini kullanabilirsiniz. Onlarla tekrar tekrar uğraşmak zorunda kalacağınızı biliyorsanız, bir makro kaydetmek ve klavyedeki bir tuşa atamak en iyi seçimdir.

Tek kullanım için VBA editörünün rotasına gidebilir veya kodlama sizin için değilse, ilk yöntemi kullanabilirsiniz. Hangi yoldan gideceğinize karar verirseniz, kısa sürede dipnotlarla başa çıkabilirsiniz.

Microsoft Word'de tüm dipnotlar nasıl silinir