[VB] Is this selection code correct?

Article View: adobe.scripting.indesign

Article #16864

Back to adobe.scripting.indesign Previous Next

#16864

From: Alex Bu
Date: Thu, 24 Jul 2003 23:18

18 lines
1351 bytes

Hi!

I'm completely new to programming and just wanted to know if this vbscript is working correctly (it seems to be). It should select all textframes which are empty.

Dim MyIndesign
Set MyIndesign = CreateObject("InDesign.Application.2.0")
SelectionCount = 0
Set MySelectionRange = MyIndesign.ActiveDocument
For Each Frame In MySelectionRange.TextFrames
    If Frame.Characters.Count = 0 Then
        myInDesign.Select Frame, True
        SelectionCount = SelectionCount + 1
    End If
Next

Any improvements or corrections are welcome. Thanks!

Alex

Technical Details

Message-ID: <1dea0f0a.-1@WebX.la2eafNXanI>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-06!sn-xit-08!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!proxad.net!news.tele.dk!news.tele.dk!small.news.tele.dk!lnewspeer01.lnd.ops.eu.uu.net!emea.uu.net!newsfeed01.sul.t-online.de!t-online.de!WebX

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f939a,8e54d420702ec636
X-Google-Attributes: gidf939a,public
X-Google-ArrivalTime: 2003-07-24 16:37:55 PST
From: "Alex Bu" <12three@gmx.de>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-06!sn-xit-08!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!proxad.net!news.tele.dk!news.tele.dk!small.news.tele.dk!lnewspeer01.lnd.ops.eu.uu.net!emea.uu.net!newsfeed01.sul.t-online.de!t-online.de!WebX
Newsgroups: adobe.scripting.indesign
Subject: [VB] Is this selection code correct?
Message-ID: <1dea0f0a.-1@WebX.la2eafNXanI>
Date: Thu, 24 Jul 2003 16:18:00 -0700
Lines: 20
MIME-Version: 1.0
Content-Type: text/plain; charset="ISO-8859-1"
Content-Transfer-Encoding: 8bit