Selamat datang di kelas excelive.com - salah satu portal pembelajaran yang khusus membahas tuntas tentang kehebatan Microsoft Excel dalam mengolah data untuk disajikan ke dalam bentuk informasi yang sesuai dengan yang dibutuhkan.

Kali ini kita akan membahas trik bagaimana cara mengisi daftar ComboBox dengan isi atau nilai yang sama secara cepat. Sebagai informasi, trik ini juga bisa digunakan untuk ListBox lho. Untuk syarat yang harus dipenuhi agar trik ini berhasil adalah, properti nama dari ComboBox maupun ListBox haruslah memuat angka yang tersusun secara berurutan dan konstan. Contoh, ComboBox1, ComboBox2, ComboBox3, dst.

Oke, kita mulai pembelajarannya dan untuk tutorial ini kita hanya akan menggunakan 1 control sejenis saja yakni control ComboBox yang berjumlah 3 (tiga) buah yang disusun dalam sebuah UserForm seperti gambar berikut


Langkah selanjutnya adalah skrip Macro VBA untuk mengisi daftar-daftar ComboBox dengan nilai yang sama. Dan untuk even serta prosedurnya bisa anda sesuaikan sesuai selera. Sebagai contoh, jika anda ingin agar setiap ComboBox terisi nilai secara otomatis ketika Userform diaktifkan atau dibuka, maka even dan prosedur yang harus dipilih adalah UserForm_Activate.
Sementara untuk script Macro VBA yang digunakan, silahkan anda copy paste berikut :

Dim i As Integer
For i = 1 To 3
    Controls("ComboBox" & i).Clear
    Controls("ComboBox" & i).List = Array("satu", "dua", "tiga", "empat")
Next i

Jika anda mengikuti setiap langkah-langkah di atas, maka anda menghasilkan hasil yang kurang lebih tampak seperti tampilan berikut :

Untuk mengetahui contoh penggunaan skrip di atas, silahkan anda lihat tutorial Membuat Kalkulator Konversi Satuan Ukuran File Komputer

Selamat... anda sudah berhasil mengisi daftar-daftar ComboBox secara bersamaan dengan skrip kode Macro VBA yang lebih simple. Semoga tutorial ini memberikan manfaat untuk anda. Jangan lupa kunjungi kami lain waktu untuk mengetahui kehebatan excel lainnya. Ciao Adios

Masih mau belajar lagi !

Yuk, klik tautan berikut ini :