Crop every image in Microsoft Word Doc

Scripting Forums AppleScript | Mac OS X
#1

hi

I am trying to crop all the images in a MS Word doc.

I have written this but it is not working so far.


tell application "Microsoft Word"
   set myPics to inline pictures of active document
   repeat with pic from myPics
       set crop bottom of picture format of pic to 18
   end repeat
   close document 1 saving yes
end tell

I get an error stating
“An end of line can’t go after this identifier” for the line

repeat with pic from myPics

But I do not understand what this error means. if anyone can help explain the error and correct this code that would be great. It’s for MS Word 2011.

Thanks

#2

Hi there,

try this:


tell application "Microsoft Word"

	set myPics to inline pictures of active document
	
	repeat with pic in myPics
		set crop bottom of picture format of pic to 100
	end repeat
	
	close document 1 saving yes
	
end tell

Changed from to in here: repeat with pic from myPics

#3

Thanks that works. I forgot to mention that I am using this through Automator and I had also made the mistake of not passing the arguments through Automator as well. I want it to crop every image in every Word Doc in a folder.

Here is the final working code.


on run {input, parameters}
	repeat with aFile in input
		tell application "Microsoft Word"
			try
				open aFile
				set myPics to inline pictures of active document
				repeat with pic in myPics
					set crop bottom of picture format of pic to 500
				end repeat
				close document 1 saving yes
			on error
				try
					close document 1 saving no
				end try
			end try
		end tell
	end repeat
	return input
end run
#4

Hhhhmmm? :confused:

I’ve just tried my script above, having placed some more images on the page, and it still works?
I’m running the script straight from Script Debugger. I’ve also tried it in AS Editor and it worked ok.

Wonder if it’s something to do with you using Automator?

#5

Yes

Thanks for your help, I had just realised that and so amended my above post, to hopefully avoid you having to re-look at it.

It was an automator issue, you were correct.

Thanks again

#6

Glad to learn it’s sorted. :slight_smile: