Cara menggunakan ListView dengan Kotak Centang di VBA

Pengarang: Peter Berry
Tanggal Pembuatan: 11 Agustus 2021
Tanggal Pembaruan: 17 November 2024
Anonim
Configuring a CheckBox on an Excel VBA UserForm
Video: Configuring a CheckBox on an Excel VBA UserForm

Isi

Menggunakan kontrol ListView dengan kotak centang pada formulir VBA dapat membuat aplikasi lebih dinamis dengan memberikan opsi kepada pengguna. ListView memperlihatkan item dengan menggunakan salah satu dari empat tampilan berbeda dan mengaturnya dalam kolom dengan atau tanpa tajuk Microsoft Excel. Gunakan properti "ListItems.Add" untuk menambahkan item dan "Diperiksa" untuk menentukan item mana yang telah dipilih oleh pengguna.


Instruksi

Isi kontrol ListView di Excel menggunakan VBA (Hemera Technologies / Photos.com / Getty Images)
  1. Buka Microsoft Excel, klik pada tab "Pengembang" dan kemudian pada "Visual Basic" untuk membuka jendela editor VBA. Klik menu "Sisipkan" dan kemudian "UserForm" (formulir pengguna) untuk membuat formulir baru. Klik "Alat," "Kontrol Tambahan," dan pilih kotak di sebelah "Kontrol Microsoft ListView" (kontrol Microsoft ListView) untuk menambahkan kontrol "ListView" baru ke formulir.

  2. Klik kanan pada kontrol "ListView" dan kemudian pada "Properties". Gulirkan ke bawah jendela dan pilih "Benar" di sebelah opsi "Kotak centang". Klik "CommandButton" di panel "Toolbox" dan kemudian pada formulir untuk menambahkan tombol baru. Tambahkan tombol kedua menggunakan langkah yang sama.


  3. Klik dua kali pada "CommandButton1" untuk membuat acara baru untuk tombol itu. Tambahkan kode berikut ke "ListBox" populer dengan tiga item:

    Me.ListView1.ListItems.Add (1) = "Periksa Item 1" Me.ListView1.ListItems.Add (2) = "Periksa Item 2" Me.ListView1.ListItems.Add (3) = "Periksa Item 3"

  4. Kembali ke formulir dan klik dua kali pada "CommandButton2" untuk membuat acara klik baru untuk tombol itu. Tambahkan kode berikut untuk melihat item "ListBox" dan menampilkan item yang dipilih di jendela "Segera":

    For counter = 1 To Me.ListView1.ListItems.Count If Me.ListView1.ListItems.Item (counter). Periksa Lalu Debug.Cetak Me.ListView1.ListItems.Item (counter) .Text End If Next

  5. Kembali ke formulir dan klik "F5" untuk menjalankan program. Kemudian klik "CommandButton1" untuk mengisi kontrol "ListView" dan kemudian "CommandButton2" untuk menampilkan item yang dipilih.


Apa yang kamu butuhkan

  • Microsoft Excel

Banyak pengguna AutoCAD perlu membuat deain menggunakan kaki dan inci. ecara default, AutoCAD dikonfiguraikan untuk bekerja dengan unit deimal, yang lebih euai untuk aplikai deain mekani atau bagi mer...

Cara membangun fotosel

Monica Porter

November 2024

el fotoelektrik adalah enor yang bereaki terhadap cahaya. Hambatan litrik fotoel bervariai tergantung pada jumlah cahaya yang terpapar padanya. Mereka menghailkan tegangan ketika terkena cahaya dalam ...

Kami Menyarankan