Article View: adobe.scripting.indesign
Article #18239Re: ASSOCIATE A FONT TO A PARAGRAPH STYLE
From: pjredman
Date: Thu, 10 Apr 2003 13:18
Date: Thu, 10 Apr 2003 13:18
13 lines
1076 bytes
1076 bytes
Try something like this:
Private Sub Command1_Click()
Dim myInDesign As InDesign.Application
Set myInDesign = CreateObject("InDesign.Application.2.0")
Set myDocument = myInDesign.Documents.Add
Set myStyle = myDocument.ParaStyles.Add
Set myStyle.AppliedFont = myInDesign.Fonts.Item("Courier New")
End Sub
Phil Redman
Technical Details
Message-ID:
<1de8ade3.0@WebX.la2eafNXanI>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-01!sn-xit-09!supernews.com!newsfeed.gamma.ru!Gamma.RU!lnewspeer00.lnd.ops.eu.uu.net!emea.uu.net!newsfeed01.sul.t-online.de!t-online.de!WebXReferences:
<1de8ade3.-1@WebX.la2eafNXanI>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: f939a,edcee16e09538fd2 X-Google-Attributes: gidf939a,public X-Google-ArrivalTime: 2003-04-10 06:39:09 PST From: pjredman <pjredman@usgs.gov> Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-01!sn-xit-09!supernews.com!newsfeed.gamma.ru!Gamma.RU!lnewspeer00.lnd.ops.eu.uu.net!emea.uu.net!newsfeed01.sul.t-online.de!t-online.de!WebX Newsgroups: adobe.scripting.indesign Subject: Re: ASSOCIATE A FONT TO A PARAGRAPH STYLE Message-ID: <1de8ade3.0@WebX.la2eafNXanI> Date: Thu, 10 Apr 2003 06:18:10 -0700 References: <1de8ade3.-1@WebX.la2eafNXanI> Lines: 13 MIME-Version: 1.0 Content-Type: text/plain; charset="ISO-8859-1" Content-Transfer-Encoding: 8bit