Dalam postingan ini, kami dengan senang hati akan menyajikan 3 cara cepat untuk memilih halaman saat ini di dokumen Word Anda.
Sesekali, Anda mungkin perlu memilih halaman saat ini untuk menyalin atau mengekstrak isinya. Biasanya, kita akan meletakkan kursor di awal halaman dan menahan klik kiri untuk memilih seluruh halaman. Namun, Anda harus mengakui bahwa metode ini tidak selalu efektif, karena kesalahan dapat terjadi. Meskipun bukan hal yang sulit, Anda dapat menghemat waktu dengan menggunakan metode yang lebih cepat.
Inilah 3 solusi kami.
Metode 1: Pintasan Keyboard untuk Dokumen Satu Halaman
Ketika hanya ada satu halaman dalam dokumen, yang perlu Anda lakukan adalah menempatkan penunjuk penyisipan di mana saja di dalam dokumen dan tekan "Ctrl+ A".
Metode 2: Pintasan Keyboard untuk Dokumen Multi-halaman
Sekarang berbicara tentang dokumen dalam banyak halaman, Anda dapat mengambil langkah-langkah berikut:
- Pertama, posisikan penunjuk penyisipan di awal halaman target.
- Selanjutnya tekan "Shift".
- Kemudian gulir ke bawah ke bagian bawah halaman itu dan klik di bagian akhir halaman.
Metode 3: Jalankan Makro Kata
- Pertama dan terpenting, klik pada halaman tujuan.
- Kemudian klik tab "Pengembang".
- Selanjutnya klik "Visual Basic" untuk membuka editor VBA. Atau tekan "Alt+ F11" untuk melakukannya.
- Sekarang klik proyek "Normal" dan kemudian tab "Sisipkan".
- Pilih "Modul" pada menu drop-down.
- Klik dua kali berikutnya pada modul yang baru dimasukkan untuk membuka ruang pengkodean.
- Tempel kode berikut di sana:
Sub SelectCurrentPage()
Dim lCurrentPageStart As Long
Dim lCurrentPageEnd As Long
Dim objPageRange As Range
Dim nCurrentPageNumber As Integer
Dim nAllPageNumber As Integer
nCurrentPageNumber = Selection.Information(wdActiveEndPageNumber)
nAllPageNumber = Selection.Information(wdNumberOfPagesInDocument)
' Get the start position of current page.
lCurrentPageStart = Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:=nCurrentPageNumber).Start
' Get the end position of current page.
If nCurrentPageNumber = nAllPageNumber Then
lCurrentPageEnd = ActiveDocument.Content.End
Else
lCurrentPageEnd = Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:=nCurrentPageNumber + 1).Start
End If
' Select current page.
Set objPageRange = ActiveDocument.Range(Start:=lCurrentPageStart, End:=lCurrentPageEnd)
objPageRange.Select
End Sub
- Terakhir, klik "Jalankan" atau tekan "F5". Semua teks di halaman itu sekarang sedang dipilih.
Pulihkan Dokumen Word
Akan sangat menyebalkan menemukan dokumen Word Anda rusak, membuat Anda tidak dapat mengakses informasi Anda. Pastinya tidak ada yang ingin memilikinya dokumen korup. Namun, ketika hal yang tidak terduga terjadi, satu-satunya pilihan yang tersisa adalah mengambil kembali data dengan alat bawaan atau pihak ketiga.
Pengantar Penulis:
Vera Chen adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk Excel rusak ke pdf memperbaiki produk perangkat lunak. Untuk informasi lebih lanjut kunjungi www.datanumen.com


