Hari ini saya mendapat tugas baru dari atasan saya, yaitu memperkecil sebuah file Excel / XLS yang berukuran 5MB. File ini sebenarnya hanya memiliki sedikit data, namun apa penyebab ukurannya menjadi demikian besar?
Selidik punya selidik, file tersebut memiliki banyak duplikasi TextBoxes dan Image dalam satu Sheet. Jadi dalam satu Sheet ada satu TextBoxes yang berfungsi untuk menampilkan tulisan, namun sepertinya dicopy-paste selama ratusan kali.
Untuk menghapus TextBoxes yang demikian banyak, akan menghabiskan waktu dan lama-lama pasti akan jengkel jika harus melakukan Click and Delete.
Berikut adalah solusinya :
- Buka File Excel yang ukurannya besar karena banyaknya isi yang terduplikasi
- Select area yang akan dihapus object TextBoxes-nya
- Tekan Alt+F11 untuk membuka Microsoft Visual basic for Applications
- Tekan Ctrl+G untuk membuka immediate Window
- Paste kode berikut lalu tekan Enter :
1ActiveSheet.textboxes.delete
Hasilnya, TextBoxes yang jumlahnya ratusan atau mungkin ribuan tadi, akan terhapus.
- Kalau ingin menghapus gambar, silakan ganti kata “textboxes” menjadi “pictures”