Bang. Bisa buatkan cara membuat rumus input data di tolak jika ada data ganda dengan UserForm. Terimakasih sebelumnya. Saya sangat suka dengan penjelasan abang. saya Cepat pahamnya di bandingkan di akun youtub lain
Alangkah lebih baik apabila disertakan link download untuk data yang digunakan di tutorial, karena mungkin banyak di antara teman-teman seperti saya yang pingin belajar tapi tidak punya datanya. Daripada ribet ngarang sendiri kan, belum lagi nanti kalau ada perbedaan" teknis yang kebetulan bikin ada kendala kan justru menyulitkan.
Mas mohon bantuan, kode tsb bisa dijalankan untuk mencari data berdasar kolom pertama pada listbox, jika pencarian itu berdasarkan kolom ke 3, kodenya dirubah yg mana ??? 🙏🙏
Bang, pada menit 6:14 , itu rumus nya bisa kepake klo sheet nya juga sedang di buka. Tpi klo sheet yg sedang terbuka adalah sheet lain, maka data nya juga lari di listbox nya. Cara atasinya gmna ya?
Listbox terbaik, dapat menampilkan data 10000 baris tanpa lemot, format tanggal sesuai format indonesia tapi sayang pencarian data hanya bisa dikolom A saja, mohon tanggapannya pak guru. Terima kasih
bila ada data tanggal yang akan diikutkan , gmn memformat tanggalnya agar ikut format dd/mmm/yy , krn dari yang saay bikin format tanggal masih mmm/dd.yy , tq bang
Assalammualaikum bang disini gw mau request donk lanjutan dari video ini.. saya sudah bisa buat sesuai video dari abang tpi saya mentok untuk cara copy paste dari listbox atau juga bisa d transfer ke sheet yg d tuju..
Halo bang.. misal kita cari nama Jo Naah jadi yg muncul di list box nya nama yg depannya Jo doang bang.. apa bisa? Gimana ya coding nya ? Mohon info nya 🙏🙏
Bisa, contoh sederhananya adalah : Private Sub UserForm_Initialize() With ListBox1 .RowSource = "database" .ColumnCount = 2 .ColumnWidths = "20; 100" End With End Sub
Kang, saya ga berhasil bagian searchnya ga mau nyari, padahal dari awal sampai akhir langkah2nya di ikuti bisa bantu ga, klo mau attach filenya dimari gimana ya
bisakah melakukan pencarian di kolom "B" ? hanya bisa di Kolom "A" saja mohon bantuannya,,,,,, Private Sub Txt_Cari_Change() Dim A As Long Dim Pencarian As String Pencarian = Me.Txt_Cari.Text If Len(Pencarian) = 0 Then Me.ListBox_ResesBPD.ListIndex = -1 Me.ListBox_ResesBPD.TopIndex = 0 Else For A = 0 To Me.ListBox_ResesBPD.ListCount - 1 If UCase(Left(Me.ListBox_ResesBPD.List(A), Len(Pencarian))) = UCase(Pencarian) Then Me.ListBox_ResesBPD.TopIndex = A Me.ListBox_ResesBPD.ListIndex = A Exit For End If Next A End If End Sub
Ringan dan membantu
Thanks atas ilmunya
Trimakasih Om
sama-sama, semoga bermanfaat
Terima kasih bang
Bang. Bisa buatkan cara membuat rumus input data di tolak jika ada data ganda dengan UserForm. Terimakasih sebelumnya. Saya sangat suka dengan penjelasan abang. saya Cepat pahamnya di bandingkan di akun youtub lain
Alangkah lebih baik apabila disertakan link download untuk data yang digunakan di tutorial, karena mungkin banyak di antara teman-teman seperti saya yang pingin belajar tapi tidak punya datanya. Daripada ribet ngarang sendiri kan, belum lagi nanti kalau ada perbedaan" teknis yang kebetulan bikin ada kendala kan justru menyulitkan.
sudah like yg ke 257
Bang saya salah satu SUBCRIBE Bang
Tolong buatin dong tutorial intro seperti di video ini
Terimakasi
cakep mas penjelasannya..
bagaimana klo dari file lain mas.
mohon pencerahannya mas. terima kasih.
Kak bikin animasi pembelajarn fisika menggunakan excel
Mas mohon bantuan, kode tsb bisa dijalankan untuk mencari data berdasar kolom pertama pada listbox, jika pencarian itu berdasarkan kolom ke 3, kodenya dirubah yg mana ??? 🙏🙏
Bang, pada menit 6:14 , itu rumus nya bisa kepake klo sheet nya juga sedang di buka. Tpi klo sheet yg sedang terbuka adalah sheet lain, maka data nya juga lari di listbox nya. Cara atasinya gmna ya?
lumayan
4:32 cara menampilkannya gimana ya? Setiap ngetik habis titik kok gak pernah tampil. Bingung masih belajar
Listbox terbaik, dapat menampilkan data 10000 baris tanpa lemot, format tanggal sesuai format indonesia tapi sayang pencarian data hanya bisa dikolom A saja, mohon tanggapannya pak guru. Terima kasih
MAAF gan kalau misalkan kita harus insert text di cell C kode mana yang harus di ganti pak,,
terima kasih
nice work thank you a lot
But if i have more than 2 columns and want to change the column search not the first how can i do it ?
Halo kak, kalau belajar macro dari awal itu dichannel ini, bisa dishare gak kak videonya diawali dari apa ?
Mau tanya Dong Om.
Kalo yang di cari yang di kolom yang ke 3 bagaimana
Terimakasih
saya ikutin kode nya persis tapi kenapa dapet runtime error 380 ya. Could not set the topindex property. invalid property value?
Bagaimana caranya kalau pencarian data di kolom B bagimana Bang,,,,,,,
saya sudah coba tetapi cuman kolom A yang fokus dicari.....
mohon bantuannya
Kalau mau sortir data (combobox) yang datanya ada di listbox hasil pencarian dari texbox. Gimana caranya gan.
Pak mohon petunjuk, ,
Untuk pencarian jenis kelamin nya dalam form contoh diatas, di SCIPT nya pada bagian mana yang harus dirubah.
Tlng om buat edit, simpan dan hapus tanpa user form🙏
bila ada data tanggal yang akan diikutkan , gmn memformat tanggalnya agar ikut format dd/mmm/yy , krn dari yang saay bikin format tanggal masih mmm/dd.yy , tq bang
kalau cara membuat name range dinamis bagaimana gan? pakai offset?
bagaimana kalau range pencariannya ada pada range kolom ke 2..
bisakah listboxnya ditampilkan sesuai urutan.. abjad ( berurutan)
Kalo dalamtext box itu data nya lebih dari satu , misal nama lina ada 2 itu bisa muncul semua kaah?
Bisa, coba ajah mau Lina nya juga ada 100 atau TIka Putri nya juga ada 70 bisa ditampilkan semua 😄😄😄😄😄
Sayang excel ku ga dukung, ini harus download aplikasi vba nya dulu ya atau gmn ya?
Kang, bisa ngga kalau rowsource nya diubah2 , misalnya sesuai sheet yang aktif.
Bisa
Excel-ID tolong cantohnya kang, tolong ya. Mksih.
Assalammualaikum bang
disini gw mau request donk lanjutan dari video ini..
saya sudah bisa buat sesuai video dari abang tpi saya mentok untuk cara copy paste dari listbox
atau juga bisa d transfer ke sheet yg d tuju..
bang kalau mau menampilkan eror sejenis peringatan kalau data yang di cari gak ada gimana?🙏makasih
Gan, klo Kolomnya lebih dari 2 dan saya mau cari di kolom yg ke 3 atau C bagaimn?
Halo bang.. misal kita cari nama Jo
Naah jadi yg muncul di list box nya nama yg depannya Jo doang bang.. apa bisa? Gimana ya coding nya ? Mohon info nya 🙏🙏
Up up, mohon info nya 🙏
biar data yang disearch aja yang muncul kak
aku puyeng kalau lihat coding.. tapi aku ingin bisa..
mari belajar bersama disini
bagaiman jika yang kita cari berada di kolom ke 2 atau ke 3..? d bantu gan
boleh minta no kontak, rencana ingin membuat pembukuan perusahaan menggunakan userform.. ?
bisa kah kolom dalam list box itu di atur ukuran lebar kecilnya gan ??
Bisa, contoh sederhananya adalah :
Private Sub UserForm_Initialize()
With ListBox1
.RowSource = "database"
.ColumnCount = 2
.ColumnWidths = "20; 100"
End With
End Sub
mantul gan hehe
Kalo menampilkan listbox dengan data yang ada di file lain, cranya gmn bang ?
Kang, saya ga berhasil bagian searchnya ga mau nyari, padahal dari awal sampai akhir langkah2nya di ikuti
bisa bantu ga, klo mau attach filenya dimari gimana ya
Pngn bikin userform buat data pasien dan almnt nya tp kok saya liat mlh pusing hehe
Jika pencarian data nya ada di kolom c bagaimana bg?
Bang kalau data yg di cari dari aplikasi lain bukan dare Excel bisa g?
kenapa harus pakai dim. apa artinya. cuma bisa meniru aja. tapi tak akan paham tujuannya
kalau sudah dicari terus mau diedit gmna caranya mas? mks
Coba lihat video lainnya untuk edit, simpan data di Excel dengan Userform
Bisa minta nomor kontaknya??
fb nya pa ms?
Bingung bang pusing q liat nya hehe
Saat ngetik gk kelihatan apa yg di tulis
Mas boleh di info no kontaknya. DM aja mas
Sudah jadi tapi pas search nama gak bisa
Kok bisa gitu ya? ada code yang kurang mungkin pa
tidak mengajari biar paham. sur sendiri
bisakah melakukan pencarian di kolom "B" ?
hanya bisa di Kolom "A" saja
mohon bantuannya,,,,,,
Private Sub Txt_Cari_Change()
Dim A As Long
Dim Pencarian As String
Pencarian = Me.Txt_Cari.Text
If Len(Pencarian) = 0 Then
Me.ListBox_ResesBPD.ListIndex = -1
Me.ListBox_ResesBPD.TopIndex = 0
Else
For A = 0 To Me.ListBox_ResesBPD.ListCount - 1
If UCase(Left(Me.ListBox_ResesBPD.List(A), Len(Pencarian))) = UCase(Pencarian) Then
Me.ListBox_ResesBPD.TopIndex = A
Me.ListBox_ResesBPD.ListIndex = A
Exit For
End If
Next A
End If
End Sub