KODE MACRO EXCEL COMBOBOX BERTINGKAT

VBA EXCEL COMBOBOX BERTINGKAT
Memberikan hasil yang maksimal dan kepuasan terhadap pengunjung termasuk prioritas kami sehingga ini akan sangat detail dan singkat. Kami harap Anda meluangkan waktu beberapa menit untuk membaca penjelasan kami dibawah ini secara cermat.


Dari gambar diatas, Anda pasti sudah mengerti maksud dari artikel ini. Nah, jika sudah paham ayok kita langsung ke TKP.

Langkah-Langkah Membuat Combobox Bertingkat di Excel :

1. Buka Excel Anda

2. Simpan dengan extensi .xlsm atau .xlsb atau extensi yang bisa menjalankan macro
3. Buatlah data seperti dibawah ini

4. Jika sudah, silahkan menuju ke jendela VBA dengan cara tekan Alt+F11 atau pada menu ribbon Developer klik Visual Basic.
5. Buatlah 1 buah Userform seperti dibawah ini


6. Jika sudah, sekarang klik 2x userform dan masukan kode macro dibawah ini

Private Sub UserForm_Initialize()
ComboBox1.List = Sheet1.Range("A1:A2").Value
End Sub
Private Sub ComboBox1_Change()
ComboBox2 = ""
ComboBox3 = ""
If ComboBox1 = Sheet1.Range("A1") Then
ComboBox2.List = Sheet1.Range("B1:B3").Value
ElseIf ComboBox1 = Sheet1.Range("A2") Then
ComboBox2.List = Sheet1.Range("B4:B5").Value
Exit Sub: End If
End Sub
Private Sub ComboBox2_Change()
ComboBox3 = ""
If ComboBox2 = Sheet1.Range("B1") Then
ComboBox3.List = Application.Transpose(Sheet1.Range("C1:D1").Value)
ElseIf ComboBox2 = Sheet1.Range("B2") Then
ComboBox3.List = Application.Transpose(Sheet1.Range("C2:D2").Value)
ElseIf ComboBox2 = Sheet1.Range("B3") Then
ComboBox3.List = Application.Transpose(Sheet1.Range("C3:E3").Value)
ElseIf ComboBox2 = Sheet1.Range("B4") Then
ComboBox3.List = Application.Transpose(Sheet1.Range("C4:D4").Value)
ElseIf ComboBox2 = Sheet1.Range("B5") Then
ComboBox3.List = Application.Transpose(Sheet1.Range("C5:D5").Value)
Exit Sub: End If
End Sub
Private Sub CommandButton1_Click()
Unload Me
End Sub

7. Silahkan jalankan dengan menekan tombol F5 atau tekan run

Jika Anda melakukan langkah-langkah diatas dengan benar dan penempatan Kode Macro benar, maka sistem akan berjalan secara normal sesuai intruksi yang Anda berikan.

8. Selesai

Mas..Gimana sih supaya kita bisa membaca dan menterjemahkan maksud kode macro ke bahasa kita. ya pokoknya supaya kita tahu lah mas intruksi tersebut

Untuk dapat mengerti bahasa Kode Macro Excel, perlu latihan dan belajar lebih lanjut. Contoh sederhananya seperti berikut.

Bahasa Macro Excel :
Userform1.Show

Terjemah/Intruiksi :
Kode macro....Tolong dong saya panggilkan Userform1

Bahasa Macro Excel :
Private Sub UserForm_Initialize()
ComboBox1.List = Sheet1.Range("A1:A2").Value
End Sub

Terjemah/Intruiksi :
Kode macro....Tolong dong ketika Userform aktif tampilkan daftar data Sheet1 di range A1:A2 pada Combobox1

Dan masih banyak lagi

Maksud dari Menterjemahkan Bahasa Macro Excel ke Bahasa Kita seperti diataskan yang Anda maksud??

Jika benar IYA, saran pertama dari kami adalah memperbanyak belajar, bisa belajar dari internet, Group atau Private belajar ke Programer Excel.

PENJELASAN

Membuat Combobox Bertingkat Di Excel Menggunakan Kode Macro sebenarnya mudah, seperti artikel ini. Nah..jika Anda berangan-angan bahwa "Wah..Excel itu susah..Wah excel itu rumit" coba hilangkan angan-angan itu sedikit demi-sedikit, karena sebenarnya excel itu mudah dan sekarang internet kan ada..

Ayo teman-teman..kalian pasti bisa membuat Aplikasi Buatan Sendiri sesuai kebutuhan Anda. Apa lagi kalau pekerjaan Anda di perkantoran seperti saya..pasti banyak-banyak belajar excel..

PRIORITAS KAMI
Kami sangat memperhatikan hasil maksimal dan kepuasan bagi pengunjung sehingga selain artikel diatas, kami juga menyediakan sampel file gratis untuk pemahaman yang mendalam.


Apabila Anda merasa bahwa artikel ini bagus dan layak untuk dibagikan maka silahkan share ke sosial media yang Anda punya, bisa lewat Facebook, Google Plus, Whatsapp, Telegram dll.

Belajar Excel itu mahal lhoo..
Jika berkenan Anda bisa Share artikel ini ke sosial media apapun 

Link Artikel Ini :
https://www.mtsbmtumbrasanom.id/2019/01/kode-macro-excel-combobox-bertingkat.html

Kami Selalu Berusaha Memberikan Yang Terbaik dan Original Untuk Anda
Jabat Erat@Hak Cipta 2015

Subscribe to receive free email updates:

0 Response to "KODE MACRO EXCEL COMBOBOX BERTINGKAT "