Kandungan
Menggunakan kawalan ListView dengan kotak pilihan pada bentuk VBA boleh membuat aplikasi lebih dinamik dengan menyediakan pilihan kepada pengguna. A ListView menunjukkan item dengan menggunakan salah satu daripada empat pandangan yang berbeza dan mengaturnya dalam lajur dengan atau tanpa tajuk Microsoft Excel. Gunakan ciri "ListItems.Add" untuk menambah item dan "Diperiksa" untuk menentukan perkara yang telah dipilih oleh pengguna.
Arahan
Isi kawalan ListView dalam Excel menggunakan VBA (Hemera Technologies / Photos.com / Getty Images)-
Buka Microsoft Excel, klik pada tab "Pemaju" dan kemudian pada "Visual Basic" untuk membuka tetingkap editor VBA. Klik menu "Sisipkan" dan kemudian "UserForm" (borang pengguna) untuk membuat borang baru. Klik "Alat," "Kawalan Tambahan," dan pilih kotak bersebelahan dengan "Kawalan Senarai Senarai Microsoft" (kawalan Senarai Microsoft) untuk menambah kawalan "ListView" baru pada borang.
-
Klik kanan pada kawalan "ListView" dan kemudian pada "Properties". Tatal ke bawah tetingkap dan pilih "Benar" di sebelah pilihan "Kotak Cek". Klik "CommandButton" pada panel "Kotak Alat" dan kemudian pada borang untuk menambah butang baru. Tambah butang kedua menggunakan langkah yang sama.
-
Klik dua kali pada "CommandButton1" untuk membuat acara baru untuk butang itu. Tambah kod berikut kepada "ListBox" yang popular dengan tiga item:
Me.ListView1.ListItems.Add (1) = "Semak Item 1" Me.ListView1.ListItems.Add (2) = "Semak Item 2" Me.ListView1.ListItems.Add (3) = "Check Item 3"
-
Kembali ke borang dan klik dua kali pada "CommandButton2" untuk membuat acara klik baru untuk butang itu. Tambahkan kod berikut untuk melangkau item "ListBox" dan paparkan item yang dipilih dalam tetingkap "Segera":
Untuk counter = 1 Untuk Me.ListView1.ListItems.Count Jika Me.ListView1.ListItems.Item (counter) .Checked Kemudian Debug.Print Me.ListView1.ListItems.Item (counter) .Text Akhir Jika Seterusnya
-
Kembali ke borang dan klik "F5" untuk menjalankan program ini. Kemudian klik "CommandButton1" untuk mengisi kawalan "ListView" dan kemudian "CommandButton2" untuk menunjukkan item yang dipilih.
Apa yang anda perlukan
- Microsoft Excel