BELAJAR VBA SESSION 3 - Menghapus Raw Data

 Melanjutkan Session 2 tentang crud navigator dalam sheet excel, Kali ini Blog Belajar VBA Macro Excel akan mengupas bagaimana membuat crud untuk menghapus salah satu row data menggunakan script vba macro. Sebelum belajar di Session 3 ini alangkah baiknya menyimak atau mempelajari dulu Session 2 yang telah kita kupas sebelumnya

sehingga ketika klik tombol Hapus (command bar) maka data eksisting pada kotak baris ke akan terhapus.

1. Pertama tama Klik Develover kemudian lanjutkan seperti dalam keterangan  gambar dibawah ini:
   
   
   Keterangan
   - Pastikan Tab ada pada tab developer, Klik insert (no.2) kemudian klik no.3 dan tempelkan di no.4


2. Selanjutnya Klik Kanan CommandButton1 (no.1) kemudian pilih properties (no.2) kemudian ganti Nama : menjadi cmdHapus dan ganti Caption menjadi Hapus :
   
   
   
   
   
   Keterangan
   - Sehingga nanti akan seperti gambar dibawah ini :
   


3. Selanjutnya No.1 biarkan ada dalam Design Mode (pastikan warna agak gelap, artinya kita ada dalam mode Design) seperti dalam gambar dibawah ini :
   
   
   
   
   
   Keterangan
   - Double klik No.2 (Command Button Hapus)

    Rubah kode ini :
    
    Private Sub cmdHapus_Click()

    End Sub
    
    Menjadi seperti ini :
    
    Private Sub cmdHapus_Click()
     'Buat variabel lngBaris dan Definisikan variable dalam bentuk Long
      Dim lngBaris As Long
      'Masukan Nilai Baris Ke kedalam variabel lngBaris yang bertipe Long
      lngBaris = Worksheets("Macro").Cells(1, 3).Value
      Worksheets("Macro").Rows(lngBaris).Delete
    End Sub



4. Selanjutnya Klik Design Mode (pastikan sampai berubah warna menjadi kembali terang, artinya kita ada dalam mode Normal) seperti dalam gambar dibawah ini :
   
   
   
   
   


Selanjutnya Pemrograman macro sudah selesai dibuat silahkan coba, 

Dan Hasilnya .. jrennggg Data Baris ke 10 sudah terhapus

 Jika ada pertanyaan atau masalah dengan kodingnya silahkan isi di commont

Semoga bermanfaat.