Skip to main content

Kutools for Office — Bir Paket. Beş Araç. Daha Fazla İş Yapın.

Word belgesinde dipnot/sonnot ayırma çizgisini nasıl kaldırılır?

Author Siluvia Last modified

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:

  1. Dipnot veya sonnot ayırma çizgisini kaldırmak istediğiniz belgede "Görünüm" > "Taslak" seçeneğine tıklayın.
    Draft button on the View tab on the ribbon
  2. "Referanslar" > "Notları Göster" seçeneğine tıklayın.
    Show Notes on the References tab on the ribbon
  3. 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.
    Show Notes dialog box

    Not: Belgenizde yalnızca dipnot veya sonnot varsa, bu adımı atlayın ve bir sonraki adıma geçin.

  4. Ş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.
    The separator line is selected
  5. Belgeyi tekrar "Yazdırma Düzeni" görünümüne geçirin.
    The button to shift to the Print Layout view

Ayırma çizgisi artık belgeden kaldırılmıştır.

The separator line of footnote is removed

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:

  1. Word belgesinde, "Microsoft Visual Basic for Applications" penceresini açmak için Alt + F11 tuşlarına basın.
  2. VBA penceresinde, "Ekle" > "Modül" seçeneğine tıklayın ve ardından aşağıdaki kodu modüle yapıştırın.
    Module window opened in the VBA window

    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
  3. 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 and Kutools Plus tabs on the Word Ribbon
👉 Bu özellikleri denemek ister misiniz? Kutools for Word'u hemen indirin! 🚀
 

✨ 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