🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: adobe.scripting.indesign
Article #16426

Re: [VB] Ittarate over pageitems won't work

#16426
From: Iolaire McFadden
Date: Fri, 12 Sep 2003 12:42
20 lines
1359 bytes
Also I just found this code sample but I do not have time to test it, it looks as if it was working:

Sub testing()
Set myInDesign = CreateObject("InDesign.Application.2.0")
Set myDocument = myInDesign.ActiveDocument
Set myholdingart = myDocument.PageItems.Item("text_frame_to_find")

Set my_page_items = myDocument.AllPageItems
count_page_items = my_page_items.Count

For loop_name = 1 To count_page_items
loop_item_name = my_page_items.Item(loop_name).Label
If loop_item_name = "text_frame_to_find" Then
Set my_object = my_page_items.Item(loop_name)
' do something
Else
End If
Next
End Sub
iolaire
Technical Details
Message-ID: <2ccd6887.3@webx.la2eafNXanI>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!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
References: <2ccd6887.-1@webx.la2eafNXanI>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f939a,434b6b988840c727
X-Google-Attributes: gidf939a,public
X-Google-ArrivalTime: 2003-09-12 06:08:02 PST
From: "Iolaire McFadden" <imcfadden@costar.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!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: [VB] Ittarate over pageitems won't work
Message-ID: <2ccd6887.3@webx.la2eafNXanI>
Date: Fri, 12 Sep 2003 05:42:03 -0700
References: <2ccd6887.-1@webx.la2eafNXanI>
Lines: 21
MIME-Version: 1.0
Content-Type: text/plain; charset="ISO-8859-1"
Content-Transfer-Encoding: 8bit