Membuat dropdown dengan combobox
Excel Pro - Combobox merupakan salah satu kontrol penting dalam excel visual basic editor (VBE) untuk menmpilkan nilai (data, item) dalam bentuk menu kebawah atau drop down list, dalam microsoft excel visual basic editor combobox dibagi menjadi dua yaitu combobox form controls dan combobox activeX controls. Apa bedanya combobox form controls dan combobox activeX controls ?? selain tampilan perbedaan combobox form controls dan combobox activeX controls terdapat pada fungsi serta keleluasaan pengguna untuk mengembangkan funsgi tersebut. Combobox form controls hanya bisa digunakan di worksheet sedangkan combobox activeX controls bisa digunakan di userform maupun di worksheet
Pada kesempatan kali ini mari membahas Combobox form controls beserta cara menggunakanya, cara membuat menu dropdown dengan Combobox form controls mulai dari mengambil sumber nilai yang akan ditampilakn dan properties Combobox form controls itu sendiri. Langkah awal untuk membuat Membuat dropdown dengan combobox tentu saja anda harus membuak microsoft excel terlebih dahulu, berhenti di sheet1 dan buatlah tabel sederhana pada sheet satu sebagaimana tabel berikut ini
| K/B | A | B |
| 1 | TABEL NAMA SISWA | - |
|---|---|---|
| 2 | Jono | - |
| 3 | Jini | - |
| 4 | Juni | - |
| 5 | Juli | - |
| 6 | Siti | - |
| 7 | Umi | - |
| 8 | Yuli | - |
Membuat dropdown dengan combobox form controls
Setakah sekesai embuat tabel nama siswa , buka tab menu developer > pilih Insert > Pilih insert Combobox form controls > seret ke kolom C atau D, perhatikan gambar dibawah iniSaat meletakan combobox form controls ke kolom D maka akan langsung muncul jendela baru "Assign Macro", untuk sementara tekan cancle dulu
Langkah selanjutnya untuk menampilkan nilai dropdown combobox form controls adalah, arahkan pointer ke combobox form control lalu klik kanan pada mosue untuk menampilkan menu "Opsi", pada menu Opsi pilih "Format Control" untuk menampilkan jendela format control. Pada jendela format control terdapat tab menu
- Size
- Protection
- Properties
- Alt text
- dan Control
Pilih tab menu "Control", pada tab menu Control terdapat 4 kolom
- Input range
- Cell Link
- Drop down lines
- dan cekbox 3-D shading
Klik pada Input range, blok kolom A2 sampai A7, tekan enter. Lihat gambar dibawah ini
Input range $A$2:$A$7
Cell Link $B$1
Jika sudah lalu tekan OK. Silahkan dites
Membuat dropdown dengan combobox form activeX controls
Yang kedua membuat dropdown tapi dengan combobox form activeX controls , karena yang pertama sudah memakai combobox form control. Caranya mengambil combobox activeX controls hampir sama, silahkan ulangi dengan memperhatikan gambar pertama, setelah selesai meletakan combobox activeX control untuk menampilkan nilai secara dropdown dengan combobox activeX contro caranya lebih susah ( ngga bisa dikatakan susah sebenarnya) silahkan ikuti langkah langkah berikut iniCara pertama Membuat dropdown dengan combobox form activeX controls
Tekan ALt + F11 untuk masuk kejendela Visual basic editor (VBE)
Cari PROJECT EXPLORER "ThisWorkbook" klik dua kali untuk menampilkan WINDOW CODE . Bagi yang belum paham istilah ini silahkan mampir ke artikel ini Apa itu Microsoft Visual Basic
Pada Window Cod ketikan baris kode macro dibawah ini
Private Sub Workbook_Open()
Sheets("Sheet1").ComboBox1.AddItem "Jono"
Sheets("Sheet1").ComboBox1.AddItem "Jini"
Sheets("Sheet1").ComboBox1.AddItem "Juni"
Sheets("Sheet1").ComboBox1.AddItem "Juli"
Sheets("Sheet1").ComboBox1.AddItem "Umi"
Sheets("Sheet1").ComboBox1.AddItem "Yuli"
End Sub
Setelah selesai mengetik kode macro diatas untuk mencoba apakah kode macro berjalan dengan baik silahkan tekan F5 pada keyboard komputer, Tekan Alt + Q untuk menutup jendela VBE
Cara kedua Membuat dropdown dengan combobox form activeX controls
Langsung saja pada PROJECT EXPLORER "ThisWorkbook" klik dua kali untuk menampilkan WINDOW CODE lalu ketikan baris kode macro dibawah ini
Private Sub Workbook_Open()
Set I = Sheets("Sheet1")
On Error Resume Next
Dim Sel As Range
Dim NoDupes As New Collection
Set Status = I.Range("A2", I.Range("A2").End(xlDown))
I.ComboBox1.Clear
For Each Sel In Status
NoDupes.Add Sel.Value, CStr(Sel.Value)
Next Sel
For Each Item In NoDupes
I.ComboBox1.AddItem Item
Next Item
End Sub
Cara kedua ini merupakan cara yang paling sering digunakan untuk membuat nilai dropdown pada combobox, karena nilai dropdown pada combobox akan berubah mengikuti nilai range atau kolom sumber, misalnya ketika pada kolom A terdapat nilai tambahan sampai kolom A100, maka secara otomatis nilai pada combobox akan bertamabha menjadi 100, begitu juga kalai nilai pada kolom sumber berkurang makan nilai pada combobox akan berkurang
Untuk mempermudah mempelajari Membuat dropdown dengan combobox dibawah ini merupakan file sampel Membuat dropdown dengan combobox yang bisa dikembangkan dan dipelajari lebih lanjut
Cara mendownload
Klik tautan download diatas, anda akan dialihkan ke msofaz.com silahkan scroll kebawah untuk melihat link download
File download ada di Google Drive jadi aman dari visrus
Klik tautan download diatas, anda akan dialihkan ke msofaz.com silahkan scroll kebawah untuk melihat link download
File download ada di Google Drive jadi aman dari visrus
Dirasa sampai disini dulu perjumpaan ke lima Excel pro, insya Allah berjumpa lagi dilain kesempatan salam