Friday, March 3, 2017

√ Cara Menciptakan Command Button Activex Control Excel Vba

 | Command button Activex Control Excel VBA ialah merupakan sebuah tombol perintah yang sanggup dipakai untuk menjalankan sebuah event atau perintah tertentu yang sanggup kita buat coddingnya sesuai impian atau kebutuhan masing-masing. Misalnya untuk membuka form, melaksanakan operasi hitung, input data, hapus data,  membuka message box dan sebagainya.

Nah untuk itu pada kesempatan kali ini admin akan membahas atau share bagaimana cara menciptakan command button activex control excel vba.

Untuk menciptakan command button activex control excel vba ini kalian sanggup melakukannya dengan mudah. Silahkan memulai untuk mengikuti langkah-langkah berikut ini

  • Pertama buka file atau aplikasi microsoft excel
  • Pada Tab hidangan Developer >> klik Insert >> ActiveX Controls (pilih Command button)
  • Jika pada tampilan Office 2010 keatas belum ada hidangan Developernya silahkan baca Cara mengaktifkan Menu Developer di Excel 

  • Pastikan sheet pada kondisi Design Mode
  • Kemudian letakan Command button ActiveX Controls pada sheet Excel menyerupai pada gambar dibawah ini.

 Command button Activex Control Excel VBA ialah merupakan sebuah tombol perintah yang sanggup √ Cara menciptakan command button Activex Control Excel VBA

  • Pada pola ini kita akan coba menciptakan tombol printah untuk menampilkan message box (kotak pesan)
  • Klik Kanan pada Commandbutton1 > pilih view code atau klik 2x pada buttonnya
 Command button Activex Control Excel VBA ialah merupakan sebuah tombol perintah yang sanggup √ Cara menciptakan command button Activex Control Excel VBA
  • Selanjutnya akan muncul tampilan Aplikasi Visual Basic menyerupai Gambar berikut ini 
 Command button Activex Control Excel VBA ialah merupakan sebuah tombol perintah yang sanggup √ Cara menciptakan command button Activex Control Excel VBA


  • Diantara Private Sub CommandButton1_Click() dan End Sub  ketikan coding atau perintah menyerupai pola dibawah ini

Dim pesan  As Integer  
    pesan = MsgBox("Apakah data sudah benar mengikuti ?", vbInformation + vbYesNo, "Peringatan")
    If pesan = vbYes Then
         'Masukkan proses penyimpanan
     Else
         'Kondisi yang ingin ditambahkan, misal kondisi keluar"
    End If

Kaprikornus jikalau sudah diketikan maka tampilannya akan menyerupai ini


Private Sub CommandButton1_Click()
Dim pesan  As Integer  
    pesan = MsgBox("Apakah data sudah benar mengikuti ?", vbInformation + vbYesNo, "Peringatan")
    If pesan = vbYes Then
         'Masukkan proses penyimpanan
     Else
         'Kondisi yang ingin ditambahkan, misal kondisi keluar"
    End If
End Sub

Keterangan :
Pada kalimat msgbox yang ditandai dengan warna Orange sanggup kalian ganti sesuai keinginan, pesan apa yang akan ditampilkan.
Cara Menjalankannya 

Setelah kalian mengikuti tutorial diatas selanjutnya kita akan menjalankan kegiatan berikut 

  • Sebelumnya non aktifkan Design mode, Klik tool Design Mode pada hidangan Developer
  • Selanjutnya kalian tinggal coba klik command button tersebut maka akan tampil karenanya menyerupai gambar gif  dibawah ini.
 Command button Activex Control Excel VBA ialah merupakan sebuah tombol perintah yang sanggup √ Cara menciptakan command button Activex Control Excel VBA

  • Selanjutnya jangan lupa simpan dengan format Save As type : Excel Macro-Enabled Workbook.
Nah Demikianlah Cara menciptakan command button activex control excel ini. Selain Commoand Button masih banyak perintah lainnya menyerupai Combo Box, List Box, Check Box, Option Button yang sanggup kalian gunakan dalam Activex control excel vba ini . Dan biar pembahasan ini bermanfaat dalam menambahkan wawasan kalian untuk mengaplikasikan Microsoft Excel ini. Wassalam

Sumber http://www.tutorialankha.com