Loncat ke daftar isi utama

Bagaimana cara menghapus garis pemisah catatan kaki / catatan akhir di dokumen Word?

Saat memasukkan catatan kaki atau catatan akhir dalam dokumen Word, Anda akan menemukan selalu ada garis pemisah horizontal di atas teks catatan kaki atau catatan akhir. Jika Anda ingin menghilangkan garis pemisah ini, silakan coba metode dalam artikel ini.

Hapus baris pemisah catatan kaki / catatan akhir di Word

Hapus baris pemisah catatan kaki / catatan akhir dengan kode VBA


Hapus baris pemisah catatan kaki / catatan akhir di Word

Anda dapat menghapus garis pemisah catatan kaki atau catatan akhir di Word sebagai berikut.

1. Dalam dokumen Anda akan menghapus garis pemisah catatan kaki atau catatan akhir, klik View > Draf.

2. Lalu klik Referensi > Tampilkan Catatan seperti gambar di bawah ini.

3. Jika ada catatan kaki dan catatan akhir dalam dokumen Anda, a Tampilkan Catatan kotak dialog akan muncul, pilih opsi yang Anda butuhkan dan kemudian klik OK tombol. Di sini saya pilih Lihat catatan kaki daerah.

Note: Jika hanya catatan kaki atau catatan akhir yang ada di dokumen Anda, abaikan langkah ini dan lanjutkan ke langkah 4.

4. Sekarang Catatan bagian ditampilkan di akhir dokumen, pilih Pemisah Catatan Kaki dalam Catatan kaki daftar drop-down, pilih garis pemisah dan kemudian tekan Delete kunci untuk menghapusnya. Lihat tangkapan layar:

5. Pindah ke Tata Letak Cetak tampilan dokumen.

Kemudian Anda dapat melihat garis pemisah di catatan kaki segera dihapus dari dokumen.

Note: Untuk menghapus garis pemisah catatan akhir, Anda hanya perlu memeriksa Lihat catatan akhir area di atas Tampilkan Catatan dialog, lalu pilih Pemisah Catatan Akhir dalam Catatan akhir daftar drop-down


Hapus garis pemisah catatan kaki / catatan akhir dengan kode VBA

Jika metode di atas tidak nyaman untuk Anda, Anda dapat mencoba kode VBA berikut untuk dengan cepat menghapus semua baris pemisah dari catatan kaki atau kedua catatan kaki dan catatan akhir dari dokumen.

1. Dalam dokumen Anda akan menghapus garis pemisah dari catatan kaki, tekan lain + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Dalam Microsoft Visual Basic untuk Aplikasi window, klik Menyisipkan > Modul. Kemudian salin kode VBA di bawah ini ke jendela Modul.

Kode VBA: hapus baris pemisah catatan kaki di 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 F5 kunci untuk menjalankan kode. Kemudian semua garis pemisah catatan kaki segera dihapus dari dokumen.

Note: Jika Anda ingin menghapus semua garis pemisah dari catatan kaki dan catatan akhir, kode VBA di bawah ini dapat membantu.

Kode VBA: hapus garis pemisah catatan kaki dan catatan akhir di 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 Produktivitas Kantor Terbaik

Kutools for Word - Tingkatkan Pengalaman Kata Anda dengan Over 100 Fitur Luar Biasa!

🤖 Asisten AI Kutools: Ubah tulisan Anda dengan AI - Hasilkan Konten  /  Menulis Ulang Teks  /  Meringkas Dokumen  /  Menanyakan Informasi berdasarkan Dokumen, semuanya dalam Word

📘 Penguasaan Dokumen: Halaman Terpisah  /  Gabungkan Dokumen  /  Ekspor Pilihan dalam Berbagai Format (PDF/TXT/DOC/HTML...)  /  Konversi Batch ke PDF  /  Ekspor Halaman sebagai Gambar  /  Cetak Banyak File sekaligus...

Pengeditan Isi: Temukan dan Ganti Batch di Banyak File  /  Ubah Ukuran Semua Gambar  /  Ubah Urutan Baris dan Kolom Tabel  /  Ubah Tabel menjadi Teks...

🧹 Bersih dengan Mudah: Menyapu Spasi Ekstra  /  Bagian Istirahat  /  Semua Header  /  Teks box  /  Hyperlink  / Untuk alat penghapus lainnya, kunjungi kami Hapus Grup...

Sisipan Kreatif: Memasukkan Seribu Pemisah  /  Kotak Centang  /  Tombol Radio  /  Kode QR  /  barcode  /  Tabel Garis Diagonal  /  Keterangan Persamaan  /  Keterangan gambar  /  Keterangan Tabel  /  Banyak Gambar  / Temukan lebih lanjut di Sisipkan Grup...

🔍 Pilihan Presisi: Tepat halaman tertentu  /  tabel  /  bentuk  /  paragraf judul  / Tingkatkan navigasi dengan lebih Pilih fitur...

Peningkatan Bintang: Navigasi dengan cepat ke lokasi mana pun  /  menyisipkan teks berulang secara otomatis  /  beralih antar jendela dokumen dengan mulus  /  11 Alat Konversi...

👉 Ingin mencoba fitur-fitur tersebut? Kutools for Word menawarkan a Uji coba gratis 60-hari, tanpa batasan! 🚀
 
Comments (6)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
This fixed my problem! Thank you!
Rated 5 out of 5
This comment was minimized by the moderator on the site
si funciona, me ayudo para mi tesis, muchas gracias.
This comment was minimized by the moderator on the site
Brilliant! Thank you!
This comment was minimized by the moderator on the site
Thank you very much you have saved me from my boss he was like please do anything I want a good presentation and this footnotes are like a shit.thanks to you.
This comment was minimized by the moderator on the site
If you have more than one page of footnotes, you'll also want to remove the "Footnote Continuation Separater". They sure make it hard to find; when a double-click might just take you to it. This did help me too, BTW.
This comment was minimized by the moderator on the site
Thanks!
Worked for me :-)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations