3 Kaedah Berkesan untuk Melayari mengikut Kotak Teks dalam Dokumen Word Anda

Dalam artikel ini, kami dengan senang hati menunjukkan kepada anda 3 cara yang berkesan untuk melayari mengikut kotak teks dalam dokumen Word anda.

Ada perintah "Select Browse Object" di Word yang memungkinkan anda melihat-lihat objek yang anda pilih sahaja. Contohnya, anda boleh memilih untuk melihat mengikut jadual atau halaman. Malangnya, tidak ada fungsi terbina dalam untuk melayari mengikut kotak teks. Oleh itu, kami akan memberi anda 3 cara untuk melakukannya.

Kaedah 1: Gunakan Kekunci "Tab"

1. Pertama sekali, tekan "Ctrl+ Home" untuk pergi ke permulaan dokumen.
2. Kemudian cari dan klik pada kotak teks pertama.
3. Seterusnya tekan "Tab" untuk melompat ke kotak teks seterusnya.

Ngomong-ngomong, dengan cara ini juga akan anda dapati bentuk dan gambar dalam dokumen.

Kaedah 2: Jalankan Makro untuk Melompat dari Satu Kotak Teks ke Kotak Yang Lain

1. Pertama sekali, tekan "Alt + F11" untuk mengaktifkan editor VBA dalam Word.
2. Klik seterusnya "Normal".
3. Kemudian klik "Insert" dan pilih "Module" pada menu drop-down.
4. Buka modul baru dengan klik dua kali.
5. Sekarang di kawasan pengekodan, tampal kod berikut:

Sub BrowseByTextBox()
  Dim objShape As Shape
  Dim strBoxText As String
  Dim strButtonValue As String
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Select
      Selection.ShapeRange.TextFrame.TextRange.Select
      strBoxText = objShape.TextFrame.TextRange.Text
      strButtonValue = MsgBox("This text box contains: " & vbNewLine _
                       & strBoxText & vbNewLine & "Is this your desired text box?" _
                       & vbNewLine, vbYesNo, "Desired Text Box")
      If strButtonValue = vbYes Then
        Exit Sub
      End If
    End If
  Next objShape
End Sub

6. Klik butang "Jalankan" pada bar menu atau tekan "F5" untuk melaksanakan kodnya.

Sebaik sahaja anda mula menjalankan makro, akan terdapat kotak mesej yang muncul, seperti di bawah:

Pada kotak menunjukkan kandungan dalam kotak teks yang dipilih sekarang. Anda boleh mengklik "Ya" untuk menghentikannya jika kotak teks yang anda mahukan. Jika tidak, klik "Tidak" untuk pergi ke kotak teks seterusnya.

Kaedah 3: Cari Kotak Teks Khusus

Sekiranya anda menetapkan tajuk untuk kotak teks dalam dokumen, anda boleh menggunakannya bersama dengan makro berikut untuk mencarinya dengan segera.

1. Pertama sekali, rujuk langkah dalam kaedah 2 untuk memasang dan menjalankan makro.
2. Kemudian ingat untuk menggantikan makro dengan yang berikut:

Sub FindASpecificTextBox()
  Dim objShape As Shape
  Dim strBoxTitle As String
  Dim objInlineShape As InlineShape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  strBoxTitle = InputBox("Enter the title of the text box to be found here: ")
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Select
      Selection.ShapeRange.TextFrame.TextRange.Select
      If objShape.Title = strBoxTitle Then
        Exit Sub
      End If
    End If
  Next objShape
  For Each objInlineShape In objDoc.InlineShapes
    If objInlineShape.Type = msoTextBox Then
      objInlineShape.Select
      Selection.ShapeRange.TextFrame.TextRange.Select
      If objInlineShape.Title = strBoxTitle Then
        Exit Sub
      End If
    End If
  Next objInlineShape
 
  Application.ScreenUpdating = True
End Sub

3. Seterusnya dalam kotak input yang diminta, masukkan tajuk kotak teks yang hendak dicari dan klik "OK" untuk meneruskan. Anda akan menemui kotak teks sasaran dalam pilihan.

Mengatasi Kehilangan Data

Memandangkan Word merupakan salah satu perisian yang paling banyak digunakan, adalah perlu untuk mengetahui beberapa helah sebaik sahaja Word berhenti bertindak balas. Untuk maklumat penting doc rosak, satu-satunya pilihan anda ialah memulihkannya. Dan untuk melakukan ini, anda perlu memilih alat pihak ketiga yang boleh anda percayai dengan teliti.

Pengenalan Pengarang:

Vera Chen adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk xlsx rosak dan pdf membaiki produk perisian. Untuk maklumat lebih lanjut, lawati www.datanumen.com