heheheee coly em sory pak seno...., untuk yg kmarin belum memenuhi apa yang saya harapkan. karena yg saya inginkan sperti yg pertyan baru ini... but kulo inggih matursuwun pun pean bantu...
lha sing niki kulo coba rumiyen nggihhhhh Pada 25 Januari 2012 19:41, o' Seno <[email protected]> menulis: > Mengenai pertanyaan sebelum ini (case #15345); apa kabarnya bung ? > misal tanggapan2 gak ada gunanya, juga konfirmlah ke penanggap > Lha wong yg lama belum "selesai" kok sudah tanya baru lagi ... > Sudah pernah dengar cerita "orang dan mesin ATM" kah ?? > (..geleng-geleng-kepala...cara orang jawa mengexpressikan perasaan..) > > '------------ > Sub cFindID() > ' coded by o'Seno / BeExcel Case #15396 > '-------------------------------------- > Dim SearchStr As String, FoundAt As Range > SearchStr = Sheets("dBASE").Range("E5").Value > > With Sheets("dBASE").Range("T15:T5014") > *Set FoundAt* = .Find(What:=SearchStr) > End With > > If FoundAt Is Nothing Then > MsgBox "Tidak ada data [ " & SearchStr & " ] di area tsb.", 48 > Else > Sheets("F_INPUT").Range("AD5") = FoundAt.Value > MsgBox FoundAt.Value & " Ketemu di " & FoundAt.Address, 64 > End If > > End Sub > '-------------------- > > perhatikan cell tempat ketemunya string yg dicari kita set sebagai range > > > *o'Seno* ------------------------------------ --------------------------------------------------------------------- bergabung ke milis (subscribe), kirim mail kosong ke: [email protected] posting ke milis, kirimkan ke: [email protected] berkunjung ke web milis http://tech.groups.yahoo.com/group/belajar-excel/messages melihat file archive / mendownload lampiran http://www.mail-archive.com/[email protected]/ atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/ menghubungi moderators & owners: [email protected] keluar dari membership milis (UnSubscribe): kirim mail kosong ke [email protected] ---------------------------------------------------------------------Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/belajar-excel/ <*> Your email settings: Individual Email | Traditional <*> To change settings online go to: http://groups.yahoo.com/group/belajar-excel/join (Yahoo! ID required) <*> To change settings via email: [email protected] [email protected] <*> To unsubscribe from this group, send an email to: [email protected] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
