Coba pada event click milik tombol fetch diberi script :
'asumsi :
'1. txtDate adalah nama textbox tanggal
'2. txt Revenue adalah nama textbox hasil lookup
'3. inputan dalam txtDate bisa menjadi date menurut komputer setempat
txtRevenue.text=evaluate("=VLOOKUP(1*" & cdate(txtDate.text) &
",$A$2:$B$17,2)")
Wassalam,
Kid.
2013/5/17 freddy heru soermin <[email protected]>
> **
>
>
> Dear Exceler,
> sangat butuh bantuannya untuk coding VB user form berikut.saya ingin
> apabila saya isi tanggal di textbox pertamadan setelah itu saya klik
> Fetch kemudian di text box berikutnya muncul nilaiyang mendekati dengan
> tanggal yang saya inginkan (hampir sama fungsinya seperti Vlookup)
> HS.Freddy
>
>
>
