Word Belgenizdeki Dipnot veya Son Not Ayırıcısını Kaldırmanın 4 Yöntemi

Şimdi paylaş:

Bu p'deost, Word belgenizdeki dipnot veya son not ayırıcıyı kaldırmak için 4 yöntemi sizinle paylaşmak istiyoruz.

Belgeye bir dipnot veya son not eklerseniz, metinlerin üzerinde her zaman yatay bir çizgi olduğunu göreceksiniz. Bu ayırıcı, dipnot veya son not alanını net bir şekilde işaretler. Yine de, bazı insanlar bunu can sıkıcı bulabilir ve ondan kurtulmak isteyebilir. Bu makale size bunu yapmak için 4 yöntem sağlayacaktır.Dipnot veya Sonnot Ayırıcısını Kaldırma

Yöntem 1: Dipnot Ayırıcıyı Manuel Olarak Kaldırma

  1. Öncelikle “Görünüm” sekmesine tıklayın ve ardından “Taslak” görünümüne tıklayın."Görüntüle"ye tıklayın -> "Taslak"a tıklayın
  2. Daha sonra “Referanslar”a tıklayın ve ardından “Dipnotlar” alanında “Notları Göster”e tıklayın.
  3. Şimdi, belgeniz hem dipnot hem de son not içeriyorsa, açılan bir kutu olacaktır. Dipnot veya son not alanını görüntülemeyi seçin, ardından "Tamam"a tıklayın. Şimdi önce “Dipnot alanını göster”i seçelim."Referanslar"a tıklayın->"Notları Göster"e tıklayın->Bir alan seçin->"Tamam"a tıklayın
  4. Ekranın altında bir not bölmesi açılacaktır. "Dipnot Ayırıcı"yı seçmek için açılır düğmeyi tıklayın.
  5. Ardından ayırıcının seçimde olması için tıklayın. Ayırıcıyı kaldırmak için "Geri Al" veya "Sil" tuşuna basın.Açılır düğmeyi tıklayın->"Dipnot Ayırıcı"yı seçin ->Dipnot ayırıcıyı seçin
  6. Ardından “Dipnot Devam Ayırıcı” seçeneğini seçin ve onu da silin."Dipnot Devam Ayırıcısı"nı seçin -> Ayırıcıyı seçin
  7. Ayırıcıdan kurtulduğunuzda, doğrudan silemeyeceğiniz boş bir satır kalacaktır. Burada geçici bir çözüm buluyoruz. Dayanmak “Dipnot Ayırıcı” seçilidir.Boş Bir Satır Sol
  8. Ardından, aynı ad iletişim kutusunu açmak için “Ana Sayfa” sekmesine tıklayın ve “Paragraf” grubundaki ok düğmesine tıklayın.
  9. “Satır aralığı” için “Birden çok” seçin, değeri “0.06” olarak ayarlayın ve “Tamam” a tıklayın."Giriş"e tıklayın->"Paragraf" kutusunu açmak için ok düğmesine tıklayın->"Satır aralığı" için "Birden çok" seçin->Değeri 0.06 olarak ayarlayın->"Tamam"a tıklayın
  10. Şimdi boş satırın yüksekliği en aza indirgenmiştir. Görünümü "Yazdırma Düzeni" olarak değiştirebilirsiniz.Boş satırın yüksekliğini daraltın

Aşağıdaki sonucu kontrol edin:Dipnot ayırıcının kaldırılması

Yöntem 2: Son Not Ayırıcısını Manuel Olarak Kaldırma

  1. Yöntem 3'deki ilk 1 adımı tekrarlayın ancak bu kez "Notları Göster" kutusunda "Son not alanını görüntüle"yi seçin."Son not alanını görüntüle"yi seçin -> "Tamam"a tıklayın
  2. Alt kısımda açılan not bölmesinde “Endnote Separator” seçeneğini seçin ve ayırıcıyı seçin. Sonra silin."Son Not Ayırıcı"yı seçin -> Ayırıcıyı seçin
  3. Sonra "Endnote Devam Ayırıcısı"nı seçin ve ayırıcıyı seçin ve silin."Son Not Devam Ayırıcısı"nı seçin -> Ayırıcıyı seçin
  4. Ardından, açılır düğmeyi tıklayarak tekrar “Endnote Separator” öğesini seçin.
  5. Yöntem 8'de 10'den 1'a kadar olan adımları tekrarlayın.

İşte sonuç:Son not ayırıcıyı kaldırmanın etkisi

