3 Metode Cara Menghapus Semua Hyperlinks di Office Word

Untuk menghapus semua hyperlink di Office Word bukanlah hal yang sulit bagi pengguna Office Word, saya menemukan trik baru, tutorial kali ini membahas cara remove semua link di Microsoft Office Word dengan beberapa metode.

Hapus Link satu persatu

1. Klik kanan pada hyperlink di dokumen
2. klik Remove Hyperlink dari menu klik kanan, lihat gambar di bawah ini:

Menghapus semua Link di Office Word

Cara ini mudah untuk menghapus satu link, namun akan menyita banyak waktu jika link pada dokumen berjumlah banyak.

Hapus Semua Link dengan Shortcut

Banyak pengguna Office yang sudah tingkat lanjut, sudah prefer dengan Shortcut. Cara ini akan menghemat waktu pekerjaan anda, dan menghapus semua link dengan Shortcut sudah tersedia. Caranya adalah:

1. Tekan CTRL+A untuk memblok semua teks dan apa saja objek di dokumen
2. Tekan CTRL+Shift+F9

Cara tersebut juga akan menghapus semua hyperlink di dokumen Office Word.

Hapus Semua Hyperlinks dengan VBA

Untuk pengguna tingkat lanjut, anda bisa menggunakan VBA untuk menghapus semua link, caranya:

1. Tekan Alt+F11 di Keyboard untuk menuju ke Visual basic editor
2. Klik Insert > Module, lalu copy dan paste kode di bawah ini:
3. Lalu klik Run Sub button untuk menjalankan Code macro anda.

Code VBA 1: untuk menghapus semua link di dokumen yang sedang dibuka.

Sub KillTheHyperlinks()
‘ ———————————————–
‘ Removes all hyperlinks from the document:
‘ Text to display is left intact
‘ ———————————————–
With ThisDocument
‘ Loop while there are hyperlinks afoot!
While .Hyperlinks.Count > 0
.Hyperlinks(1).Delete
Wend
End With
‘ Shut this off, don’t need anymore popping up
Application.Options.AutoFormatAsYouTypeReplaceHyperlinks = False
End Sub

Code VBA 2: Untuk menghapus semua hyperlinks pada semua dokumen Office Word yang anda buka.

Sub KillTheHyperlinksInAllOpenDocuments()
‘ ———————————————–
‘ Removes all hyperlinks from any open documents
‘ Text to display is left intact
‘ ———————————————–
Dim doc As Document
Dim szOpenDocName As String

‘ Loop through all open documents:
For Each doc In Application.Documents
‘ Store the document name
szOpenDocName = doc.Name
‘ Remove the hyperlinks from that document
With Documents(szOpenDocName)
‘ Loop while there are hyperlinks afoot!
While .Hyperlinks.Count > 0
.Hyperlinks(1).Delete
Wend
End With
‘ Shut this off, don’t need anymore popping up
Application.Options.AutoFormatAsYouTypeReplaceHyperlinks = False
Next doc
End Sub

Oke itulah cara menghapus semua hyperlinks di Microsoft Office Word, semoga artikel-nya mudah dipahami, untuk mengetahui cara menghapus semua Links di Microsoft excel, lihat disini.

Credit: http://www.extendoffice.com/

Pencarian Masuk:

  • cara buka kunci liga atau klub di winner soccer
  • cara screenshot hp advan s4j
  • garis lapangan texture
  • peluncur buat lenovo s660 row

Leave a Reply