Word belgesinde dipnot/sonnot ayırma çizgisini nasıl kaldırılır?
Bir Word belgesine dipnot veya sonnot eklediğinizde, dipnot veya sonnot metninin üzerinde yatay bir ayırma çizgisi görünür. Bu çizgiyi kaldırmak istiyorsanız, bu makaledeki yöntemleri deneyin.
Word'de dipnot/sonnot ayırma çizgisini kaldırma
VBA kodu ile dipnot/sonnot ayırma çizgisini kaldırma
Word'de dipnot/sonnot ayırma çizgisini kaldırma
Word'deki dipnot veya sonnot ayırma çizgisini kaldırmak için şu adımları izleyebilirsiniz:
- Dipnot veya sonnot ayırma çizgisini kaldırmak istediğiniz belgede "Görünüm" > "Taslak" seçeneğine tıklayın.
- "Referanslar" > "Notları Göster" seçeneğine tıklayın.
- Eğer belgede hem dipnot hem de sonnot varsa, bir "Notları Göster" iletişim kutusu açılacaktır. İstediğiniz görünümü seçin ve ardından "Tamam" butonuna tıklayın. Örneğin, "Dipnot alanını görüntüle" seçeneğini seçin.
Not: Belgenizde yalnızca dipnot veya sonnot varsa, bu adımı atlayın ve bir sonraki adıma geçin.
- Şimdi "Notlar" bölümü belgenin sonunda görünür. "Dipnot Ayırıcı"yı "Dipnotlar" açılır menüsünden seçin, ayırma çizgisini seçin ve Sil tuşuna basın.
- Belgeyi tekrar "Yazdırma Düzeni" görünümüne geçirin.
Ayırma çizgisi artık belgeden kaldırılmıştır.

