Tutorial Cara Menampilkan Data di Listbox pada Userform VBA Excel
Mungkin sudah banyak yang menggunakan UserForm pada VBA Excel. Salah satu fitur pada UserForm yang sering digunakan adalah Listbox. Listbox merupakan salah satu control yang sering digunakan pada UserForm. Listbox digunakan untuk menampilkan data dalam bentuk daftar atau list. Pada artikel ini anda akan belajar bagaimana cara menampilkan data di Listbox pada Userform VBA Excel.
Cara Menampilkan Data di Listbox
Langkah-langkah cara menampilkan data di Listbox pada UserForm VBA Excel adalah sebagai berikut:
- Buatlah sebuah UserForm.
- Tambahkan Listbox pada UserForm, dengan cara klik Toolbox – Listbox – pilih area pada UserForm untuk menempatkan Listbox.
- Buatlah sebuah modul dengan cara klik Insert – Module.
- Masukkan kode VBA berikut ini:
Sub TampilListbox()
Dim kolom As Integer
kolom = 1
With Listbox1 'Listbox1 adalah nama Listbox yang digunakan
.Clear
Do While Cells(kolom, 1) <> ""
.AddItem Cells(kolom, 1)
kolom = kolom + 1
Loop
End With
End Sub
Penjelasan dari kode di atas adalah untuk menampilkan data yang terdapat pada kolom A dan baris ke-2 dari sheet aktif pada Listbox yang telah dibuat pada UserForm.
- Kemudian, buatlah Button pada UserForm untuk menambahkan code VBA pada event Click.
- Tambahlah kode VBA berikut ini pada event Click pada Button yang telah dibuat:
Private Sub CommandButton1_Click()
TampilListbox
End Sub
Penjelasan dari kode di atas adalah ketika Button ditekan maka akan memanggil Sub TampilListbox yang akan menampilkan data pada Listbox.
Setelah kode VBA sudah dimasukkan pada UserForm dan modul, maka tinggal memasukkan data pada sheet pada kolom A dan baris ke-2. Kemudian mencoba dengan menekan Button pada UserForm untuk menampilkan data yang telah dimasukkan pada sheet ke Listbox.
Gambar Ilustrasi
Listbox pada UserForm Excel
Cara Menampilkan Data pada Listbox pada Userform Excel
Penjelasan Kode VBA
Dalam gambar tersebut terdapat penjelasan terkait kode VBA yang digunakan untuk memanggil data yang ingin ditampilkan pada Listbox.
Frequently Asked Questions (FAQ)
Bagaimana cara menambahkan data pada Listbox?
Untuk menambahkan data pada Listbox, anda harus memasukkan data pada sheet pada kolom A dan baris ke-2, kemudian menjalankan program pada UserForm dengan menekan Button.
Apa yang harus dilakukan jika Listbox tidak menampilkan data yang sesuai?
Silahkan pastikan terlebih dahulu bahwa kode VBA sudah dimasukkan dengan benar pada modul dan event Click pada Button. Kemudian pastikan juga bahwa Data yang ingin ditampilkan sudah dimasukkan pada sheet pada kolom A dan baris ke-2.
Video Tutorial
Berikut ini adalah video tutorial cara menampilkan data di Listbox pada Userform VBA Excel:
