Cara Membuat Form Interaktif di Excel VBA dengan ActiveX Controls

2. List Box

List Box adalah elemen kontrol yang berfungsi untuk menampilkan daftar pilihan, memungkinkan pengguna untuk memilih satu atau lebih item. Ini sangat bermanfaat dalam formulir penginputan data atau untuk navigasi antar halaman dalam aplikasi yang menggunakan Excel VBA.

Cara Menambahkan Data ke List Box di Excel VBA

  1. Buka Tab Developer di Excel.
  2. Pilih Insert > List Box (ActiveX Controls).
  3. Klik dan seret untuk menempatkan List Box di lembar kerja.
  4. Klik kanan pada List Box > Properties.

Contoh Kode VBA untuk Menambahkan Item ke List Box

Gunakan kode VBA berikut untuk menambahkan beberapa nama kota ke dalam List Box:

With Sheet1.ListBox1
    .AddItem "Jakarta"
    .AddItem "Surabaya"
    .AddItem "Bandung"
End With

Kode ini dapat diletakkan dalam event Workbook_Open sehingga data akan dimuat secara otomatis saat file dibuka.

Menghubungkan List Box dengan Sel di Excel

Untuk menampilkan item yang dipilih dari List Box ke sel tertentu, lakukan langkah-langkah berikut:

  1. Klik kanan pada List Box, kemudian pilih Properties.
  2. Temukan properti LinkedCell, lalu masukkan alamat sel (contoh: D3).
  3. Sekarang, setiap kali pengguna memilih item di List Box, nilai tersebut akan muncul di sel D3.

Jika ingin mengambil nilai yang dipilih menggunakan VBA, gunakan kode berikut:

Range("D3").Value = ListBox1.Value

Artikel Menarik Lainnya

3. Combo Box

Combo Box adalah kontrol ActiveX di Excel VBA yang berfungsi sebagai daftar pilihan yang dapat ditarik ke bawah. Pengguna dapat memilih satu item dari daftar atau mengetikkan teks sendiri. Combo Box sering digunakan dalam formulir input untuk meminimalkan kesalahan saat memasukkan data, karena pengguna hanya dapat memilih dari opsi yang telah disediakan.

Cara Menambahkan Data Dinamis ke Combo Box

Untuk menambahkan Combo Box ke lembar kerja, ikuti langkah-langkah berikut:

  1. Buka Excel dan pastikan Tab Developer aktif.
  2. Klik Developer > Insert > Combo Box (ActiveX Controls).
  3. Klik dan seret untuk menggambar Combo Box di lembar kerja.
  4. Klik kanan pada Combo Box, lalu pilih Properties.

Contoh Kode VBA untuk Menambahkan Item ke Combo Box Secara Dinamis

Gunakan kode berikut untuk menambahkan item ke Combo Box secara otomatis saat workbook dibuka atau tombol diklik:

ComboBox.Add Item "Option 1"
ComboBox1.Add Item "Option 2"
ComboBox1.Add Item "Option 3"

Menghubungkan Combo Box dengan Sel di Excel

Untuk menyimpan nilai yang dipilih di Combo Box ke sel tertentu, lakukan langkah-langkah berikut:

  1. Klik kanan pada Combo Box, lalu pilih Properties.
  2. Temukan properti LinkedCell, lalu masukkan alamat sel (misalnya D3).
  3. Sekarang, setiap kali pengguna memilih item di Combo Box, nilai tersebut akan muncul di sel D3.

Atau, gunakan kode VBA berikut untuk menyimpan nilai pilihan ke dalam sel:

Range("D3").Value = ComboBox1.Value

4. Check Box

Check Box adalah kontrol yang memungkinkan pengguna memilih opsi Ya/Tidak atau True/False. Ini berguna untuk input biner seperti konfirmasi persetujuan, pilihan fitur, atau aktivasi/deaktivasi suatu fungsi dalam formulir.

Menggunakan Check Box untuk Menyimpan Nilai True/False

Untuk menambahkan Check Box di Excel VBA, ikuti langkah berikut:

  1. Buka Tab Developer di Excel.
  2. Klik Insert > Check Box (ActiveX Controls).
  3. Klik dan seret untuk menempatkan Check Box di lembar kerja.
  4. Klik kanan pada Check Box > Properties.

Contoh Kode VBA untuk Menghubungkan Check Box dengan Sel

Agar Check Box dapat menyimpan nilai ke dalam sel berdasarkan statusnya, gunakan kode berikut:

If CheckBox1.Value = True Then
    Range("D2").Value = 1
Else
    Range("D2").Value = 0
End If

Kode ini akan mengisi sel D2 dengan 1 jika Check Box dicentang, dan 0 jika tidak dicentang.

Agar fungsi ini berjalan otomatis saat pengguna mengklik Check Box, gunakan event Change di dalam VBA Editor:

Artikel Terbaru

Artikel Terkait