Vba: cara menghapus sheet tanpa perintah atau peringatan

Saat Anda menggunakan metode Hapus di VBA untuk menghapus lembar tertentu di buku kerja, Excel akan mengeluarkan prompt yang menanyakan apakah Anda yakin ingin menghapus lembar tersebut.

Namun, Anda bisa menggunakan sintaks berikut di VBA untuk menghapus sheet tanpa prompt atau kotak peringatan:

 SubDeleteSheets ()

'turn off display alerts
Application.DisplayAlerts = False

'delete Sheet1
Sheets(" Sheet1 ").Delete

'turn back on display alerts
Application.DisplayAlerts = True

End Sub

Makro khusus ini menghapus lembar bernama Sheet1 tanpa perintah atau kotak peringatan apa pun.

Baris Application.DisplayAlerts=False memberitahu VBA untuk mematikan semua peringatan tampilan di Excel.

Kami kemudian menggunakan metode Hapus untuk menghapus lembar tertentu.

Kami kemudian menggunakan Application.DisplayAlerts=True untuk mengaktifkan kembali peringatan tampilan.

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Gunakan VBA untuk menghapus sheet tanpa perintah atau peringatan

Misalkan kita memiliki buku kerja Excel berikut yang berisi tiga lembar:

Sekarang katakanlah kita ingin membuat makro untuk menghapus sheet bernama Sheet1 .

Misalkan kita membuat makro berikut:

 SubDeleteSheets ()

'delete Sheet1
Sheets(" Sheet1 ").Delete

End Sub

Saat kami menjalankan makro ini, kami akan menerima pesan yang menanyakan apakah kami yakin ingin menghapus sheet ini:

Namun, kita dapat membuat makro berikut untuk menghapus Sheet1 tanpa perintah apa pun:

 SubDeleteSheets ()

'turn off display alerts
Application.DisplayAlerts = False

'delete Sheet1
Sheets(" Sheet1 ").Delete

'turn back on display alerts
Application.DisplayAlerts = True

End Sub

Saat kita menjalankan makro ini, sheet bernama Sheet1 secara otomatis dihapus dan tidak ada perintah yang muncul:

Perhatikan bahwa Sheet1 telah dihapus sementara dua lembar lainnya tetap utuh.

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menghitung jumlah lembar dalam buku kerja
VBA: Cara mengekstrak data dari buku kerja lain
VBA: cara menyisipkan banyak baris