Kali ini kami akan berbagi tip singkat dari sebuah contoh bagaimana cara untuk menghasilkan alamat link saja dari suatu hyperlink dengan menggunakan kode UDF Macro VBA Excel.

Hyperlink adalah salah satu menu dalam Excel yang berfungsi membuat suatu link atau tautan dalam dokumen Excel untuk mengakses file, halaman web, atau alamat E-mail dengan cepat.

Tip ini akan sangat berguna bagi Anda yang ingin hanya menuliskan alamat link yang dituju secara utuh pada kumpulan judul hyperlink di worksheet secara efektif dan efisien.

Pada gambar di atas, kolom B menampilkan alamat link yang diambil dari judul hyperlink di kolom A.

Kode UDF di bawah ini akan menghasilkan alamat hyperlink yang seutuhnya, adapun kode "mailto" disediakan untuk mengantisipasi kemungkinan link berupa suatu alamat e-mail.

Ikuti langkah-langkah berikut untuk menyusun kode UDF:

1. Buat contoh barisan sel seperti pada gambar.

2. Tekan Alt+F11 untuk menampilkan VBE.

3. Buat module baru melalui menu Insert > Module.

4. Berikan judul UDF misalnya LNK dengan mengetik garis kode berikut diakhiri dengan Enter:

Function LNK(sh As Range)

5. Tepat di bawah garis kode tersebut, ketik kode;

LNK = Replace(sh.Hyperlinks(1).Address, "mailto:", "")

6. Kode lengkapnya adalah:

Function LNK(sh As Range)
LNK = Replace(sh.Hyperlinks(1).Address, "mailto:", "")
End Function

7. Tekan Alt+Q untuk kembali ke worksheet dan silakan masukkan rumus yang telah Anda buat sendiri tersebut.

Demikian pembahasan singkat mengenai cara mengambil alamat link-nya saja pada suatu hyperlink dengan Macro VBA Excel, selamat mempraktikkan dan semoga bermanfaat.