2 Cara Cepat Pergi ke Paragraf Tertentu dalam Dokumen Word Anda

Bagikan sekarang:

Dalam postingan ini, kami dengan senang hati akan menunjukkan kepada Anda 2 cara untuk langsung menuju ke paragraf tertentu dalam dokumen Word Anda.

Ada fungsi "Pergi Ke" di Word, yang dengannya kita dapat dengan cepat melompat ke halaman, bagian, bookmark, dll. Tetapi sangat disayangkan bahwa fitur bawaan tidak dapat membawa kita ke paragraf yang ditentukan dalam satu klik. Karena itu, kami merasa berkewajiban untuk memberi Anda beberapa solusi.Buka Paragraf Tertentu di Dokumen Word Anda

Metode 1: Buka Paragraf Tertentu dalam Dokumen tanpa Nomor Paragraf

  1. Pertama dan terpenting, tekan “Alt+F11” untuk membuka editor VBA di Word.
  2. Kemudian klik “Normal” di kolom kiri.
  3. Selanjutnya klik "Sisipkan" dan pilih "Modul" pada menu tarik-turunnya.Klik "Normal" -> Klik "Sisipkan" -> Klik "Modul"
  4. Sekarang klik dua kali pada modul baru untuk membukanya. Tempelkan kode berikut di sana:
Sub RemoveBlankParagraphs()
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .ClearFormatting
      .Replacement.ClearFormatting
      .Text = "^p^p"
      .Replacement.Text = "^p"
      .Forward = True
      .Wrap = wdFindContinue
      .Format = False
      .MatchCase = False
      .MatchWholeWord = False
      .MatchWildcards = False
      .MatchSoundsLike = False
      .MatchAllWordForms = False
      .Execute
    End With
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
  If Selection.Find.Found = False Then
    MsgBox ("There is no blank paragraph in the document.")
    Call GoToASpecificParagraph
  End If
End Sub

Sub GoToASpecificParagraph()
  Dim strParaNum As String
  Dim objDoc As Document
  Dim nParaNum As Integer
 
  Set objDoc = ActiveDocument
  strParaNum = InputBox("Enter a number representing the paragraph you need to go to: ", "Paragraph Number")
 
  nParaNum = objDoc.ComputeStatistics(wdStatisticParagraphs)
 
  If strParaNum <= "0" Or strParaNum > nParaNum Then
    MsgBox ("This is not a valid number. Please enter a number between 1 and " & nParaNum & ".")
  End If
 
  objDoc.Paragraphs(strParaNum).Range.Select
 
End Sub
  1. Klik "Jalankan".Masukkan Kode-> Klik "Jalankan"
  2. Jalankan makro beberapa kali hingga Anda mendapatkan kotak pesan berikut.Klik "OK"

Kemudian klik “Oke”. Alasan kami mengklik tombol "Jalankan" beberapa kali adalah untuk menghapus semua paragraf kosong dalam dokumen. Secara default, Word menganggapnya sebagai paragraf normal. Jadi hasil akhirnya mungkin bukan paragraf yang tepat yang ingin kita tuju.

  1. Kemudian di kotak berikutnya yang terbuka, masukkan nomor, yang mewakili paragraf yang perlu Anda kunjungi.
  2. Dan klik "OK".Masukkan Nomor-> Klik "OK"

Anda akan melihat paragraf target sudah terpilih.Paragraf Target dalam Seleksi

Metode 2: Buka Paragraf Tertentu dalam Dokumen dengan Nomor Paragraf

  1. Pertama, tekan "Ctrl + A" untuk memilih semua teks dalam dokumen.
  2. Kemudian klik "Penomoran" di bawah tab "Beranda".Klik "Beranda"->Klik "Penomoran"
  3. Selanjutnya ikuti langkah yang sama dalam metode 1 untuk menginstal dan menjalankan makro.
  4. Hanya saja kali ini ganti makro dengan yang di bawah ini:
Sub GoTOParaInDocWithParaNum()
  Dim strParaNum As String
  Dim objPara As Paragraph
  Dim objDoc As Document
  Dim nParaNum As Integer
 
  Set objDoc = ActiveDocument
 
  strParaNum = InputBox("Enter a paragraph number following with a period:", "Paragraph Number")
 
  nParaNum = objDoc.ComputeStatistics(wdStatisticParagraphs)
 
  If strParaNum <= "0" Or strParaNum > nParaNum Then
    MsgBox ("This is not a valid number. Please enter a number between 1 and " & nParaNum & ".")
  End If
 
  For Each objPara In objDoc.Paragraphs
    If strParaNum = objPara.Range.ListFormat.ListString Then
      objPara.Range.Select
    End If
  Next
End Sub
  1. Selanjutnya klik "Run" atau tekan "F5".
  2. Di dalam kotak terbuka, masukkan nomor paragraf berikut dengan titik di kotak teks.
  3. Klik "OK" untuk melanjutkan.Masukkan Nomor dengan Titik->Klik "OK"

Demikian pula, paragraf target seharusnya sudah dalam tahap seleksi sekarang.

Perbaiki Dokumen yang Rusak

Setelah Anda menemukan dokumen Anda rusak, Anda tidak bisa tidak menekan keberuntungan Anda dengan harapan itu akan kembali saat Anda membukanya lagi. Sebaliknya, Anda harus memanfaatkan waktu untuk mendapatkan alat yang unggul untuk kerusakan doc perbaikan, untuk setiap menit penting dalam proses perbaikan.

Pengantar Penulis:

Vera Chen adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk perbaiki xlsx ke pdf memperbaiki produk perangkat lunak. Untuk informasi lebih lanjut kunjungi www.datanumen.com

Bagikan sekarang:

Komentar ditutup.