Note: The other languages of the website are Google-translated. Back to English

Bagaimana cara menghapus semua gambar dari dokumen di Word?

Jika Anda ingin menghapus semua gambar dan tidak mengubah semua pemformatan dalam dokumen, bagaimana Anda bisa melakukannya? Tutorial ini akan menunjukkan beberapa hal rumit untuk menghapus semua gambar tanpa mengubah format di dokumen.

Hapus semua gambar dari dokumen dengan fungsi Find and Replace
Hapus semua gambar dari dokumen dengan menggunakan kode VBA
Hapus semua gambar dengan mudah dari dokumen dengan Kutools for Word


Hapus semua gambar dari dokumen dengan fungsi Find and Replace

Cari dan Ganti Fungsi menyediakan cara mudah untuk mengubah atau menghapus nilai, sehingga Anda juga dapat menggunakannya untuk menghapus semua gambar dari dokumen.

Langkah 1: Klik Beranda > menggantikan untuk membuka Cari dan Ganti jendela;

Langkah 2: Di Cari dan Ganti jendela, klik More tombol untuk menampilkan lebih banyak Pencarian Opsi, lalu klik Khusus > Grafis, dan terakhir klik Ganti Semua tombol. Lihat tangkapan layar:

Note: Anda juga bisa masuk ^g ke dalam Temukan apa kotak secara langsung, biarkan kotak ganti dengan kosong dan kemudian klik Ganti Semua tombol untuk menghapus semua gambar dari dokumen;

Sekarang semua gambar dalam dokumen saat ini dihapus segera seperti gambar di bawah ini.


Hapus semua gambar dengan mudah dari dokumen dengan Kutools for Word:

The Hapus Gambar kegunaan Kutools for Word dapat membantu Anda dengan cepat menghapus semua gambar dari rentang yang dipilih atau seluruh dokumen yang Anda butuhkan. Lihat operasi seperti gambar di bawah ini. Unduh dan coba sekarang! (60- jalur bebas hari)


Hapus semua gambar dari dokumen dengan menggunakan kode VBA

Menggunakan kode VBA adalah cara lain yang lebih mudah untuk menghapus semua gambar dari dokumen. Anda dapat menggunakan kode VBA sebagai berikut untuk menghapus semua gambar dari dokumen.

Langkah 1: Tekan lain + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela;

Langkah 2: Klik Menyisipkan > Modul, salin dan tempel kode VBA berikut ke file Modul jendela;

Langkah 3: Klik Run tombol untuk menerapkan VBA.

Kode VBA: Hapus semua gambar dari dokumen:

Sub DitchPictures()
Dim objPic As InlineShape
For Each objPic In ActiveDocument.InlineShapes
objPic.Delete
Next objPic
End Sub

Sekarang semua gambar dalam dokumen saat ini dihapus segera seperti gambar di bawah ini.


Hapus semua gambar dari dokumen dengan Kutools for Word

Kutools for Word menyediakan cara termudah untuk menghapus semua gambar dari dokumen. Itu dapat menghapus semua gambar dari seluruh dokumen atau semua gambar dari bagian dokumen yang dipilih.

Kutools for Word : dengan lebih dari 100 add-in Word yang praktis, bebas untuk mencoba tanpa batasan dalam 60 hari-hari.

Hapus gambar dari jarak:

1. Pilih rentang berisi gambar yang ingin Anda hapus, lalu terapkan utilitas ini dengan mengklik Kutools > More > Hapus Gambar untuk menghapusnya sekaligus. Lihat tangkapan layar:

Hapus gambar dari seluruh dokumen:

1. Aktifkan saja utilitas tersebut dengan mengklik Kutools > More > Hapus Gambar tanpa memilih bagian mana pun dari dokumen. Kemudian a Kutools for Word kotak dialog muncul untuk mengingatkan Anda menghapus semua gambar. Klik Yes untuk mulai menghapus.

Sekarang semua gambar dalam dokumen saat ini dihapus segera seperti gambar di bawah ini.

Jika Anda ingin mencoba utilitas ini secara gratis, buka unduh perangkat lunak gratis pertama, lalu lanjutkan untuk menerapkan operasi sesuai langkah di atas.



Alat Produktivitas Kata yang Direkomendasikan

 

Kutools For Word - Lebih dari 100 Fitur Canggih Untuk Word, Hemat 50% Waktu Anda

  • Pengoperasian yang rumit dan berulang dapat dilakukan satu kali pemrosesan dalam hitungan detik.
  • Sisipkan beberapa gambar di seluruh folder ke dalam dokumen Word sekaligus.
  • Gabungkan dan gabungkan beberapa file Word di seluruh folder menjadi satu dengan urutan yang Anda inginkan.
  • Pisahkan dokumen saat ini menjadi dokumen terpisah sesuai dengan judul, hentian bagian, atau kriteria lainnya.
  • Konversikan file antara Doc dan Docx, Docx dan PDF, kumpulan alat untuk konversi dan pemilihan umum, dan seterusnya ...
Urutkan komentar berdasarkan
komentar (5)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Kode Anda hanya akan menghapus inlineshapes, pertimbangkan hal berikut karena saya terkadang melihat masalah saat menggunakan koleksi Do While ActiveDocument.Shapes.count > 0 ActiveDocument.Shapes(1).Delete Loop Do While ActiveDocument.InlineShapes.count > 0 ActiveDocument.InlineShapes( 1).Delete Loop Saya menggunakan ini ketika mengubah file menjadi teks saja. Saya juga mengonversi semua tabel menjadi tab yang dibatasi Do While ActiveDocument.Tables.count > 0 ActiveDocument.Tables(1).ConvertToText Separator:=wdSeparateByTabs Loop Saya tidak melihat masalah apa pun dengan loop do while, tetapi terkadang saat menghapus dari koleksi itu Saya bermain dengan saya sebagai alternatif menggunakan .count untuk mendapatkan total item dan menggunakan untuk selanjutnya dengan langkah -1 untuk mengerjakannya mundur. Omong-omong, saya bekerja di Mac dan objek terkadang bertingkah lucu dan beberapa objek VBA windows bahkan tidak tersedia.
Komentar ini diminimalkan oleh moderator di situs
Terima kasih banyak untuk cara ini - ini menyelamatkan saya JAM JAM kerja mengambil foto dari dokumen!! nancy
Komentar ini diminimalkan oleh moderator di situs
Wah, ya terima kasih. Beberapa pertandingan sebelumnya tidak berhasil.
Komentar ini diminimalkan oleh moderator di situs
saya tidak tahu tetapi beberapa grafik tidak menangkap di tombol ganti.
Komentar ini diminimalkan oleh moderator di situs
Pengingat yang bagus tentang opsi temukan & ganti>khusus>grafis!

Menyelamatkan saya begitu banyak pekerjaan!
Belum ada komentar yang diposting di sini
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan

Ikuti kami

Hak Cipta © 2009 - www.extendoffice.com. | Seluruh hak cipta. Dipersembahkan oleh ExtendOffice. | Peta Situs
Microsoft dan logo Office adalah merek dagang atau merek dagang terdaftar dari Microsoft Corporation di Amerika Serikat dan / atau negara lain.
Dilindungi oleh Sectigo SSL