MATERI DASAR VBA EXCEL - PENCARIAN DATA DAN MELARANG DATA GANDA

[@gempogempo9369]

Nah ini yang saya cari/butuhkan.....matur suwun mas Erwin......sehat terus mas..tak do'ane sing akeh rezekine yo,,,,,,

[@EAProject]

Aminn

[@Waktu-Luang]

Mantaaap om,,fix ini chanel bapak excel indonesia,semangat & sehat selalu om,,

[@fatimahrohimah576]

wah hebat luar biasa
telah berbagi ilmunya
bermanfaat bagi sesama
salam kreatifitas

[@azuantmotovlog1116]

Mantap, akhirnya ketemu juga

[@DFAnto]

Semoga sehat selalu Mas Erwin... dan banyak rejeki nya .. dan selalu berbagi...Terima kasih Ilmu nya

[@bahri1368]

Terimakasih ilmunya sangat bermanfaat.
Sukses terus bang dan semoga sehat selalu. saya banyak belajar dari Abang Erwin.

[@chanelandiyoutube8313]

Sukses terus bang erwin, saya andi nonton terus videoanya sekaligus belajar juga, Alhamdulillah bermanfaat sekali bang. Berulang2 saya nonton bang. Terima kasih bang video2nya bermanfaat sekali 😊

[@B-1771]

Thanks bang ternyata ada disini

[@ahmadrifqiasyhar4035]

bang apa bisa bikinin excel kasir otomatis yang mana beda customer harganya beda(beda bukan karena discount tapi karena harga kita sendiri yang ngatur pembedanya)

[@agustinaberek3063]

Bang coba buat Raport Kurikulum Merdeka Bang. Sangat dibutuhkan sekarang unt semua jenjang pendidikan. Please 🙏🙏

[@anasfatulloh7769]

Mas erwin ko pas run data tidak muncul di sheet2 ya

[@arierevar2704]

Hasil pencarian tidak dapat copy di sheet hasil..
Tlng bri petunjuk..🙏

[@aanbae9886]

Kalau pencariannya seperti barcode di isi langsung muncul di lisbox tidak melalui tombol seach gimanaya... Apa yg di rubah

[@altertarigan1539]

saya hasilnya data tidak di temukan kak
padahal udah oke semua dari awal ada solusi kah?

[@tradersnoteid]

Bang saya coba terapkan pada 2 table jenis berbeda namun pada 1 form hasilnya di tabel ke 2 tidak berhasil

[@kabarkawan6619]

Saat klik tombol cancel muncul msgbox

[@julianaputri296]

Kalo misalnya blm muncul data hasil cari nya itu di list box pak,masalhnya dimna?

[@muhamadrafli5050]

bang kok saya gabisa ke untuk cari kriterianya selalu ke error msg box "data tidak ditemukan" ya bang? gabisa nyari datanya

[@bryancoy3048]

Mas erwin mau tanya , kalau tarik data berdasarkan tanggal dari dan sampai tapi sekaligus isi nama bisa gak ya ? Karna saya coba kembangin dari range tanggal ditambah coding untuk cari barang gak bisa
Awalnya saya tarik berdasarkan range tanggal , lalu setelah muncul di tabel disitu saya cari barang gak bisa
Sebenernya bisa gak ya ? Mmakasih

[@muhammadalinursaid70]

Bang kalau mau mencari data berdasarkan id pegawai, tapi hanya dengan mengetik angkanya saja bisa gak?

[@arfahsaputra1443]

Klau datanya ngk muncul kira2 apanya yg slh yahh,aku udah cek codingnya ngk ada yg slh,tapi pas coba fitur cari kriteria muncul notif " data tidak ditemukan"

[@arfahsaputra1443]

Mohon bantuannya,soalnya pertama kali 🙏

[@andrifajarudin5626]

Kalau mencarinya di file yang berbeda bagaimana ya caranya?

[@muhammadandrialisraqi8273]

Bang bisa tutorial cara mengubah semua data harga dengan jenis produk yg sama saja secara sekaligus, bukan satu per satu
Terima kasih sebelumnya

[@EAProject]

Udah pernah saya bahas itu mengubah banyak data

[@MatNaryo]

Kalau nambah kolom kok error 1004 ya min ... the extract range has missing or invalid filed name

[@MatNaryo]

dah ketemu

[@refmontjhandra9800]

Bang, pas pencarian Id Pegawai diketik > tab, normal.. Namun Id Pegawai di hapus (vbnull) > tab, muncul error sesuai Msgbox.. Selebihnya cakep bang.. 🙏👍

[@muhamadrafli5050]

gmn bang maksudnya bang? soalnya saya muncul sesuai msgbox terus

[@sitimardiah2496]

bang ko program pencarian saya hasilnya tidak ditemukan aja yah? apa kriteria pencariannya harus sama persis dengan isi cellnya?

[@009_audraannisaz3]

betul saya juga kek gini, padahal sheet dan kolonya uda benar

[@GelombangLaut9900]

Coding Awal :
'Perintah Melakukan Pencarian Data
CariData.Range("CellAwalTabelSumber").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
SheetSumberData.Range("RangeKriteria"), Copytorange:= SheetTabelHasil.Range("RangeHasil"), Unique:=False
Ubah dan tambahkan menjadi seperti di bawah ini :
'Menentukan range kolom data terakhir yang terisi
Dim irow As Long
irow = Sheet1.Range("A" & Rows.Count).End(xlUp).Row
CariData.Range("CellAwalTabelSumber:CellAkhirTabelSumber"& irow).AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
SheetSumberData.Range("RangeKriteria"), CopyToRange:= SheetTabelHasil.Range("RangeHasil"), Unique:=False
Semoga membantu.