Sorot Nilai Lebih Besar

VBA 15.jpg

Jika misalkan kita memiliki Kumpulan data nilai yang cukup banyak terkadang kita memerlukan filter untuk mengetahui Berapa nilai yang lebih besar dari nilai yang ingin kita cari.

Kode vba berikut ini dapat berfungsi untuk mencari nilai yang lebih besar dari kriteria nilai yang kita tentukan.

Sebelum menggunakan kode vba ini kita harus memblok semua data nilai yang akan kita cari menggunakan kode ini, selanjutnya kode ini baru dapat kita jalankan.

Berikut kode vba yang akan kita gunakan untuk menyorot nilai yang lebih besar.

 

 

Sub SorotNilaiLebihBesar()
Dim i As Integer
i = InputBox("Enter Greater Than Value", "Enter Value")
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, Formula1:=i
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1)
.Font.Color = RGB(0, 0, 0)
.Interior.Color = RGB(31, 218, 154)
End With
End Sub

 

Download File Contoh

zip.png  Sorot Nilai Lebih Besar - 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.