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

Kako odstraniti vse slike iz dokumenta v Wordu?

Kako želite to storiti, če želite v dokumentu odstraniti vse slike in ohraniti nespremenjeno oblikovanje? Ta vadnica vam bo pokazala nekaj zapletenih stvari za odstranitev vseh slik brez spreminjanja oblikovanja v dokumentu.

Odstranite vse slike iz dokumenta s funkcijo Najdi in zamenjaj
Odstranite vse slike iz dokumenta s kodo VBA
Z Kutools for Word enostavno odstranite vse slike iz dokumenta


Odstranite vse slike iz dokumenta s funkcijo Najdi in zamenjaj

Poišči in zamenjaj funkcija omogoča enostaven način za pretvorbo ali odstranjevanje vrednosti, zato jo lahko uporabite tudi za odstranjevanje vseh slik iz dokumenta.

Korak 1: kliknite Home > Zamenjaj da odprete Poišči in zamenjaj okno;

2. korak: v Poišči in zamenjaj okno, kliknite na Več gumb za prikaz več Iskalnik In nato kliknite Poseben > Grafičnoin na koncu kliknite Zamenjaj vse . Oglejte si posnetek zaslona:

Opombe: lahko tudi vnesete ^g v Našli kaj neposredno zamenjajte s praznim poljem in kliknite na Zamenjaj vse gumb za odstranitev vseh slik iz dokumenta;

Zdaj se vse slike v trenutnih dokumentih takoj odstranijo, kot je prikazano spodaj.


Z Kutools for Word enostavno odstranite vse slike iz dokumenta:

O Odstrani slike uporabnost Kutools za Word vam lahko pomaga hitro odstraniti vse slike iz izbranega obsega ali celoten dokument, kot ga potrebujete. Oglejte si postopek, kot je prikazano na sliki spodaj. Prenesite in preizkusite zdaj! (60-dnevna prosta pot)


Odstranite vse slike iz dokumenta s kodo VBA

Uporaba kode VBA je še en lažji način odstranjevanja vseh slik iz dokumenta. Za odstranitev vseh slik iz dokumenta lahko uporabite kodo VBA na naslednji način.

Korak 1: Pritisnite tipko druga + F11 tipke za odpiranje Microsoft Visual Basic za uporabo okno;

Korak 2: kliknite Vstavi > Moduli, kopirajte in prilepite naslednjo kodo VBA v Moduli okno;

Korak 3: Kliknite na Run gumb za uporabo VBA.

Koda VBA: Odstrani vse slike iz dokumenta:

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

Zdaj se vse slike v trenutnih dokumentih takoj odstranijo, kot je prikazano spodaj.


Odstranite vse slike iz dokumenta s programom Kutools for Word

Kutools za Word omogoča najprimernejši način odstranjevanja vseh slik iz dokumenta. Odstrani lahko vse slike iz celotnega dokumenta ali vse slike iz izbranega dela dokumenta.

Kutools za Word : z več kot 100 priročnimi dodatki za Word, brezplačno poskusite brez omejitev 60 dni.

Odstranite slike iz obsega:

1. Izberite obseg, v katerem so slike, ki jih želite odstraniti, in nato s klikom uporabite ta pripomoček Kutools > Več > Odstrani slike da jih odstranite naenkrat. Oglejte si posnetek zaslona:

Odstrani slike iz celotnega dokumenta:

1. Samo kliknite pripomoček Kutools > Več > Odstrani slike ne da bi izbrali kateri koli del dokumenta. Potem a Kutools za Word Pojavi se pogovorno okno, ki vas opozori na odstranitev vseh slik. Kliknite Da da začnete odstranjevanje.

Zdaj se vse slike v trenutnih dokumentih takoj odstranijo, kot je prikazano spodaj.

Če želite brezplačno preskusiti to orodje, pojdite na brezplačno prenesete programsko opremo najprej in nato nadaljujte z uporabo postopka v skladu z zgornjimi koraki.



Priporočena orodja za produktivnost besed

 

Kutools za Word - Več kot 100 naprednih funkcij za Word, prihranite 50% časa

  • Zapletene in ponavljajoče se operacije je mogoče enkrat obdelati v nekaj sekundah.
  • V Wordov dokument hkrati vstavite več slik v mape.
  • Združite in združite več datotek Word v mapah v eno z želenim vrstnim redom.
  • Trenutni dokument razdelite na ločene dokumente glede na naslov, prelom odseka ali druga merila.
  • Pretvarjanje datotek med dokumenti Doc in Docx, Docx in PDF, zbirka orodij za pogoste pretvorbe in izbiro itd. ...
Komentarji (5)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
Vaša koda bo odstranila samo inlineshape, upoštevajte naslednje, saj sem včasih opazil težave pri uporabi zbirk Do While ActiveDocument.Shapes.count > 0 ActiveDocument.Shapes(1).Delete Loop Do While ActiveDocument.InlineShapes.count > 0 ActiveDocument.InlineShapes( 1).Delete Loop Te uporabljam, ko spreminjam datoteko samo v besedilo. Vse tabele tudi pretvorim v zavihek delmited Do While ActiveDocument.Tables.count > 0 ActiveDocument.Tables(1).ConvertToText Separator:=wdSeparateByTabs Loop Nisem opazil nobenih težav z zankami do while, vendar sem občasno pri brisanju iz zbirke Igram se z. Druga možnost je, da uporabim .count, da dobim skupno število elementov, in uporabim a za naslednji s korakom -1 za delo na njih nazaj. Mimogrede, delam na Macu in predmeti so včasih smešni in nekateri predmeti Windows VBA sploh niso na voljo.
Ta komentar je moderator na spletnem mestu minimiziral
Najlepša hvala za to, kako - prihranilo mi je URE dela pri odstranjevanju fotografij iz dokumenta!! nancy
Ta komentar je moderator na spletnem mestu minimiziral
Vau, ja, hvala. Več drugih prejšnjih tekem ni delovalo.
Ta komentar je moderator na spletnem mestu minimiziral
ne vem, ampak nekaj grafike se ne zajame v gumbu za zamenjavo.
Ta komentar je moderator na spletnem mestu minimiziral
Odličen opomnik o možnosti najdi in zamenjaj>posebno> grafiko!

Prihranil mi je toliko dela!
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL