Sorot Name Range

VBA 14.jpg

Ada beberapa diantara kita yang sering Menggunakan name range untuk mempercepat pencarian referensi sel. Namun saat kita menggunakan banyak name range terkadang kita lupa lokasi name range yang telah kita buat.

Kode vba yang akan kita buat ini dapat menyeret Lokasi name range yang sudah ada pada sheet.

Berikut kode yang kita perlukan untuk dapat menyeret Numbering pada halaman sheet.

 

 

Sub SorotNamaRange()
    Dim RangeName As Name
    Dim HighlightRange As Range
    On Error Resume Next
    For Each RangeName In ActiveWorkbook.Names
    Set HighlightRange = RangeName.RefersToRange
    HighlightRange.Interior.ColorIndex = 36
    Next RangeName
End Sub

 

Download File Contoh

zip.png  Sorot Nama Range - OK.zip

 

Semoga bermanfaat,

Salam ALMaS.

 

 

HUBUNGI KAMI

Kantor berkreasi.net
Alamat :
 

Jl. Cilincing jakarta utara

Tulangan Sidoarjo Jatim

Email              : Alamat email ini dilindungi dari robot spam. Anda memerlukan Javascript yang aktif untuk melihatnya.
Form Kontak  : Klik Disini
SMS only : 085 606 139 312  im3 (Mas Ali)

Pembayaran Via Transfer :

bni.jpg
Bank BNI Cab. Jember
No.rek. 019 598 5992
Atas nama Sdri IMAS KHASANAH

bri.jpg
Bank BRI Cab. Wonokromo
No.rek. 0976 01 004629 50 8
Atas nama IMAS KHASANAH

TIM PENGEMBANG

Dr. Nugroho Eko Putro, M.Pd.
Amien sawedi, S.Pd.
Aries Eko Wibowo, S.Pd. MM.
Fauzan, M.Kom.
Sahrudin, M.Pd.
Budi Prasetya, ST., MM.
Muhammad Risal Maros, M.Pd.
Didik P Wicaksono, M.Pd.
Wayan Mulyana, M.Pd.
Ali, M.Pd.