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

or

Bagaimana untuk memilih atau memadam teks antara dua penanda halaman dalam dokumen Word?

Adakah anda tahu bagaimana untuk memilih atau memadam kandungan antara dua penanda buku dalam dokumen Word? Artikel ini akan menunjukkan kepada anda cara untuk mengatasinya.

Pilih / padamkan teks antara dua penanda buku dengan VBA


Pilih / padamkan teks antara dua penanda buku dengan VBA

Memandangkan terdapat dua penanda halaman dalam dokumen anda seperti di bawah tangkapan skrin yang ditunjukkan, anda boleh memilih atau memadam semua kandungan di antara dua penanda halaman ini dengan kod VBA yang berikut.

1. Dalam dokumen, 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 ke tetingkap Modul.

Untuk memilih atau memadam teks antara dua penanda halaman, sila gunakan kod ini:

Kod VBA: Pilih teks antara dua penanda halaman tertentu dalam Word:

Sub SelectBetweenBookmarks()
    Dim xRange As Range
    Dim xBMone, xBMtwo As Bookmark
Dim xBookMarkOne, xBookMarkTwo As String
On Error Resume Next
    Set xRange = ActiveDocument.Content
    xBookMarkOne = InputBox("Please enter the start bookmark:", "Kutools for Word")
    xBookMarkTwo = InputBox("Please enter the end bookmark:", "Kutools for Word")
    Set xBMone = ActiveDocument.Bookmarks(xBookMarkOne)
    Set xBMtwo = ActiveDocument.Bookmarks(xBookMarkTwo)
    If xBMone Is Nothing Or xBMtwo Is Nothing Then
        MsgBox "Please enter the correct bookmark name", vbInformation, "KuTools for Word"
        Exit Sub
    End If
    xRange.Start = xBMone.Range.End
    xRange.End = xBMtwo.Range.Start
    xRange.Select
End Sub

Kod VBA: Padam teks antara dua penanda yang dinyatakan dalam Word:

Sub DeleteBetweenBookmarks ()
    Dim xRange As Range
    Dim xBMone, xBMtwo As Bookmark
Dim xBookMarkOne, xBookMarkTwo As String
On Error Resume Next
    Set xRange = ActiveDocument.Content
    xBookMarkOne = InputBox("Please enter the start bookmark:", "Kutools for Word")
    xBookMarkTwo = InputBox("Please enter the end bookmark:", "Kutools for Word")
    Set xBMone = ActiveDocument.Bookmarks(xBookMarkOne)
    Set xBMtwo = ActiveDocument.Bookmarks(xBookMarkTwo)
    If xBMone Is Nothing Or xBMtwo Is Nothing Then
        MsgBox " Please enter the correct bookmark name ", vbInformation, "KuTools for Word"
        Exit Sub
    End If
    xRange.Start = xBMone.Range.End
    xRange.End = xBMtwo.Range.Start
    xRange.Delete
End Sub

3. Tekan butang F5 kunci untuk menjalankan kod.

4. Yang pertama Kutools untuk Word kotak dialog, masukkan nama penanda mula mula ke dalam kotak teks dan klik OK.

5. Pada yang kedua Kutools untuk Word kotak dialog, masukkan penanda halaman akhir dan klik OK. Lihat tangkapan skrin:

Nota: Jika nama penanda buku yang anda masukkan tidak wujud dalam dokumen, satu lagi kotak dialog Kutools untuk Word akan muncul untuk mengingatkan anda untuk memasukkan yang betul.

Kemudian semua kandungan di antara penanda halaman tertentu dipilih atau dipadamkan dengan serta-merta. Lihat tangkapan skrin.

Pilih teks antara dua penanda halaman:

Padam teks antara dua penanda buku.

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.