Macro untuk Menghapus Hyperlink Tanpa Merubah Format
Pada postingan sebelumnya kita sudah belajar bagaimana caranya untuk Menghapus Hyperlink Tanpa Merubah Format pada Microsoft Excel. Proses tersebut dibuat secara manual dengan cara menghapus seluruh data yang ada hyperlinks-nya (clear contents), dilanjutkan dengan mengembalikan data tersebut dari data backup dengan cara copy paste formula.
Proses tersebut sebenarnya dapat dibuat lebih praktis dengan menggunakan macro/vba. Berikut adalah contoh script-nya.
'----------------------------------------------------
Sub clearHyperlinkWithoutFormat()
'je270215-remove hyperlinks tanpa merubah format
Dim sel As Range, tempFormula As String
Application.ScreenUpdating = False
For Each sel In Selection
If sel.Hyperlinks.Count > 0 Then
tempFormula = sel.Formula
sel.ClearContents
sel.Formula = tempFormula
End If
Next
End Sub
'----------------------------------------------------
- copy script di atas ke module standar dan buatkan shortcutnya
- Sorot/Seleksi range excel yang hyperlink-nya akan di hapus
- Jalankan macro tadi (clearHyperlinkWithoutFormat)
Semoga bermanfaat... :-)
BERITA LENGKAP DI HALAMAN BERIKUTNYA
Halaman Berikutnya
0 Response to "Macro untuk Menghapus Hyperlink Tanpa Merubah Format"
Posting Komentar