Re: Help to convert VB Script to AppleScript

Article View: adobe.scripting.indesign

Article #19363

Back to adobe.scripting.indesign Previous Next

#19363

From: Shane Stanley
Date: Tue, 07 Jan 2003 22:54

29 lines
1705 bytes

in article 1de74010.5@WebX.la2eafNXanI, pjredman wrote:

> Many thanks for converting this script! I'll pass it on to our friends on the
> Mac forum.

Here's a version of Richard's that's probably better:

tell application "InDesign 2.0.2"
 tell document 1
  set find preferences to nothing
  set change preferences to nothing
  set myPara to paragraph styles
 end tell
 repeat with i from 2 to count of myPara
  set properties of find preferences to {applied paragraph style:item i of
myPara}
  set properties of change preferences to {applied paragraph style:item i of
myPara}
  with timeout of 200 seconds
   search selection for ""
  end timeout
 end repeat
 beep
 activate
 display dialog "Finished."
end tell

-- 
Shane Stanley,  sstanley@myriad-com.com.au

Technical Details

Message-ID: <BA41A5BA.4A01E%sstanley@myriad-com.com.au>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!38.144.126.75.MISMATCH!feed1.newsreader.com!newsreader.com!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed.online.be!newsfeed01.sul.t-online.de!t-online.de!WebX

References: <1de74010.-1@WebX.la2eafNXanI> <1de74010.5@WebX.la2eafNXanI>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f939a,5bdb0e6d7a11cf45
X-Google-Attributes: gidf939a,public
X-Google-ArrivalTime: 2003-01-07 15:10:04 PST
From: Shane Stanley <sstanley@myriad-com.com.au>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!38.144.126.75.MISMATCH!feed1.newsreader.com!newsreader.com!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed.online.be!newsfeed01.sul.t-online.de!t-online.de!WebX
Newsgroups: adobe.scripting.indesign
Subject: Re: Help to convert VB Script to AppleScript
Message-ID: <BA41A5BA.4A01E%sstanley@myriad-com.com.au>
Date: Tue, 7 Jan 2003 14:54:03 -0800
References: <1de74010.-1@WebX.la2eafNXanI> <1de74010.5@WebX.la2eafNXanI>
Lines: 33
User-Agent: Microsoft-Outlook-Express-Macintosh-Edition/5.0.6
MIME-Version: 1.0
Content-Type: text/plain; charset="ISO-8859-1"
Content-Transfer-Encoding: 8bit

Reply to Parent Message