Pages

Ads 468x60px

Menu Atas

Isi ComboBox Sesuai Data Dalam Sheet

Untuk membuat pengguna agar lebih mudah dalam mengentry data atau untuk membatasi isi atau item sesuai dengan yang telah kita sediakan, dapat menggunakan fasilitas daftar Drop-down yang umumnya biasa dibuat menggunakan bantuan Data Validation. kemudian pada pilihan Settings >> pilih Allow : dan dari daftar pilihan yang ada, pilih List.

Cara diatas hanya dapat diberlakukan untuk sel dalam workbook, bagaimana jika ingin membuat Daftar Drop-Down menggunakan ComboBox yang terdapat dalam UserForm akan tetapi isinya berdasarkan data yang terdapat dalam range yang sudah kita tentukan ?

ComboBox Excel VBA
Untuk membuatnya terlebih dahulu ketikkan data-data pada sebuah Sheet (ambil contoh Sheet1) mulai sel A1 sampai dengan sel A5, kemudian siapkan sebuah UserForm yang didalamnya terdapat ComboBox dengan nama ComboBox1.

Langkah selanjutnya yaitu paste kode berikut dalam UserForm :
Private Sub UserForm_Initialize()
For Nomor = 1 To 7
    Datanya = Range("a" & Nomor)
    ComboBox1.AddItem Datanya
Next Nomor
End Sub

Jalankan Macro userform ini dengan menekan tombol F5 di keyboard anda.
Download file di sini

Write By Ditulis oleh : Anto Ramana
Dipublikasikan pada : 08.12.12 | 07.30
Judul : Isi ComboBox sesuai dengan data dalam Excel
Kategori : Macro VBA
belajar excel
Tutorial Excel Lainnya :