I just want to remove all the images in my word document. I have about 365 pages document, in which there are images in almost all pages. I can not delete one by one. I can save it in .txt format but I will lose the formatting of the data. Is there any other way to get this?
-
You probably didn't mean flat out, "remove all images..without losing formatting" as your title was, because obviously if you remove images, you will lose some formatting like the blank space where the image was, will go, but I guess you want that to go anyway, so you want to lose that formatting. Dan-o's answer seems good to me.– barlopFeb 23, 2013 at 21:03
3 Answers
In advanced find/replace
find ^g
replace [leave blank]
-
This is exactly what the linked article in the accepted answer says. (OTOH, it's probably useful to have it written out here in case the link breaks.) May 9, 2015 at 19:07
- Ctrl + H
- Click on "More >>"
- Click on "Special" > "Graphic"
- Now you can see
^g
in "Find what:". Click on "Replace All"
Public Sub PicturesDeleteAll()
Dim objPic As Shape
For Each objPic In ActiveDocument.Shapes
objPic.Delete
Next objPic
End Sub
For Inline Shapes, replace "Shape" with "InlineShape" and ".Shapes" with ".InlineShapes"