🚀 go-pugleaf

Everyone,

Thank you for your help! I've finally gotten it working!

Here's a VBScript to place multiple images into a preset template:

Dim InD
Set InD = CreateObject("InDesign.Application.2.0")

If InD.Documents.Count <> 0 Then

Set InDWindow = InD.ActiveWindow
Set InDSpread = InDWindow.ActiveSpread
Set InDDocument = InD.ActiveDocument
Set InDPage = InDDocument.Pages.Item(1)

'	This declares the image name format
ImgName = "img.tif"
ImgNumber = 1

'	This line declares the frame label format
LabelName = "img"
LabelNumber = 1

'	This line creates the variable for how many images to place,
'	and also how many times to loop the placement.
InDHowMany = InputBox("How many images do you want placed into the composite?", "Composite Image Count", "2")

'	This begins the looping placement script
For InDPlaceCount = 1 to InDHowMany

'	Call names in the FOR statement
InDFrameName = LabelName & LabelNumber
InDImageName = ImgNumber & ImgName

Set InDRec = InDDocument.Rectangles.Item(InDFrameName)

'	Place Image Statement
Set InDPlaced = InDRec.Place("Q:\PROJECTS\script test\" & InDImageName)
InDRec.Fit(idCenterContent)
InDRec.Fit(idProportionally)

'	This should cause the label and image numbers to progress
ImgNumber = ImgNumber + 1
LabelNumber = LabelNumber + 1
Next

'	End of Script
Else
     MsgBox "Please open a document and try again."
End If