Menghapus Banyak Gambar di Excel Cara Manual dan VBA

Excel tidak hanya melulu soal angka dan rumus, sesekali terkadang beberapa gambar dan objek perlu ditambahkan pada lembar kerja excel. Menambahkan atau menghapus gambar di excel pasti semua sudah paham betul. Untuk menambahkan gambar atau objek tinggal menambahkan dari tab insert picture, shape, textbox, equation atau simbol. Kemudian untuk menghapusnya tinggal pilih saja gambar atau objek yang ingin dihapus dan klik tombol delete.

Namun akan muncul masalah jika gambar dan objek yang akan dihapus dalam satu lembar kerja excel jumlahnya banyak, pasti akan makan banyak waktu jika harus menghapus satu persatu gambar atau objek ini dengan cara manual. Untuk itu berikut ini saya rangkumkan dua cara yang bisa digunakan untuk mempercepat menghapus banyak gambar di excel.

Menghapus Banyak Gambar di Excel dengan Seleksi – Delete

Untuk menghapus gambar dan objek yang banyak di excel cara pertama dengan menggunakan seleksi kemudian delete. Langkah mudahnya seperti berikut:

1. Setelah membuka sheet excel dimana gambar akan dihapus, klik F5 untuk memunculkan dialog box Go To.
2. Kemudian pilih tombol Special untuk membuka dialog box Go To Special, pilih Objects pada pilihan opsinya.
3. Klik OK, maka setiap objek dalam worksheet akan terpilih. Kemudian tinggal menghapusnya saja dengan klik tombol delete.

Cara yang sangat mudah dan simpel bukan. Namun untuk cara ini objek yang dipilih berarti keseluruhan termasuk picture, chart, diagram, equation yang dipilih akan terhapus. Jika kamu tidak ingin menghapus salah satunya, lakukan Shift + Klik kiri pada objek yang tidak ingin ikut dihapus.

Cara ini juga hanya akan menghapus gambar dan objek pada worksheet yang aktif saja, tidak keseluruhan workbook.

Menghapus Banyak Gambar dengan VBA

Cara lainnya untuk menghapus gambar adalah dengan VBA, meskipun sedikit lebih rumit namun untuk kamu yang terbiasa menggunakan VBA atau excel developer cara ini juga bisa digunakan.

1. Buka tab Developer di excel kemudian pilih Visual Basic atau bisa menggunakan shortcut Alt + F11.
2. Setelah jendela Visual Basic for Application (VBA) editor terbuka, pilih sheet dimana gambar diletakkan, anggap saja di sheet1.
3. Klik kanan pad sheet1 pilih Insert → Modul.
4. Copykan sintak berikut

   Sub DeleteAllPics()
   Dim Pic As Object
   For Each Pic In ActiveSheet.Pictures
   Pic.Delete
   Next Pic
   End Sub

5. Kemudian klik F5 untuk menjalankan makro tersebut, maka seluruh gambar pada sheet1 akan terhapus.

Demikian tutorial ini, sangat mudah bukan menghapus banyak gambar di excel.