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

Cum se elimină toate imaginile din document în Word?

Dacă doriți să eliminați toate imaginile și să păstrați toate formatările neschimbate într-un document, cum puteți face? Acest tutorial vă va arăta câteva lucruri dificile pentru a elimina toate imaginile fără a modifica formatarea din document.

Eliminați toate imaginile din document prin funcția Găsiți și înlocuiți
Eliminați toate imaginile din document utilizând codul VBA
Eliminați cu ușurință toate imaginile din document cu Kutools pentru Word


Eliminați toate imaginile din document prin funcția Găsiți și înlocuiți

Găsiți și înlocuiți funcția oferă o modalitate ușoară de conversie sau eliminare a valorii, astfel încât să o puteți utiliza și pentru eliminarea tuturor imaginilor din document.

Pasul 1: Faceți clic pe Acasa > Înlocui pentru a deschide Găsiți și înlocuiți fereastră;

Pasul 2: În Găsiți și înlocuiți fereastra, faceți clic pe Mai Mult pentru a afișa mai multe Caută Opțiuni, apoi faceți clic pe Special > Graficși, în cele din urmă, faceți clic pe Înlocuiește-le pe toate buton. Vedeți captura de ecran:

notițe: poti intra si tu ^g în Gaseste ce caseta direct, păstrați înlocuirea cu caseta goală și apoi faceți clic pe Înlocuiește-le pe toate buton pentru a elimina toate imaginile din document;

Acum toate imaginile din documentele actuale sunt eliminate imediat după cum se arată în imaginea de mai jos.


Eliminați cu ușurință toate imaginile din document cu Kutools pentru Word:

Eliminați imaginile utilitatea Kutools pentru Cuvânt vă poate ajuta să eliminați rapid toate imaginile dintr-un interval selectat sau din întregul document după cum aveți nevoie. Vedeți operațiunea așa cum este prezentată imaginea de mai jos. Descărcați și încercați acum! (60- traseu liber de o zi)


Eliminați toate imaginile din document utilizând codul VBA

Utilizarea codului VBA este un alt mod mai ușor de a elimina toate imaginile din document. Puteți utiliza un cod VBA după cum urmează pentru a elimina toate imaginile din document.

Pasul 1: Apăsați tasta Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicație fereastră;

Pasul 2: Faceți clic pe Insera > Module, copiați și lipiți următorul cod VBA în Module fereastră;

Pasul 3: Faceți clic pe Alerga pentru a aplica VBA.

Cod VBA: Eliminați toate imaginile din document:

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

Acum toate imaginile din documentele actuale sunt eliminate imediat după cum se arată în imaginea de mai jos.


Eliminați toate imaginile din document cu Kutools pentru Word

Kutools pentru Cuvânt oferă cel mai convenabil mod de a elimina toate imaginile din document. Poate elimina toate imaginile din întregul document sau toate imaginile din partea selectată a documentului.

Kutools pentru Cuvânt : cu mai mult de 100 de suplimente Word utile, liber să încercați fără limitări 60 zile.

Eliminați imaginile dintr-un interval:

1. Selectați intervalul care conține imaginile pe care doriți să le eliminați, apoi aplicați acest utilitar făcând clic pe Kutools > Mai Mult > Eliminați imaginile pentru a le scoate deodată. Vedeți captura de ecran:

Eliminați imaginile din întregul document:

1. Doar activați utilitarul făcând clic pe Kutools > Mai Mult > Eliminați imaginile fără a selecta nicio parte a documentului. Apoi o Kutools pentru Cuvânt se afișează caseta de dialog pentru a vă reaminti eliminarea tuturor imaginilor. Clic Da pentru a începe eliminarea.

Acum toate imaginile din documentele actuale sunt eliminate imediat după cum se arată în imaginea de mai jos.

Dacă doriți să aveți o încercare gratuită a acestui utilitar, vă rugăm să accesați descărcați gratuit software-ul mai întâi, apoi mergeți pentru a aplica operația conform pașilor de mai sus.



Instrumente de productivitate Word recomandate

 

Kutools pentru Word - Mai mult de 100 de funcții avansate pentru Word, economisiți-vă 50% timp

  • Operațiile complicate și repetate pot fi efectuate o singură dată în câteva secunde.
  • Inserați mai multe imagini în foldere în documentul Word simultan.
  • Combinați și combinați mai multe fișiere Word din foldere într-unul singur cu comanda dorită.
  • Împărțiți documentul curent în documente separate în funcție de titlu, secțiune de secțiune sau alte criterii.
  • Convertiți fișiere între Doc și Docx, Docx și PDF, colecție de instrumente pentru conversii și selecție obișnuite și așa mai departe ...
Comentarii (5)
Încă nu există evaluări. Fii primul care evaluează!
Acest comentariu a fost redus la minimum de moderatorul de pe site
Codul dvs. va elimina doar formele inline, luați în considerare următoarele, deoarece am văzut uneori probleme când folosesc colecții Do While ActiveDocument.Shapes.count > 0 ActiveDocument.Shapes(1).Delete Loop Do While ActiveDocument.InlineShapes.count > 0 ActiveDocument.InlineShapes( 1).Delete Loop Le folosesc atunci când schimb un fișier doar în text. De asemenea, convertesc toate tabelele în fila delmited Do While ActiveDocument.Tables.count > 0 ActiveDocument.Tables(1).ConvertToText Separator:=wdSeparateByTabs Loop Nu am văzut probleme cu buclele do while, dar am avut ocazional când șterg dintr-o colecție care Mă joc cu, în mod alternativ, folosesc .count pentru a obține un total de articole și folosesc a pentru următorul cu pasul -1 pentru a le lucra înapoi. Apropo, lucrez pe un Mac și obiectele se comportă uneori amuzant, iar unele obiecte VBA din Windows nici măcar nu sunt disponibile.
Acest comentariu a fost redus la minimum de moderatorul de pe site
Vă mulțumesc foarte mult pentru acest mod - mi-a economisit ORE de muncă să fac fotografii dintr-un document!! nancy
Acest comentariu a fost redus la minimum de moderatorul de pe site
Wow, da, mulțumesc. Câteva alte meciuri anterioare nu au funcționat.
Acest comentariu a fost redus la minimum de moderatorul de pe site
Nu știu, dar o parte din grafică nu se captează în butonul de înlocuire.
Acest comentariu a fost redus la minimum de moderatorul de pe site
Memento grozav despre opțiunea de găsire și înlocuire>specială>grafică!

Mi-a scutit atât de multă muncă!
Nu există comentarii postate aici încă
Lăsa comentarii
Postare ca invitat
×
Evaluează această postare:
0   Caractere
Locații sugerate

Urmărește-ne

Copyright © 2009 - www.extendoffice.com. | Toate drepturile rezervate. Cu sprijinul ExtendOffice. | Harta site-ului
Microsoft și sigla Office sunt mărci comerciale sau mărci comerciale înregistrate ale Microsoft Corporation în Statele Unite și / sau în alte țări.
Protejat de Sectigo SSL