Monday, December 31, 2018

√ Macro Excel | Tutorial Menciptakan Combobox Pada Userform Dengan Source Data Dari Worksheet

Membuat sebuah ComboBox pada UserForm memang bermacam-macam jenisnya ada yang memakai data secara manual diketikan dengan memakai Add Item. contohnya akan menambahkan data menyerupai berikut

Anda juga dapat berguru bagaimana menciptakan Validasi data memakai 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 memakai 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, kemudian bagaimana apabila item data tidak diketikkan melalui script?

Simak Cara menciptakan ComboBox tanpa macro / VBA pada goresan pena Cara menciptakan 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 menciptakan 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 aku kira untuk menciptakan UserForm sudah dianggap bisa

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

Langkah terkahir
Untuk menampilkan data yang ada pada worksheet atau range atau cell dan dimunculkan pada sebuah ComboBox cukup gampang 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 risikonya akan menyerupai gambar dibawah ini


Berhasil, Selamat mencoba bila ada pertanyaan mengenai Macro Excel | Tutorial Membuat ComboBox pada UserForm dengan Source Data dari Worksheet jangan sungkan silakan komentar dibawah. Semoga bermanfaat.
Sumber http://www.excel-id.com/