Word Sənədinizdə Haşiyə və ya Son Qeyd Ayırıcısını Silmək üçün 4 Metod

İndi paylaş:

Bu yazıda, Word sənədinizdə qeyd işarəsini və ya qeyd ayırıcısını silməyin 4 üsulunu sizinlə bölüşmək istərdik.

Əgər siz nə vaxtsa sənədə qeyd və ya son qeyd daxil etsəniz, mətnlərin üzərində həmişə üfüqi bir xətt olduğunu görəcəksiniz. Bu ayırıcı qeyd və ya son qeyd sahəsini aydın şəkildə qeyd edir. Bununla belə, bəzi insanlar bunu zəhlətökən hesab edə və ondan qurtulmaq istəyə bilər. Bu məqalə sizə bunun üçün 4 üsul təqdim edəcək.Haşiyəni və ya Son Qeyd Ayırıcısını çıxarın

Metod 1: Haşiyə ayırıcısını əl ilə çıxarın

  1. Əvvəlcə "Görünüş" sekmesine, sonra "Qaralama" görünüşünə klikləyin."Görünüş"->"Qaralama" üzərinə klikləyin
  2. Sonra "İstinadlar" üzərinə klikləyin və sonra "Dibilqələr" sahəsində "Qeydləri göstər" düyməsini basın.
  3. İndi sənədinizdə həm alt qeydlər, həm də son qeydlər varsa, onda bir qutu görünəcək. Dipnot və ya son qeyd sahəsinə baxmaq üçün seçin, sonra “OK” düyməsini basın. İndi gəlin əvvəlcə “Dişik qeyd sahəsinə bax” seçək."İstinadlar"->"Qeydləri göstər"->Ərazi seçin->"OK" üzərinə klikləyin
  4. Ekranın aşağı hissəsində qeyd paneli açılmalıdır. Açılan düyməni klikləyin ki, “Alıntı Ayırıcı” seçin.
  5. Sonra ayırıcının seçimdə olması üçün klikləyin. Ayırıcını çıxarmaq üçün ya "Backspace" və ya "Delete" düyməsini basın.Açılan düyməyə klikləyin->"Haşiyə Ayırıcısı"-nı seçin->Haşiyə ayırıcısını seçin
  6. Və sonra “Footnote Contination Separator” seçin və onu da silin."Haşiyənin davamı ayırıcısı" ->Separatoru seçin
  7. Ayırıcıdan xilas olduqda, birbaşa silə bilməyəcəyiniz boş bir sətir qalacaq. Burada bir həll yolu tapırıq. Dözümlü olun “Diqqət ayırıcısı” seçilir.Boş Xətt Qaldı
  8. Sonra "Ev" sekmesini basın və eyni adlı dialoq qutusunu açmaq üçün "Paraqraf" qrupunda ox düyməsini basın.
  9. "Sətir aralığı" üçün "Çoxlu" seçin, dəyəri "0.06" olaraq təyin edin və "OK" düyməsini basın."Ana səhifə"->"Paraqraf" qutusunu açmaq üçün ox düyməsini klikləyin->"Sətir aralığı" üçün "Çoxlu" seçin->Dəyəri 0.06-da təyin edin->"OK" düyməsini basın
  10. İndi boş xəttin hündürlüyü minimuma endirilir. Görünüşü yenidən "Çap Layout"a dəyişə bilərsiniz.Boş xəttin hündürlüyünü daraltın

Aşağıdakı nəticəni yoxlayın:Dipnot ayırıcısının çıxarılması

Metod 2: Son qeyd ayırıcısını əl ilə çıxarın

  1. Metod 3-də ilk 1 addımı təkrarlayın, lakin bu dəfə “Qeydləri göstər” qutusunda “Son qeyd sahəsinə bax” seçin."Son qeyd sahəsinə baxın" seçin -> "OK" düyməsini basın
  2. Aşağıda açıq olan qeyd panelində “Son qeyd ayırıcısı” seçin və ayırıcı seçin. Sonra silin."Endnote Separator"->Separator seçin
  3. Sonra "Son qeydin davamı ayırıcısı" seçin və ayırıcını seçin və silin."Endnote Continuation Separator"->Separator seçin
  4. Sonra açılan düyməni klikləməklə yenidən “Son Qeyd Ayırıcı”nı seçin.
  5. Və 8-ci üsulda 10-dən 1-ə qədər təkrarlayın.

Budur nəticə:Son qeyd ayırıcısının çıxarılmasının təsiri

Metod 3: Makronu işlətməklə Haşiyə Ayırıcısını çıxarın

  1. Başlamaq üçün Word-də VBA redaktorunu işə salmaq üçün “Alt+ F11” düyməsini basın.
  2. Sonra "Normal" və sonra "Daxil et" sekmesini basın.
  3. Və növbəti "Modul" seçin."Normal"->"Daxil et"->"Modul" üzərinə klikləyin
  4. Sonra onu açmaq üçün iki dəfə klikləyin və makronuzu oraya yapışdı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ış" düyməsini basın.Kodları yapışdırın-> "Çalış" düyməsini basın

Makro bütün alt qeyd ayırıcılarını avtomatik silməli və qalan boş sətri də minimuma endirməlidir.

Metod 4: Makronu işlətməklə Son Qeyd Ayırıcısını çıxarın

Makronu quraşdırmaq və işə salmaq üçün 3-cü üsuldakı dəqiq addımları izləyin. Yalnız kodları bu kodlarla əvəz edin:

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

Sənədlərinizi Saxlayın

Heç bir proqram qüsursuz deyil və bu Word üçün çox doğrudur. Ümumiyyətlə, bu söz emal üçün belə faydalı bir vasitədir. Bununla belə, Word-ün çökməsi və sənədinizin zədələnməsi zamanı bəzi vaxtlar olur. Ən pisi odur ki, həmin sənəd əlinizdə olan yeganə nüsxədir. Bu çox kədərlidir. Ancaq ixtisaslı bir kommunal seçsəniz təmir dok bir anda tamamilə fərqli bir nəticə əldə edə bilərsiniz.

Müəllif Giriş:

Vera Çen məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc təmir xls və pdf proqram məhsullarının təmiri. Ətraflı məlumat üçün ziyarət edin www.datanumen.com

İndi paylaş:

Şərhlər bağlıdır.