Ugrás a tartalomra

Hogyan lehet eltávolítani az összes képet a Word dokumentumából?

Ha el akarja távolítani az összes képet és változatlan formában szeretné megtartani a dokumentumot, hogyan teheti meg? Ez az oktatóanyag néhány trükkös dolgot mutat be az összes kép eltávolításához a dokumentum formázásának megváltoztatása nélkül.

Távolítson el minden képet a dokumentumról a Keresés és csere funkcióval
Távolítsa el az összes képet a dokumentumból a VBA kód használatával
Könnyen távolítsa el az összes képet a dokumentumból a Kutools for Word segítségével


Távolítson el minden képet a dokumentumról a Keresés és csere funkcióval

Keresés és csere funkció egyszerű módot kínál az érték konvertálására vagy eltávolítására, így az összes kép eltávolításához is használható a dokumentumból.

1 lépés: Kattintson a gombra Kezdőlap > Cserélje megnyitni Keresés és csere ablak;

2. lépés: A Keresés és csere ablakban kattintson a Több gombot, hogy többet hozzon létre Keresés Kattintson az Opciók elemre, majd kattintson a gombra Különleges > Grafikus, és végül kattintson a gombra Az összes cseréje gomb. Lásd a képernyőképet:

Megjegyzések: be is léphet ^g be a Mit keres közvetlenül a mezőt, tartsa üresen a cserélje ki mezőt, majd kattintson a gombra Az összes cseréje gomb az összes kép eltávolításához a dokumentumból;

Most az aktuális dokumentumok összes képét azonnal eltávolítja az alábbi képernyőképen.


Könnyen távolítsa el az összes képet a dokumentumból a Kutools for Word segítségével:

A Képek eltávolítása hasznossága Kutools for Word segíthet az összes kép gyors eltávolításában a kiválasztott tartományból vagy az egész dokumentumból, amire szüksége van. Lásd a műveletet az alábbi képernyőképen. Töltse le és próbálja ki most! (60-napos ingyenes túra)


Távolítsa el az összes képet a dokumentumból a VBA kód használatával

A VBA kód használata egy másik egyszerűbb módszer az összes kép eltávolítására a dokumentumból. Az alábbiak szerint VBA kódot használhat az összes kép eltávolításához a dokumentumból.

1 lépés: Nyomja meg a más + F11 billentyűk megnyitásához Microsoft Visual Basic alkalmazásokhoz ablak;

2 lépés: Kattintson a gombra betétlap > Modulok, másolja és illessze be a következő VBA kódot a Modulok ablak;

3 lépés: Kattintson a futás gombra a VBA alkalmazásához.

VBA kód: Az összes kép eltávolítása a dokumentumból:

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

Most az aktuális dokumentumok összes képét azonnal eltávolítja az alábbi képernyőképen.


Távolítsa el az összes képet a dokumentumból a Kutools for Word segítségével

Kutools for Word biztosítja a legkényelmesebb módot az összes kép eltávolítására a dokumentumból. Eltávolíthatja az összes képet az egész dokumentumból, vagy az összes képet a dokumentum kiválasztott részéből.

Kutools for Word : több mint 100 praktikus Word-bővítménnyel, ingyenesen kipróbálható korlátozás nélkül 60 napok.

Képek eltávolítása egy tartományból:

1. Kérjük, válassza ki az eltávolítani kívánt képtartományt, majd kattintson rá a kattintással Kutools > Több > Képek eltávolítása hogy azonnal eltávolítsam őket. Lásd a képernyőképet:

Képek eltávolítása az egész dokumentumból:

1. Csak kattintson rá a segédprogramra Kutools > Több > Képek eltávolítása a dokumentum bármely részének kiválasztása nélkül. Aztán a Kutools for Word párbeszédpanel jelenik meg, hogy emlékeztesse Önt az összes kép eltávolítására. Kattintson a gombra Igen hogy elkezdje az eltávolítást.

Most az aktuális dokumentumok összes képét azonnal eltávolítja az alábbi képernyőképen.

Ha szeretné ingyenesen kipróbálni ezt a segédprogramot, kérjük, látogasson el ide: ingyenesen letölthető a szoftver először, majd lépjen a művelet végrehajtására a fenti lépések szerint.


A legjobb irodai hatékonyságnövelő eszközök

Kutools for Word - Növelje Word-élményét az Over segítségével 100 Figyelemre méltó tulajdonságok!

🤖 Kutools AI asszisztens: Alakítsa át írását mesterséges intelligencia segítségével - Tartalom létrehozása  /  Szöveg átírása  /  Összefoglalja a dokumentumokat  /  Információért érdeklődjön dokumentum alapján, mindezt a Word-en belül

📘 Dokumentummesterség: Felosztott oldalak  /  Dokumentumok egyesítése  /  Kijelölés exportálása különböző formátumokban (PDF/TXT/DOC/HTML...)  /  Kötegelt konvertálás PDF-be  /  Oldalak exportálása képként  /  Nyomtasson több fájlt egyszerre...

Tartalom Szerkesztés: Kötegelt keresés és csere Több fájl között  /  Minden kép átméretezése  /  Transzponálja a táblázat sorait és oszlopait  /  Táblázat konvertálása szöveggé...

🧹 Könnyed tisztítás: Söpörj el Extra helyek  /  Szakaszszünetek  /  Minden fejléc  /  Szövegdobozok  /  Hiperhivatkozások  / További eltávolító eszközökért látogasson el a mi oldalunkra Csoport eltávolítása...

Kreatív betétek: Beszúrás Ezer elválasztó  /  Jelölőnégyzetek  /  Rádió gombok  /  QR-kód  /  Vonalkód  /  Átlós vonal táblázat  /  Egyenletfelirat  /  Képfelirat  /  Táblázat felirata  /  Több kép  / Fedezzen fel többet a Csoport beszúrása...

???? Precíziós kiválasztás: Pontosan konkrét oldalak  /  asztalok  /  formák  /  címsor bekezdései  / A navigáció javítása a következővel: több Jelölje ki a funkciókat...

Star Enhancements: Gyorsan navigáljon bármely helyre  /  ismétlődő szöveg automatikus beszúrása  /  zökkenőmentesen válthat a dokumentumablakok között  /  11 Konverziós eszközök...

???? Ki szeretné próbálni ezeket a funkciókat? A Kutools for Word kínál a 60 napos ingyenes próba, korlátozások nélkül! 🚀
 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Great reminder about the find & replace>special>graphics option!

Saved me so much work!
This comment was minimized by the moderator on the site
i dont know but some of the graphic is not capturing in replace button.
This comment was minimized by the moderator on the site
Wow, yes thank you. Several other previous matches did not work.
This comment was minimized by the moderator on the site
Thank you so much for this how to - it saved me HOURS of work taking photos out of a document!! nancy
This comment was minimized by the moderator on the site
Your code will only remove inlineshapes, consider the following as I have sometimes seen problems when using collections Do While ActiveDocument.Shapes.count > 0 ActiveDocument.Shapes(1).Delete Loop Do While ActiveDocument.InlineShapes.count > 0 ActiveDocument.InlineShapes(1).Delete Loop I use these when changing a file to text only. I also convert all tables to tab delmited Do While ActiveDocument.Tables.count > 0 ActiveDocument.Tables(1).ConvertToText Separator:=wdSeparateByTabs Loop I have not seen any problems with do while loops, but have occasionally when deleting from a collection that I am playing with I alternatively use .count to get a total of items and use a for next with a step -1 to work on them backwards. By the way, I work on a Mac and objects sometimes act funny and some windows VBA objects are not even available.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations