🚀 go-pugleaf

Hi Dave,

Thank you for the reference. I am trying to work with this code.

In my example above, would theObj be:

t.Item(i)

I translated the javascript to vb and that doesn't seem to be working.

When I pass it t.item(i) I get an error:

"Object doesn't support this property or method".

I must be passing the function the wrong object.

Function findPage(theObj)

If (theObj.hasOwnProperty("baseline")) Then
    theObj = theObj.ParentTextFrames(0)
End If

While theObj <> Null And theObj <> Page
    Set t = theObj.constructor
    Select Case t
        Case Null
        Case Character: theObj = theObj.ParentTextFrames(0)
        Case Cell: theObj = theObj.InsertionPoints(0).ParentTextFrames(0)
        Case Application
    End Select

findPage = theObj.Parent
Wend

End Function

Any ideas?

thanks,
Ric