Validasi 2 kriteria

  1. 4 tahun lalu

    Slamat malam Yth, All Master @BE.Org,
    saya sedang belajar cara validasi 2 kriteria menggunakan form VBA, mencari data siswa dengan kriteria Tahun Lulus dan Kelas, jalan sih scriptnya, tapi hasilnya salah, mohon bantuaanya, terima kasih

  2. @bejo

    salahnya dimana? saya cek hasilnya benar

    listbox.PNG

  3. iya master, coba kelas xii tkr1 atau xii tkj1, master, hasilnya selalu salah,
    terima kasih atas perhatiannya

  4. @bejo saya sudah cek hasilnya benar juga

    listbox2.PNG

  5. maaf master saya kurang teliti, saya pelajari lagi

  6. Di sunting 4 tahun lalu oleh bejo

    master, saya coba beberapa kali, kq kelasnya jadi banyak begini ya???, padahal saya buat hanya 11 atau 12 kelas, yg tampil jdi banyak

  7. @bejo

    itu karena perintah Call Isicbkelas pada sub combobox1_Change
    jadi setiap kali nilai pada combobox1 berubah, perintah Isicbkelas akan dijalankan dan kelasnya akan bertambah terus karena tidak ada perintah untuk menghapus isi dari Cbkelas terlebih dahulu.

    solusinya sebelum perintah Call Isicbkelas dijalankan buat perintah untuk menghapus isi dari Cbkelas terlebih dahulu, ATAU pindahkan perintah Call Isicbkelas ke UserForm_Initialize. saran saya dipindahkan.

  8. Terima kasih bnyk master, saya pelajari lg

  9. Di sunting 4 tahun lalu oleh bejo

    Master, yg saya warnai ini arti scriptnya apa ya, saya cuma copy paste, gk tahu maksudnyan nilainya saya rubah, Lbnama.AddItem .Cell(i, 1).Value, atau Cells(i, 2).Value, hasilnya tampilannya sama saja

  10. Di sunting 4 tahun lalu oleh manweljs_

    @bejo

    bahasa sederhananya setiap ada perintah .AddItem itu maksudnya untuk nambah data di listview KEBAWAH (baris). baris2 skrip yg setelahnya itu nambah data KESAMPING (kolom). index data di ListView itu mulai dari 0 (nol), perhatikan contoh berikut, 4,0 artinya baris 4 kolom 0.

    	0	1	2	3	4	→ kolom
    0	0,0	0,1	0,2	0,3	0,4	
    1	1,0	1,1	1,2	1,3	1,4	
    2	2,0	2,1	2,2	2,3	2,4	
    3	3,0	3,1	3,2	3,3	3,4	
    4	4,0	4,1	4,2	4,3	4,4	
    ↓						
    baris

    tanpa menambah baris terlebih dahulu, anda tidak bisa menambah data di kolom. itu sebabnya .addItem di skrip tersebut diletakkan paling atas saat proses menambah data di listview.

    @bejo ...nilainya saya rubah, Lbnama.AddItem .Cell(i, 1).Value, atau Cells(i, 2).Value, hasilnya tampilannya sama saja...

    sebenarnya berbeda, .Cell(i, 1) itu nilainya kolom A (alumni), Cells(i, 2) itu nilainya kolom B (kelas), hanya saja hasilnya gak nampak karena anda membuat lebar kolomnya 0 seperti pada baris skrip :

    .ColumnWidths = "0;0;0;150;0;0;0,0"


    coba saja anda rubah menjadi :

    .ColumnWidths = "60;0;0;150;0;0;0,0"


    pasti hasilnya berbeda. semoga paham :)

  11. Di sunting 4 tahun lalu oleh bejo

    terima kasih banyak master, kalau lihat gambar di atas sepertinya paham, menambahkan/ menempatkan data mulai dari baris ke berapa kolom keberapa, tapi ketika melihat file saya,
    "Lbnama.AddItem .Cell(i, 1).Value, atau saya rubah menjadi Lbnama.AddItem .Cell(i, 2)"
    mengapa tidak terlihat perubahannya ya??

  12. @bejo ...mengapa tidak terlihat perubahannya ya??...

    sudah sy jelaskan diatas

  13. iya master, terima kasih banyak,
    perasaan waktu baca comment , keterangan lebar kolom itu blm ada lho, kg jadi ada yah . . . :)

  14. @bejo

    iya itu saya tambahi belakangan karena pada awalnya saya hanya fokus pada baris yang di blok di gambar tersebut, setelah saya baca2 lagi, ternyata pertanyaannya ada sambungannya, jadi jawabnya agak telat :D

 

atau Mendaftar untuk ikut berdiskusi!