Menghapus Semua Object Gambar Dan Lainya Pada Excel Dengan VBA
Super Admin 12-12-2021 3,301 Tutorial
Kadang pada microsoft excel terasa lambat saat membuka file bisa saja terjadi karena file excel tersebut terlalu banyak object gambar atau banya object yang terduplikasi, biasanya saya menghapusnya dengan menjalankan VBA di excel, dengan ALT + F11 kemudian menambahkan modul VBA Menu => Insert => Modul kemudian pastekan isi script dibawah ini
Sub DeletePictures()
Dim oPic As Shape
Dim wb As Workbook
Dim ws As Worksheet
'loop through all worksheets
For Each ws In ActiveWorkbook.Worksheets
'loop through all objects in selected worksheet
For Each oPic In ws.Shapes
'delete object
oPic.Delete
Next oPic
Next ws
End Sub
Kemudian Run, tunggu sampai proses selesai biasanya tergantung seberapa banyak object yang ada pada file.