Cara Manampilkan Alamat URL pada Hyperlink | VBA Excel

Hallo, beberapa waktu yang lalu ada sebuah pertanyaan dan mohon maaf saya tidak sebutkan dari siapa namun mudah-mudahan artikel ini bisa menjawab pertanyataan yang telah dilontarkan. Oia sebelumnya terimakasih kepada temen-temen yang telah setia mengunjungi blog Excel-ID ini dan menjadikan referensi dalam belajar excel baik dari dasar sampai dengan profesional.

Baca:
Cara Menghapus Hyperlink

Nah, pada artikel kali ini kita akan membahas bagaimana cara menampilkan sebuah alamat URL pada hyperlink yang kita ambil dari website dan kita taroh ke wokrsheet. Nah jadi ketika kalian mengcopy sebuah link yang ada pada website dan dipastekan ke worksheet maka yang muncul adalah alamat hyperlink nya dan ini ditandai dengan warna font biru dengan bergaris bawah. Sebenarnya jika kalian mengklik text yang mengandung hyperlink tersebut maka kalian akan dibawa ke website alamat yang bersangkutan.

Oke langsung saja kita mulai misalnya saya telah mengcopy sebuah text yang mengandung link pada worksheet dan hasilnya akan tampil seperti gambar berikut ini :

Dari gambar diatas terlihat bahwa hanya sebuah tulisan yang bergaris bawah dan berwarna biru, sebenarnya itu adalah hyperlink yang mengarah pada alamat website yang sesuai dengan hyperlink tersebut. Jika kalian klik teks tersebut maka akan masuk ke url yang dituju. Lalu bagaimana caranya untuk menampilkan URL tersebut?


Oke kita sedikit gunakan script VBA untuk menampilkan alamat URL yang dimaksud. Caranya yaitu kalian silakan masuk ke VBA editor dengan cara keli menu Developer kemudian View Code atau kalian bisa menekan tombol F5 dan akan langsung dibawa ke VBA editor.

Setelah itu kalian tuliskan coding VBA nya seperti berikut ini pada sebuah Module

Function TampilkanLink(RangaData As Range) As String
TampilkanLink = RangaData.Hyperlinks(1).Address
End Function

Nah coding tersebut kita telah membuat sebuah formula (rumus) TampilkanLink dan cara menggunakannya yaitu silakan kalian masuk ke workshet yang mengandung hyperlink dan tuliskan pada kolom B atau tepat nya di cell B1 dengan formula

=TampilkanLink(A1)

jika kalian tekan enter maka hasilnya adalah  sebuah alamat url yang mengarah kepada :

http://www.excel-id.com/2018/08/cara-copy-data-di-sheet-yang-berbeda.html

dan jika kalian ingin menguji hyperlink yang ada di bawah nya tinggal kalian tarik saja rumus tersebut sehingga hasilnya akan seperti berikut ini

http://www.excel-id.com/2018/08/cara-copy-data-di-sheet-yang-berbeda.html
http://www.excel-id.com/2018/07/cara-membuat-upercase-huruf-besar-semua.html
http://www.excel-id.com/2018/07/membatasi-jumlah-karakter-pada-cell.html
http://www.excel-id.com/2018/04/mudahnya-cara-validasi-input-nomor-ktp.html
http://www.excel-id.com/2018/03/cara-menampilkan-nama-file-otomatis.html

Oke, kira-kira seperti itu semoga bermanfaat dan silakan kembangkan sesuai dengan kreatifitas kalian semoga bisa membantu permasalahan dalam belajar Ms. Excel


Simak juga :

Cara Membuat Hyperlink Antar Sheet

https://bit.ly/2LZkCJz

Tweet