🚀 go-pugleaf

Hi Vladimir (Privet)

Try to use the Collection object, after you can change the position.

Private Sub Command2_Click()

'******************************************
'Reconoce los objetos por el Label asignado
'******************************************
Set myInDesign = CreateObject("InDesign.Application.2.0")
Set myDocument = myInDesign.Documents.Add
Set myPage = myDocument.Pages.Item(1)
Set myTextFrame = myPage.TextFrames.Add
myTextFrame.GeometricBounds = Array("3p", "3p", "13p", "18p")
myTextFrame.TextContents = "Hello"
myTextFrame.Label = "Text1"
Set myTextFrame = myPage.TextFrames.Add
myTextFrame.GeometricBounds = Array("21p", "23p", "33p", "38p")
myTextFrame.TextContents = "Hola"
myTextFrame.Label = "Text2"
Set mySelection = myInDesign.Selection
mySelection = myInDesign.Select(myPage.TextFrames.Item("Text1"))

End Sub

Roberto