Macro Excel | Tutorial Membuat ComboBox pada UserForm dengan Source Data dari Worksheet

Membuat sebuah ComboBox pada UserForm memang beragam jenisnya ada yang menggunakan data secara manual diketikan dengan menggunakan Add Item. misalnya akan menambahkan data seperti berikut

Anda juga bisa belajar bagaimana membuat Validasi data menggunakan ComboBox

Cara Membuat Combobox pada UserForm

Private Sub UserForm_Initialize()
ComboBox1.AddItem "Rambutan"
ComboBox1.AddItem "Mangga"
ComboBox1.AddItem "Durian"
ComboBox1.AddItem "Jeruk"
ComboBox1.AddItem "Nanas"
ComboBox1.AddItem "Melon"
End Sub

Cara tersebut banyak juga yang menggunakan, dan bahkan ada yang menggunakan fungsi With misalnya

Private Sub UserForm_Initialize()
With ComboBox1
    .AddItem "Rambutan"
    .AddItem "Mangga"
    .AddItem "Durian"
    .AddItem "Jeruk"
    .AddItem "Nanas"
    .AddItem "Melon"
End With
End Sub

Hasilnya akan sama saja menampilkan item data dengan cara dituliskan pada script VBA UserFom_Initialize, lalu bagaimana apabila item data tidak diketikkan melalui script?

Simak Cara membuat ComboBox tanpa macro / VBA pada tulisan Cara membuat ComboBox dengan Validasi data List

Cara Menampilkan Data pada ComboBox dari Worksheet

Menampilkan data yang berada di worksheet katakanlah range A1:A6 kemudian data tersebut dijadikan data item untuk membuat sebuah ComboBox. Langkah pertama silakan buat sebuah data pada Sheet1

Langkah berikutnya silakan masuk ke VBA editor atau tekan F5 kemudian silakan buat satu buat UserForm saya kira untuk membuat UserForm sudah dianggap bisa

Langkah ketiga buat satu buat ComboBox dengan menggunakan ToolBox dan letakan pada UserForm

Langkah terkahir
Untuk menampilkan data yang ada pada worksheet atau range atau cell dan dimunculkan pada sebuah ComboBox cukup mudah silakan ketikan script VBA dibawah ini kemudian pastekan pada UserForm_Initialize

Private Sub UserForm_Initialize()
For Bariske = 1 To 6
    CariData = Sheets("Sheet1").Range("a" & Bariske)
    ComboBox1.AddItem CariData
Next Bariske
End Sub

 Silakan lihat hasilnya akan seperti gambar dibawah ini

Berhasil, Selamat mencoba jika ada pertanyaan mengenai Macro Excel | Tutorial Membuat ComboBox pada UserForm dengan Source Data dari Worksheet jangan sungkan silakan komentar dibawah. Semoga bermanfaat.

Tweet