Article View: adobe.scripting.indesign
Article #17680Re: Simple Find
From: Jon Swenson Tellekson
Date: Thu, 22 May 2003 17:27
Date: Thu, 22 May 2003 17:27
7 lines
1036 bytes
1036 bytes
Dim myInCopy As InCopy.Application
Dim myDocument As InCopy.Document
Set myInCopy = CreateObject("InCopy.Application.2.0")
Set myDocument = myInCopy.ActiveDocument
<<TextToFind comes via user dialog here>>
Set theResult = myDocument.Search(TextToFind,False,False)
myDocument.Select theResult.Item(1)
Technical Details
Message-ID:
<1de93436.3@WebX.la2eafNXanI>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!sn-xit-01!sn-xit-08!supernews.com!news.tele.dk!news.tele.dk!small.news.tele.dk!eusc.inter.net!newsfeed01.sul.t-online.de!t-online.de!WebXReferences:
<1de93436.-1@WebX.la2eafNXanI>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: f939a,ef7d1fccab21e5ed X-Google-Attributes: gidf939a,public X-Google-ArrivalTime: 2003-05-22 10:38:39 PST From: "Jon Swenson Tellekson" <jont@freedomofspeech.com> Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!sn-xit-01!sn-xit-08!supernews.com!news.tele.dk!news.tele.dk!small.news.tele.dk!eusc.inter.net!newsfeed01.sul.t-online.de!t-online.de!WebX Newsgroups: adobe.scripting.indesign Subject: Re: Simple Find Message-ID: <1de93436.3@WebX.la2eafNXanI> Date: Thu, 22 May 2003 10:27:38 -0700 References: <1de93436.-1@WebX.la2eafNXanI> Lines: 7 MIME-Version: 1.0 Content-Type: text/plain; charset="ISO-8859-1" Content-Transfer-Encoding: 8bit