Membuat Tombol Hapus Dengan VBA Di Microsoft Excel

http://amirakostader.blogspot.co.id/2017/03/membuat-tombol-hapus-dengan-vba-di.html

Membuat Tombol Hapus Dengan VBA

Dengan kesaktian yang dimiliki Microsoft Excel, kita bisa melakukan satu klik sata bisa menghapus seluruh isi lembar kerja Excel, kok bisa? Tentunya bisa, karena pada Excel telah tertanam rumus kode VBA yang dapat melakukan penghapusan data hanya dengan satu tombol hapus. Bagaimana caranya? Ingin tahu, mari ikuti langkahlangkah berikut. Langkah pertama, tentunya siapkan terlebih dahulu data Excel seperti berikut.
http://amirakostader.blogspot.co.id/2017/03/membuat-tombol-hapus-dengan-vba-di.html

Setelah data dibuat, selanjutnya arahkan kursor ke tab Developer >> Insert, pilih Command Button (ActiveX Control).
http://amirakostader.blogspot.co.id/2017/03/membuat-tombol-hapus-dengan-vba-di.html 

Lalu posisikan tombol button tersebut sesuai kebutuhan, misalnya dibawah data tabel. Kemudia nganti nama tombol tersebut dengan nama “Hapus”, caranya klik kanan pada tombol, pilih Commandbutton Object >> Edit, hasilnya seperti berikut.
http://amirakostader.blogspot.co.id/2017/03/membuat-tombol-hapus-dengan-vba-di.html 

Jika edit nama sudah selesai, selanjutnya klik kanan lagi pada tombol lalu pilih View Code, maka akan tampil halaman Microsot Visual Basic for Application VBA, lalu masukan kode berikut.



Private Sub CommandButton1_Click()

Dim answer As Integer

answer = MsgBox(“Are you sure you want to empty the sheet?”, vbYesNo + vbQuestion, “Empty Sheet”)

If answer = vbYes Then

Cells.ClearContents

Else

‘do nothing

End If

End Sub



Seperti pada tampilan berikut.
http://amirakostader.blogspot.co.id/2017/03/membuat-tombol-hapus-dengan-vba-di.html 

Kemudian simpan halaman tersebut dengan nama Hapus.xlsm, setelah itu kembali lagi ke lembar kerja Excel, untuk mengaktifkan tombol Hapus, terlebih dulu ke tab Developer >> Klik Design Mode, lalu sekarang Anda coba klik tombol hapus, apa yang terjadi?
http://amirakostader.blogspot.co.id/2017/03/membuat-tombol-hapus-dengan-vba-di.html 

Iya, akan tampil dialog peringatat, jika Anda klik Yes maka isi dalam tabel akan terhapus semua, seperti berikut hasilnya.
http://amirakostader.blogspot.co.id/2017/03/membuat-tombol-hapus-dengan-vba-di.html 

Mudah bukan? Dengan adanya tombol hapus ini Anda cukup sekali klik bisa menghapus seluruh data yang tidak diperlukan.

Penutup


Terima kasih atas kunjungan anda di LingkaranDunia, serta membaca artikel yang mengenai Membuat Tombol Hapus Dengan VBA Di Microsoft Excel, dan semoga artikel ini bermanfaat buat anda. Jika ada yang kurang di mengerti silahkan ajukan pertanyaan lewat Email, Facabook LingkaranDunia dan lewat kolom komentar yang kami sediakan di bawah artikel ini.



Daftar Pustaka


  • http://amirakostader.blogspot.co.id/
  • http://rumuslengkap.com/excel-database/membuat-tombol-hapus-dengan-vba-di-excel/
  • http://blogpanduanmicrosoft.blogspot.co.id/

Comments
0 Comments