Petua: Bahasa lain diterjemahkan Google. Anda boleh melawat English versi pautan ini.
Log masuk
x
or
x
x
Daftar Sekarang
x

or

Bagaimana untuk menghapuskan garisan nota kaki / garisan pemisah akhir dalam dokumen Word?

Apabila memasukkan nota kaki atau endnotes dalam dokumen Word, anda akan mendapati terdapat garis pemisah mendatar di atas nota kaki atau teks nota akhir. Jika anda ingin menyingkirkan garis pemisah ini, sila cuba kaedah dalam artikel ini.

Keluarkan nota kaki / garisan pemisah nota di Word

Alih keluar garisan pemisah nota kaki / endnote dengan kod VBA


Keluarkan nota kaki / garisan pemisah nota di Word

Anda boleh mengalihkan nota kaki atau garisan pemisah nota di Word seperti berikut.

1. Dalam dokumen ini, anda akan mengeluarkan nota kaki atau garisan pemisah nota akhir, klik Lihat > draf.

2. Kemudian klik Rujukan > Paparkan Nota seperti gambar di bawah yang ditunjukkan.

3. Sekiranya terdapat kedua nota kaki dan nota tanda di dalam dokumen anda, a Paparkan Nota kotak dialog akan muncul, sila pilih pilihan yang anda perlukan dan kemudian klik OK butang. Di sini saya pilih Lihat nota kaki kawasan.

Nota: Jika hanya nota kaki atau endnote yang ada dalam dokumen anda, abaikan langkah ini dan beralih ke langkah 4.

4. Sekarang Nota seksyen yang dipaparkan pada akhir dokumen, sila pilih Pemisah Nota Kaki dalam Nota kaki senarai juntai bawah, pilih garis pemisah dan tekan butang Padam kunci untuk memadamkannya. Lihat tangkapan skrin:

5. Beralih ke Cetak Tata Letak pandangan dokumen itu.

Kemudian anda dapat melihat garisan pemisah nota kaki dikeluarkan segera dari dokumen.

Nota: Untuk mengalih keluar garisan pemisah endnote, anda hanya perlu menyemak Lihat endnote kawasan di atas Paparkan Nota dialog, kemudian pilih Pemisah Endnote dalam Endnote Senarai drop-down.


Alih keluar garisan pemisah nota kaki / endnote dengan kod VBA

Sekiranya kaedah di atas tidak mencukupi untuk anda, anda boleh mencuba kod VBA yang berikut untuk dengan cepat mengeluarkan semua garisan nota kaki separuh atau kedua nota kaki dan nota akhir dari dokumen.

1. Dalam dokumen tersebut, anda akan mengalihkan garisan pemisah nota kaki, tekan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi tingkap.

2. Di dalam Microsoft Visual Basic untuk Aplikasi tetingkap, klik Memasukkan > Modul. Kemudian salin di bawah kod VBA ke dalam tetingkap Modul.

Kod VBA: alih keluar garisan pemisah nota kaki dalam dokumen

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. Tekan butang F5 kunci untuk menjalankan kod. Kemudian garisan pemisah semua footnotes dikeluarkan segera dari dokumen.

Nota: Jika anda mahu mengeluarkan semua garisan nota kaki dan endnote, kod di bawah VBA boleh membantu.

Kod VBA: alih keluar nota kaki dan garisan pemisah nota dalam dokumen

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

Alat produktiviti Word yang disyorkan

shot kutools perkataan kutools tab 1180x121
shot kutools perkataan kutools plus tab 1180x120

Kutools For Word - Lebih Daripada Ciri-ciri Lanjutan 100 Untuk Microsoft Word, Simpan 50% Time anda

  • Operasi yang rumit dan berulang boleh dilakukan pemprosesan satu kali dalam beberapa saat.
  • Sisipkan beberapa imej merentas folder ke dalam dokumen Word sekaligus.
  • Gabungkan dan menggabungkan beberapa fail Word merentas folder ke dalam satu dengan pesanan yang anda inginkan.
  • Pisah dokumen semasa ke dalam dokumen berasingan mengikut tajuk 1, pecahan bahagian atau kriteria lain.
  • Tukar fail antara Doc dan Docx, Docx dan PDF, koleksi alat untuk penukaran dan pilihan biasa, dan sebagainya...
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.