VBA Excel Pemula 14 : Hapus Data Range/Cell Yang Mengandung Huruf Saja Dan Hapus Semua Data Dengan CheckBox - Perhatikan gambar gif diatas..!! dengan mudah anda akan memahami maksud dari posting ini.
Dimana pada tombol HAPUS HURUF mengandung perintah untuk menghapus data huruf pada Range/Cell.
 |
| Hapus Data Range/Cell Yang Mengandung Huruf Saja |
Dan pada tombol CheckBox HAPUS SEMUA, Pada saat CheckBox di Ceks maka data semua dihapus.
Caranya cukup mudah membuat tombol perintah seperti pada gambar gif diatas. ikuti saja step by step langkah berikut ini.
Caranya cukup mudah membuat tombol perintah seperti pada gambar gif diatas. ikuti saja step by step langkah berikut ini.
Admin sangat menyarankan agar membuat file contoh atau membuat experiment sendiri dengan menggunakan kode yang admin sajikan.
Dengan membuat file contoh atau file experiment kita akan lebih memahami fungsi dan alur kerja kode.
Cara Hapus Data Range/Cell Yang Mengandung Huruf Saja Dan Hapus Semua Data Dengan CheckBox :
- Buka excel dan Pilih Tab Developer selanjutnya klik Visual Basic atau dengan jalan pintas keyboard tekan secara bersamaan tombol Alt+F11.
- Pada Jendela Visual Basic Tambahkan UserForm dengan Caption "Aplikasi Pemula 14" dan tambahkan CommandButton1 dengan Caption "HAPUS HURUF", dan tambahkan CheckBox1 dengan Caption "HAPUS SEMUA"
- Klik kanan pada CommandButton1 Caption "HAPUS HURUF", Pilih View Code dan masukkan Kode berikut :
Private Sub CommandButton1_Click()
Set Rng = Range("A1:G7") ' Sesuaikan Range dengan kebutuhan
For Each cell In Rng.Cells
If IsNumeric(Left(cell, 1)) = False Then
cell.Clear
End If
Next
End Sub
Set Rng = Range("A1:G7") ' Sesuaikan Range dengan kebutuhan
For Each cell In Rng.Cells
If IsNumeric(Left(cell, 1)) = False Then
cell.Clear
End If
Next
End Sub
- Klik kanan pada CheckBox1 dengan Caption "HAPUS SEMUA", Pilih View Code dan masukkan Kode berikut :
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Cells.Clear
End If
End Sub
If CheckBox1.Value = True Then
Cells.Clear
End If
End Sub
Semoga dapat digunakan dan memodifikasi sesuai dengan kebutuhan. Silahkan share juga di kolom kementar kode lainnya yang berhubungan dengan hapus data.