Find object's id - Indesign CS4/VBscript 1

[dv1]

IndesignCS4-VBscript

I need to find the ID of a selected item, but I don't know what I'm doing. This is what I have so far(but it doesn't work):


Function main()
Set myInDesign = CreateObject("InDesign.Application.CS4")
myInDesign.Activate
If myInDesign.Documents.Count <> 0 Then
If myInDesign.Selection.Count <> 0 Then
Set ObjID = InDesign.Selection.Pageitems.ID
MsgBox (ObjID & "Test")

Else
MsgBox ("Please select an object and try again.")
End If
Else
MsgBox ("Please open a document, select an object, and try again.")
End If
End function

 

[vuanhquan]

The below script may help you:

Set myInDesign = CreateObject("InDesign.Application")
Set mySelection = myInDesign.Selection
msgbox(myselection.item(1).id)

 

[dv1]

That worked perfect, Thanks.