Thursday, June 9, 2016

Cara Isi Pilihan Pada Combobox Vba Excel

Cara Isi Pilihan Combobox - Perhatikan Gambar Gif dibawah. dimana Combobox terisi pilihan yang dapat dipilih. pada posting ini saya mencoba memberikan tiga cara mengisi Combobox. Ketiga macam cara pengisian Combobox yang berbeda namun memiliki fungsi yang sama.

Isi combobox memudahkan pengguna aplikasi untuk memilih data yang ditawarkan. Selain itu pilihan pada Combobok bertujuan menetapkan pilihan agar pengguna tidak mengisi pilihan yang lain selain yang ditawarkan oleh aplikasi.
Cara Isi Pilihan Pada Combobox Vba Excel
Admin sangat menyarankan bagi yang mempelajari Vba Excel untuk tahap pemula agar membuat berbagai macam file contoh percobaan dengan berbagai kode yang didapatkan. Dengan membuat file contoh percobaan penerapan kode Vba Excel akan mempercepat memahami dan mengetahui fungsi dan cara kerja kode Vba Excel yang diterapkan pada aplikasi.

Belajar membuat aplikasi itu harus memperbanyak Experiment berdasarkan teori-teori yang ada di internet. Belajar hanya berdasarkan teori saja tanpa membuat file contoh penerapan atau file experiment sedikit kemungkinan dapat menguasai Vba Excel.

Selanjutnya Ikuti langkah-langkah mengisi kode pada tempatnya :
Cara Pertama : Combobox1 
  • Tempatkan kode dibawah ini pada UserForm_Initialize
Private Sub UserForm_Initialize()
With ComboBox1
.AddItem "ABDULLAH"
.AddItem "AMINAH"
.AddItem "MUHAMMAD"
.AddItem "SITI KHADIJAH"
.AddItem "AISYAH"
.AddItem "ABU BAKAR"
.AddItem "UMAR"
End With
End Sub

Cara Kedua : Combobox2 
  • Dengan menggunakan Range, lihat Range yang sudah saya bikin di Sheet1 Klik Formula dan Pilih Name Manager.
  • Tempatkan kode dibawah ini pada UserForm_Initialize.
Private Sub UserForm_Initialize()
With ComboBox2
.RowSource = "RDATA"
End With
End Sub


Cara Ketiga : Combobox3
    • Tempatkan kode dibawah ini pada UserForm_Initialize.
    Private Sub UserForm_Initialize()
    ComboBox3.List = Array("ABDULLAH", "AMINAH", "MUHAMMAD", "SITI KHADIJAH", "AISYAH", "ABU BAKAR", "UMAR")
    En Sub

    Bila Kode digabungkan

    Private Sub UserForm_Initialize()
    With ComboBox1 
    .AddItem "ABDULLAH" 
    .AddItem "AMINAH" 
    .AddItem "MUHAMMAD"
    .AddItem "SITI KHADIJAH"
    .AddItem "AISYAH" 
    .AddItem "ABU BAKAR"
    .AddItem "UMAR" 
    End With 
    With ComboBox2
    .RowSource = "RDATA" 
    End With 
    ComboBox3.List = Array("ABDULLAH", "AMINAH", "MUHAMMAD", "SITI KHADIJAH", "AISYAH", "ABU BAKAR", "UMAR") 
    End Sub

    Demikian Cara Isi Pilihan Pada Combobox Vba Excel yang dapat admin jelaskan pada artikel ini. emgoa menjadi referensi dan informasi dasar bagi yang sedang mempelajari Vba Excel pada tahap pemula dan dapat dikembangkan berdasarkan kebutuhan masing-masing.

    Jika artikel ini dirasakan ada manfaat dan berguna mohon dapat dishare ke media sosial agar teman-teman yang memiliki hobi yang sama dapat mempelajarinya juga.

    Download Filenya  : Isian Combobox

    Jika ingin menyampaikan pertanyaan, saran dan kritikan mohon dapat disampaikan pada kolom komentar yang ada bawah artikel dengan bijaksana.

    Dapatkan berbagai macam contoh file penerapan kode Vba Excel dan Aplikasi Vba Excel yang sudah jadi tanpa proteksi agar dapat dipelajari secara mandiri dengan menghubungi admin melalui WhatsApp atau Telegram dengan nomor 0811-6822-023.

    Ibu Rumah Tangga Yang Mencoba Berbagi Melalui Tulisan. Semoga Bisa Bermanfaat Bagi Yang Membaca

    Komentar Anda Sangat Menentukan Kelangsungan Blog ini
    EmoticonEmoticon