Word Applescript Help - Seems Simple, but can't figure it out!

Scripting Forums AppleScript | Mac OS X
#1

Hey guys,

I am new to AS. So bare with me, please.

I have a bunch of word docs that has texts of paragraphs in them, however the text in the each of these documents do not all flow to the end of the page (from left to right). For instance here is a example of what I am talking about:

The above is supposed to be a paragraph. What I want my applescript to do is automatically format the above paragraph to look like:

I basically want to be able to automatically wrap the text to the set margins of the doc. In order to do this manually, I just have to go to the end of the line and back space, but this takes a lot of time to do. That’s why I want an applescript to do it for me.

I hope this makes sense.

Any advice?

Thanks guys.

Phil

Model: Macbook Pro
Browser: Safari 536.26.17
Operating System: Mac OS X (10.8)

#2

Hi there,

Just a quick thought, and you may have already tried it, have you tried doing a Find/Replace for a ‘Special Character’? Under that option you can search for a ‘Paragraph Mark’, does that not do it?

Regards,

Nick

#3

Select your text and try:

tell application "Microsoft Word"
	set findRange to find object of selection
	tell findRange
		execute find find text "^p" replace with " " replace replace all with find format
	end tell
end tell
#4

adayzdone,

That works good, however how do I code it to select all text and do that? You have it set where I have to already have it selected.

Thanks.

Phil

#5

Hey TekNik,

Yes, I was trying to use Automator actions to do that. However I would rather not, because there are so much to Find and Replace in the text (that I didn’t even get into) like maybe 15 of them, that I would rather have this part run on applescript.

Thanks.

Phil