🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: adobe.scripting.indesign
Article #18239

Re: ASSOCIATE A FONT TO A PARAGRAPH STYLE

#18239
From: pjredman
Date: Thu, 10 Apr 2003 13:18
13 lines
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!WebX
References: <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