Kennt jemand eine Möglichkeit, alle Objekte auf einer Seite zu markieren und gruppieren? Also im Prinzip CTRL+A und gruppieren...

Meine Ahnung sagt mir, das geht über eine Schleife, allerdings hab ich noch keine für InDesign programmiert und Objekte selektiert. Hat jemand eine Idee oder gibt es irgendwo ein Beispiel?

Gruß,
CL

Als AppleScript z.B. so:

tell application "InDesign CS"
tell active spread of layout window 1
set myObjects to (all page items)
if (count of myObjects) > 1 then
set myGroup to make group with properties {group items:myObjects}
else
display dialog "Mehr Futter!"
end if
end tell
end tell

Das Script gruppiert einzelne Objekte auf einer Doppelseite ("spread"). Um die Objekte einer Einzelseite zu gruppieren ersetze "spread" durch "page".

Eine Fehlerroutine sollte noch prüfen, ob die Seitenbjekte (oder einzelne davon) bereits gruppiert sind.

Grüßle
Martin

Na denn versuche ich mir das mal in VB Script zu übersetzen...

>Eine Fehlerroutine sollte noch prüfen, ob die Seitenbjekte (oder
>einzelne davon) bereits gruppiert sind.
Dürfen die vorher nicht gruppiert sein? Man kann doch Gruppen verschachteln, oder nicht?

Sorry, hab das VB im Titel erst jetzt recht zur Kenntnis genommen.

Vielleicht arbeitest Du in Deinem nächsten Leben an einem MAC. ;-)

Grüßle
Martin

> Dürfen die vorher nicht gruppiert sein?
Nein

> Man kann doch Gruppen verschachteln, oder nicht?
Ja

Wenn Du das von Hand machst, dann wählst Du eine Gruppe und ein oder mehrere Einzelobjekte aus, um eine verschachtelte Gruppe zu erzeugen.

Für das Script sind aber die Objekte einer Gruppe immer noch Elemente der "all page items". Und die sind schon gruppiert.
Du müßtest die Gruppe als ein Objekt packen und dazu alle ungruppierten Objekte. Das könntest Du dann im Script verschachteln.
(Glaube ich wenigstens.)

Grüßle
Martin

Hi CL,

schau mal hier: [url]http://www.adobeforums.com/cgi-bin/webx?13@@.3bb98042/0[/url]

Dein Thema mit einer VB-Antwort.

Ach so, jetzt habe ich verstanden!
In Deinem früheren Leben warst Du Steven J.

Grüßle
Martin

>Ach so, jetzt habe ich verstanden! In Deinem früheren Leben warst Du Steven J.

;-) mehr oder weniger, das ist nen Account vom Firmenkollegen...

Verschachteltes Gruppieren funktioniert mit "page items" statt "all page items":

tell application "InDesign CS"
tell active spread of layout window 1
set myObjects to (page items)
if (count of myObjects) > 1 then
set myGroup to make group with properties {group items:myObjects}
else
display dialog "Mehr Futter!"
end if
end tell
end tell


Grüßle
Martin

So, ein Array bauche ich in der Tat nicht. Collection funktioniert in VBScript scheinbar eh nicht (nur VB).

Somit habe ich folgende Zeilen in VBScript, um alle Objekte einer Seite zu gruppieren:

Set myInDesign = CreateObject("InDesign.Application.CS")
Set myDocument = myInDesign.Documents.Item(1)
Set myPageItems = myDocument.AllPageItems
Set myGroup = myDocument.Pages.Item(1).Groups.Add(myPageItems)

Ich hab da gleich mal eine Anschlußfrage, wie löse ich eine Gruppierung wieder auf ;-)?

Set myGroup = myDocument.Pages.Item(1).Groups.Add(Array(Obj1, Obj2, Obj3))

Das Groups.Add hab ich irgendwie auch nicht im ScriptingGuide gefunden oder bin ich blind? Gibts auch Groups.Sub?

Vielleicht gibts ja auch ein Groups.all ungroup?