🚀 go-pugleaf

What I want to do is have the script place a text frame and an image on the page and then group them together.

I can't see to get this to work though, here is my code:

------------------------------
Form1.MousePointer = vbHourglass

Dim myInDesign As InDesign.Application
Dim myGroup As InDesign.Group
Dim myLayerData As InDesign.Layer

Set myInDesign = CreateObject("InDesign.Application.2.0")

Set myDocument = myInDesign.Documents.Add
Set myPage = myDocument.Pages.Item(1)

Set myLayers = myDocument.Layers
Set myLayerData = myLayers.Add
myLayerData.Name = "Data"

Set myFont = myInDesign.Fonts.Item("Arial")

Set myTextFrame = myDocument.Pages.Item(1).TextFrames.Add

myTextFrame.GeometricBounds = Array(10, 10, 50, 50)
myTextFrame.TextContents = "TEXT HERE"

Set myParagraph = myTextFrame.Paragraphs.Item(1)

myParagraph.AppliedFont = myFont
myParagraph.PointSize = 14
myParagraph.Justification = idLeft

Set myWindow = myInDesign.ActiveWindow
Set mySpread = myWindow.ActiveSpread
Set myImage = mySpread.Place("IMAGE ADDRESS")

Set myGroup = myPage.Groups.Add(myLayerData, Array(myTextFrame, myImage))

Form1.MousePointer = vbDefault

------------------------------

Any help would be appriciated, thanks!