Hai Apriyadi,
1. Pada properti Min milik si scroll (lihat di properties window -> tekan
F4 di VBE) diisi 1
2. pada event change milik tombol searching berdasar nama, diisi dengan :
dim rng as range 'asumsi nama di tabel data ada di kolom A
set rng=sheets("nama sheet datanya").range("a:a").find(
nama_textbox_control_nama.text )
if not rng is nothing then
nama_control_scroll.value=rng.row-1 'jika header tabel di baris 1
nama_control_scroll_Change 'panggil prosedur sub event milik si
control scroll
endif
*** terapkan nomor 2 pada event change milik si tombol searching berdasar
kolom lainnya dengan menyesuaikan baris berbunyi :
set rng=sheets("nama sheet datanya").range("a:a").find(
nama_textbox_control_nama.text )
agar merujuk ke nama sheet data, alamat kolom ("b:b" atau "c:c" dan
sebagainya), beserta nama control textbox sumber text yang dicari
Wassalam,
Kid.
2014-03-02 14:59 GMT+07:00 Apriyadi <[email protected]>:
>
>
>
> Salam Sejahtera,
>
>
> Mohon bantuan para Master Excel untuk menyelesaikan permasalahan saya.
> Gambaran singkat permasalahan seperti ini.
>
> Ketika tombol Scroll awal saya klik maka data Judul di data masuk ke
> Record sehingga Judul bisa di delete atau pun di edit.Yang semestinya judul
> tidak tertampil sehingga tidak dapat di ubah ataupun dihapus.
>
> Dan saya mengharapkan bisa searching nama berdasarkan nama atau kode yang
> saya inginkan.
>
> Atas bantuan para master saya ucapkan terima kasih
>
> Thank
>
>
>
>
> Apriyadi
>
>
>
