🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: adobe.scripting.indesign
Article #20535

Re: [VB] Styles & Textframe

#20535
From: Olav Kvern
Date: Wed, 10 Jul 2002 18:20
16 lines
1153 bytes
Michael-- 

Try something like this: 

Rem Given a paragraph style "myParagraphStyle" in the active document, apply the style to all text in all stories 
Dim myInDesign As InDesign.Application 
Set myInDesign = CreateObject("InDesign.Application.2.0") 
Set myDocument = myInDesign.ActiveDocument 
For myCounter = 1 to myDocument.Stories.Count 
myDocument.Stories.Item(myCounter).ParagraphStyle = myDocument.ParaStyles.Item("myParagraphStyle") 
Next 
 

Thanks, 

Ole
Technical Details
Message-ID: <ef98f7d.3@WebX.aaQKaf7vad4>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!sn-xit-08!supernews.com!newsfeed.online.be!newsfeed01.sul.t-online.de!t-online.de!WebX
References: <ef98f7d.-1@WebX.aaQKaf7vad4>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f939a,7b9db41252d8cfb9
X-Google-Attributes: gidf939a,public
X-Google-ArrivalTime: 2002-07-10 12:46:33 PST
From: "Olav Kvern" <okvern@adobe.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!sn-xit-08!supernews.com!newsfeed.online.be!newsfeed01.sul.t-online.de!t-online.de!WebX
Newsgroups: adobe.scripting.indesign
Subject: Re: [VB] Styles & Textframe
Message-ID: <ef98f7d.3@WebX.aaQKaf7vad4>
Date: Wed, 10 Jul 2002 11:20:52 -0700
References: <ef98f7d.-1@WebX.aaQKaf7vad4>
Lines: 18
MIME-Version: 1.0
Content-Type: text/plain; charset="ISO-8859-1"
Content-Transfer-Encoding: 8bit