Not: Sonnot ayırma çizgisini kaldırmak için "Notları Göster" iletişim kutusunda "Sonnot alanını görüntüle" seçeneğini seçin ve ardından açılır listeden "Sonnot Ayırıcı"yı seçin.
VBA kodu ile dipnot/sonnot ayırma çizgilerini kaldırma
Manuel yöntemin uygun olmadığı durumlarda, dipnot veya hem dipnot hem de sonnot ayırma çizgilerini hızlıca kaldırmak için aşağıdaki VBA kodunu kullanabilirsiniz:
- Word belgesinde, "Microsoft Visual Basic for Applications" penceresini açmak için Alt + F11 tuşlarına basın.
- VBA penceresinde, "Ekle" > "Modül" seçeneğine tıklayın ve ardından aşağıdaki kodu modüle yapıştırın.
VBA kodu: Word belgesinden dipnot ayırma çizgisini kaldırma
Sub DeleteTheFootnoteSeparator() 'Updated by ExtendOffice 20181112 If ActiveDocument.Footnotes.Count < 1 Then Exit Sub If ActiveWindow.View.SplitSpecial = wdPaneNone Then ActiveWindow.ActivePane.View.Type = wdNormalView Else ActiveWindow.View.Type = wdNormalView End If With ActiveWindow.ActivePane.View If .Type = wdPrintView Or .Type = wdWebView Or _ .Type = wdPrintPreview Then ActiveWindow.View.SeekView = wdSeekFootnotes Else ActiveWindow.View.SplitSpecial = wdPaneFootnotes End If End With ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator With Selection .MoveRight Unit:=wdCharacter .TypeBackspace .TypeBackspace End With ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator With Selection .MoveRight Unit:=wdCharacter, Count:=1 .TypeBackspace .TypeBackspace With .ParagraphFormat .LineSpacingRule = wdLineSpaceMultiple .LineSpacing = LinesToPoints(0.06) End With End With ActiveWindow.View.Type = wdPrintView End Sub
- Kodu çalıştırmak için F5 tuşuna basın. Tüm dipnot ayırma çizgileri anında kaldırılacaktır.
Not: Hem dipnot hem de sonnot ayırma çizgilerini kaldırmak istiyorsanız aşağıdaki VBA kodunu kullanın.
VBA kodu: Word belgesinden hem dipnot hem de sonnot ayırma çizgilerini kaldırma
Sub DeleteTheFootnoteSeparator()
'Updated by ExtendOffice 20181112
If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
If ActiveWindow.View.SplitSpecial = wdPaneNone Then
ActiveWindow.ActivePane.View.Type = wdNormalView
Else
ActiveWindow.View.Type = wdNormalView
End If
With ActiveWindow.ActivePane.View
If .Type = wdPrintView Or .Type = wdWebView Or _
.Type = wdPrintPreview Then
ActiveWindow.View.SeekView = wdSeekFootnotes
Else
ActiveWindow.View.SplitSpecial = wdPaneFootnotes
End If
End With
ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
With Selection
.MoveRight Unit:=wdCharacter
.TypeBackspace
.TypeBackspace
End With
ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
With Selection
.MoveRight Unit:=wdCharacter, Count:=1
.TypeBackspace
.TypeBackspace
With .ParagraphFormat
.LineSpacingRule = wdLineSpaceMultiple
.LineSpacing = LinesToPoints(0.06)
End With
End With
ActiveWindow.View.SplitSpecial = wdPaneEndnoteSeparator
With Selection
.MoveRight Unit:=wdCharacter
.TypeBackspace
.TypeBackspace
End With
ActiveWindow.View.SplitSpecial = wdPaneEndnoteContinuationSeparator
With Selection
.MoveRight Unit:=wdCharacter, Count:=1
.TypeBackspace
.TypeBackspace
With .ParagraphFormat
.LineSpacingRule = wdLineSpaceMultiple
.LineSpacing = LinesToPoints(0.06)
End With
End With
ActiveWindow.View.Type = wdPrintView
End Sub
En İyi Ofis Verimliliği Araçları
Kutools for Word - Word deneyiminizi 100 dikkate değer özellik ile geliştirin!
🤖 Kutools AI Features: AI Assistant / Real-Time Assistant / Süper Parlat (Biçimi Koru) / Süper Çeviri (Biçimi Koru) / AI Redaksiyon / Yapay Zeka Düzeltme...
📘 Belge Uzmanlığı: Sayfaları Böl / Belgeleri Birleştir / Aralığı PDF/TXT/DOC/HTML gibi çeşitli biçimlerde Dışa Aktar / Toplu PDF Dönüştürme...
✏ Metin Düzenleme: Birden fazla Dosyada Toplu Bul ve Değiştir / Tüm Resimleri Yeniden Boyutlandır / Satırları ve Sütunları Tabloyu Çevir / Tabloyu Metne Dönüştür...
🧹 Zahmetsiz Temizlik: Fazla Boşlukları Kaldır / Bölüm Sonlarını Kaldır / Metin Kutularını Kaldır / Bağlantıları Kaldır / Diğer kaldırma araçları için Kaldır grubuna göz atın...
➕ Yaratıcı Ekler: Binlik Ayırıcıları Ekle / Onay Kutuları Ekle / Radyo Düğmeleri Ekle / QR Kodu Oluştur / Barkod Oluştur / Birden fazla Resim Ekle / Daha fazlasını Ekle grubunda keşfedin...
🔍 Hassas Seçimler: Belirli Sayfa / Tabloları / Şekilleri / Başlık Paragraflarını tam olarak seçin / Daha fazla Seç özelliği ile gezinmeyi geliştirin...
⭐ Özel Geliştirmeler: Herhangi bir Aralığa Hızla Git / Tekrarlayan Metni Otomatik Ekle / Belge Pencereleri arasında geçiş yap /11 Dönüşüm aracı...
🌍 40+ Dil Desteği: Kutools'u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve40'tan fazla dil destekleniyor!

✨ Kutools for Office – Tek kurulumda beş güçlü araç!
Şunları içerir: Office Tab Pro · Kutools for Excel · Kutools for Outlook · Kutools for Word · Kutools for PowerPoint
📦 Tüm5 araca tek bir pakette sahip olun | 🔗 Microsoft Office ile sorunsuz entegrasyon | ⚡ Zamanı Kaydet ve anında verimliliği artır
En İyi Ofis Verimliliği Araçları
Kutools for Word - 100+ Word için araçlar
- 🤖 Kutools AI Features: AI Assistant / Real-Time Assistant / Süper Parlat / Süper Çeviri / AI Redaksiyon / Yapay Zeka Düzeltme
- 📘 Belge Uzmanlığı: Sayfaları Böl / Belgeleri Birleştir / Toplu PDF Dönüştürme
- ✏ Metin Düzenleme: Toplu Bul ve Değiştir / Tüm Resimleri Yeniden Boyutlandır
- 🧹 Zahmetsiz Temizlik: Fazla Boşlukları Kaldır / Bölüm Sonlarını Kaldır
- ➕ Yaratıcı Ekler: Binlik Ayırıcıları Ekle / Onay Kutuları Ekle / QR Kodu Oluştur
- 🌍 40+ Dil Desteği: Kutools sizin dilinizde –40'tan fazla dil desteği!