Yöntem 3: Makro Çalıştırarak Dipnot Ayırıcısını Kaldırma

  1. Başlamak için, Word'de VBA düzenleyicisini tetiklemek için "Alt + F11" tuşlarına basın.
  2. Ardından “Normal” ve ardından “Ekle” sekmesine tıklayın.
  3. Ardından "Modül"ü seçin."Normal" -> "Ekle" seçeneğine tıklayın -> "Modül" seçeneğine tıklayın
  4. Ardından açmak için çift tıklayın ve makroyu oraya yapıştırın:
Sub DeleteTheFootnoteSeparator()

  If ActiveWindow.View.SplitSpecial = wdPaneNone Then
    ActiveWindow.ActivePane.View.Type = wdNormalView
  Else
    ActiveWindow.View.Type = wdNormalView
  End If
 
  If ActiveWindow.ActivePane.View.Type = wdPrintView Or ActiveWindow.ActivePane.View.Type = wdWebView Or _
    ActiveWindow.ActivePane.View.Type = wdPrintPreview Then
    ActiveWindow.View.SeekView = wdSeekFootnotes
  Else
    ActiveWindow.View.SplitSpecial = wdPaneFootnotes
  End If
 
  '  Delete the footnote separator. 
  ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace
 
  '  Eliminate the blank line after deleting the footnote separator.
  With Selection.ParagraphFormat
    .LineSpacingRule = wdLineSpaceMultiple
    .LineSpacing = LinesToPoints(0.06)
  End With

  '  Delete the footnote continuation separator. 
  ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace

  '  Eliminate the blank line after deleting the footnote continuation separator. 
  With Selection.ParagraphFormat
    .LineSpacingRule = wdLineSpaceMultiple
    .LineSpacing = LinesToPoints(0.06)
  End With
 
  If ActiveWindow.View.SplitSpecial = wdPaneNone Then
    ActiveWindow.ActivePane.View.Type = wdPrintView
  Else
    ActiveWindow.View.Type = wdPrintView
  End If
End Sub
  1. Çalıştıra tıkla".Kodları Yapıştır-> "Çalıştır" ı tıklayın

Makro, tüm dipnot ayırıcıları otomatik olarak kaldıracak ve kalan boş satırı da en aza indirecektir.

Yöntem 4: Makro Çalıştırarak Son Not Ayırıcısını Kaldırma

Bir makro yüklemek ve çalıştırmak için yöntem 3'teki tam adımları izleyin. Yalnızca kodları şu kodlarla değiştirin:

Sub DeleteTheEndnoteSeparator()

  If ActiveWindow.View.SplitSpecial = wdPaneNone Then
    ActiveWindow.ActivePane.View.Type = wdNormalView
  Else
    ActiveWindow.View.Type = wdNormalView
  End If
 
  If ActiveWindow.ActivePane.View.Type = wdPrintView Or ActiveWindow.ActivePane.View.Type = wdWebView Or _
    ActiveWindow.ActivePane.View.Type = wdPrintPreview Then
    ActiveWindow.View.SeekView = wdSeekEndnotes
  Else
    ActiveWindow.View.SplitSpecial = wdPaneEndnotes
  End If
 
  '  Delete the endnote separator.
  ActiveWindow.View.SplitSpecial = wdPaneEndnoteSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace
 
  '  Eliminate the blank line after deleting the endnote separator.
  With Selection.ParagraphFormat
    .LineSpacingRule = wdLineSpaceMultiple
    .LineSpacing = LinesToPoints(0.06)
  End With
 
  '  Delete the endnote continuation separator. 
  ActiveWindow.View.SplitSpecial = wdPaneEndnoteContinuationSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace

  '  Eliminate the blank line after deleting the endnote continuation separator. 
  With Selection.ParagraphFormat
    .LineSpacingRule = wdLineSpaceMultiple
    .LineSpacing = LinesToPoints(0.06)
  End With
  If ActiveWindow.View.SplitSpecial = wdPaneNone Then
    ActiveWindow.ActivePane.View.Type = wdPrintView
  Else
    ActiveWindow.View.Type = wdPrintView
  End If
End Sub

Belgelerinizi Kaydedin

Hiçbir yazılım kusursuz değildir ve bu Word için çok doğrudur. Genel olarak, kelime işleme için çok yardımcı bir araç olmuştur. Yine de Word'ün çöktüğü ve belgenizin hasar gördüğü bir süre kesintiye uğrar. Daha da kötüsü, elinizdeki tek kopya o belge. Bu çok üzücü. Ancak, nitelikli bir yardımcı program seçerseniz tamir doktoru bir kerede, tamamen farklı bir sonuç elde edebilirsiniz.

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 xls ve pdf onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com

Şimdi paylaş:

Yoruma kapalı.