Membuat List Box ActiveX Excel VBA

Belajaroffice.com – Artikel sebelumnya admin sudah membahas Combo Box ActiveX Controls, kali ini kita akan membahas cara membuat List Box ActiveX.

ListBox ActiveX dengan Combo Box ActiveX memiliki fungsi yang sama yaitu berupa list-list data yang bisa dipilih oleh user. Perbedaanya dari bentuknya kalau Combo Box drop down kebawah sementara kalau List Box berupa urutan data.

Cara membuatnya pada prinsipnya sama saja perbedaanya terletak pada codingnya, untuk lebih jelasnya ikuti langkah-langkah berikut ini :

• Buka Sheet Microsoft Excel
• Kemudian klik menu Developer >> klik Insert >> ActiveX Controls (pilih List Box)
• Pastikan sheet pada kondisi Design Mode
• Kemudian letakan List Box ActiveX Controls pada sheet Excel seperti contoh pada gambar dibawah ini.

• Selanjutnya kita buat koding dan setting propertiesnya
• Pada List Box ActiveX klik kanan, kemudian pilih View Code. Kita letakan codingnya pada workbook >> Klik ThisWorkBook

Kemudian kita ketikan koding berikut ini :

Option Explicit

Private Sub Workbook_Open()

With Sheet1.ListBox1
.AddItem “Guru”
.AddItem “Dokter”
.AddItem “Polisi”
.AddItem “Karyawan”
End With

End Sub

Sobat-sobat bisa atur Add Itemnya sesuai kebutuhan

Pada contoh diatas saya membuat List Box untuk jenis pekerjaan, misalnya bisa kita ganti dengan nama kota, nama provinsi dsb sesuaikan dengan kebutuhan.

Selanjutnya kita atur propertiesnya, yang paling penting kita atur yaitu Linked Cell tempat dimana hasil dari pilihan user akan kita letakan. Pada contoh diatas kita letakan pada cell B9. Kita juga bisa atur warna-warnanya, fontnya supaya lebih menarik.

Selanjutnya kita coba aktifkan yaitu dengan cara klik tombol Design mode terlebih dahulu.

Disimpan dengan format Save As type : Excel Macro-Enabled Workbook

Terimakasih, selamat mempraktekan  semoga bermanfaat.