Is there a Word macro will remove all in-line images?
Thread poster: Reed James

Reed James
Chile
Local time: 04:46
Member (2005)
Spanish to English
Oct 20, 2006

Hello.

I just recently tried to import a long document with many images into SDLX, but was unsuccessful. I was finally able to do that by removing all in-line images. I suppose that I could also achieve this by running a document splitter macro to split the file up into several smaller files.

Anyway, it would be nice to be able to remove all those images in one fell swoop. is it possible? Thanks in advance.

Reed


Direct link Reply with quote
 

Endre Both  Identity Verified
Germany
Local time: 10:46
Member (2002)
English to German
See link Oct 20, 2006

Hello Reed,

There is indeed a macro, by Miri Ofek, for exporting inline images from a word doc; there is even another one that moves them back after translation.

See here:
http://www.necco.ca/dv/word_macros.htm

...under the heading "Removing and reinserting graphics in a file (Dot)".

Good luck,
Endre


Direct link Reply with quote
 

Adrien Esparron
France
Local time: 10:46
Member (2007)
German to French
+ ...
A very simple Macro Oct 23, 2006

Reed D. James wrote:

Anyway, it would be nice to be able to remove all those images in one fell swoop. is it possible? Thanks in advance.



The Endre's link is a very good one indeed, thank's ! The Miri's .DOT is also very interesting.

If the purpose is just dropping the pictures out, without needing to put them back, just try this :

Sub images()
'
' images Macro
' Macro enregistrée le 23/10/2006 par OLIVIER
'
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^g"
.Replacement.Text = "[Some remembering if needed]"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Written and tested for a 125 pages .DOC including 172 pictures (graphics and photographies).

Original : 4 825 Ko
New file : 680 Ko
Processing time : 5 sec

Hoping it could help.

Regards,

Olivier


[Edited at 2006-10-23 13:25]


Direct link Reply with quote
 

Reed James
Chile
Local time: 04:46
Member (2005)
Spanish to English
TOPIC STARTER
That one worked brilliantly! Oct 23, 2006

Olivier MANESSE wrote:

Reed D. James wrote:

Anyway, it would be nice to be able to remove all those images in one fell swoop. is it possible? Thanks in advance.



The Endre's link is a very good one indeed, thank's ! The Miri's .DOT is also very interesting.

If the purpose is just dropping the pictures out, without needing to put them back, just try this :

Sub images()
'
' images Macro
' Macro enregistrée le 23/10/2006 par OLIVIER
'
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^g"
.Replacement.Text = "[Some remembering if needed]"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Written and tested for a 125 pages .DOC including 172 pictures (graphics and photographies).

Original : 4 825 Ko
New file : 680 Ko
Processing time : 5 sec

Hoping it could help.

Regards,

Olivier


[Edited at 2006-10-23 13:25]


Olivier,

Thanks for that macro. It worked like a charm. The other macros did not work for me. I did not like the fact that they were password protected and I had no access to the script.

Reed


Direct link Reply with quote
 

Adrien Esparron
France
Local time: 10:46
Member (2007)
German to French
+ ...
Script protection Oct 23, 2006

Reed D. James wrote:

Thanks for that macro. It worked like a charm. The other macros did not work for me. I did not like the fact that they were password protected and I had no access to the script.



Hi Reed !

You are too kind and I'm very glad having helped.

As shown, this macro is free and public and not protected. So if useful, use it without moderation ...

Best,

Olivier


Direct link Reply with quote
 


To report site rules violations or get help, contact a site moderator:


You can also contact site staff by submitting a support request »

Is there a Word macro will remove all in-line images?

Advanced search






Across v6.3
Translation Toolkit and Sales Potential under One Roof

Apart from features that enable you to translate more efficiently, the new Across Translator Edition v6.3 comprises your crossMarket membership. The new online network for Across users assists you in exploring new sales potential and generating revenue.

More info »
PDF Translation - the Easy Way
TransPDF converts your PDFs to XLIFF ready for professional translation.

TransPDF converts your PDFs to XLIFF ready for professional translation. It also puts your translations back into the PDF to make new PDFs. Quicker and more accurate than hand-editing PDF. Includes free use of Infix PDF Editor with your translated PDFs.

More info »



Forums
  • All of ProZ.com
  • Term search
  • Jobs
  • Forums