Membuat Check Box ActiveX Excel VBA

Belajaroffice.com sebelumnya sudah membahas cara membuat Option Button ActiveX Excel VBA, kita lanjutkan lagi  untuk belajar Excel VBA, kali ini admin akan membahas cara membuat Check Box ActiveX Excel VBA.

Check Box ActiveX Excel VBA merupakan suatu kotak pilihan yang digunakan user untuk menyeleksi/memilih dari beberapa item atau kriteria bisa lebih dari satu. Perbedaan Check Box (Form Controls) dengan Check Box (ActiveX Controls) yaitu dalam pengunaanya membutuhkan coding VBA.

Caranya sangat mudah, langkah-langkahnya yaitu sebagai berikut :

  • Buka Sheet Microsoft Excel
  • Kemudian klik menu Developer >> klik Insert >> ActiveX Control (pilih Check Box)
ActiveX Controls
ActiveX Controls
  • Pastikan sheet pada kondisi Design Mode
  • Kemudian letakan Check Box ActiveX Controls pada sheet Excel seperti contoh pada gambar dibawah ini, kita buat 2 buah Check Box. Pada contoh ini kita membuat check box sederhana yaitu absensi kehadiran.
Check Box ActiveX Controls
Check Box ActiveX Controls
  • Selanjutnya kita buat kodingnya pada masing-masing option button, caranya :
  • Klik kanan pada CheckBox1 >> klik View code >> ketikan koding berikut ini

 

View Code Check Box
View Code Check Box

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then Range(“C8”).Value = “Hadir”
If CheckBox1.Value = False Then Range(“C8”).Value = “Absen”
End Sub

  • Klik kanan pada CheckBox2 >> klik View Code >> ketikan koding berikut ini

Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then Range(“C9”).Value = “Hadir”
If CheckBox2.Value = False Then Range(“C9”).Value = “Absen”
End Sub

  • Untuk mengatur nama, font dsb, klik kanan pilih >> Properties
  • Untuk menjalankannya kita nonaktifkan fungsi dari Design Mode, caranya klik tool Design Mode.
  • Disimpan dengan format Save As type : Excel Macro-Enabled Workbook supaya coding yang sudah kita buat tidak hilang.

Sobat-sobat bisa kembangkan sesuai kebutuhan masing-masing.

Terimakasih semoga bermanfaat.

2 pemikiran pada “Membuat Check Box ActiveX Excel VBA”

  1. bagaimana jika sheet nya ketika di password namun bisa tetap bergungsi rumusnya macronya

    Balas
    • Jika checkbox tetap berfungsi rumusnya karena inputnya tidak disheet. Atau bisa juga untuk inputnya pada sheet lain.

      Balas

Tinggalkan komentar

Situs ini menggunakan Akismet untuk mengurangi spam. Pelajari bagaimana data komentar Anda diproses.