🚀 go-pugleaf

Perhaps This catalog example <http://www.siliconpublishing.com/Indesign/CatalogExample.htm> will help you.

In that example, I set the paragraph and character style of the insertion point before writing the text:
Set oDescText = oPage.TextFrames.Add
oDescText.GeometricBounds = Array(dY1, dX1, dY2, dX2)
oDescText.TextFramePreferences.InsetSpacing = Array(2, 2, 0, 2)
Set oPoints = oDescText.ParentStory.InsertionPoints
 ' Product code
    Set oPoint = oPoints.Item(oPoints.Count)
    oPoint.ParagraphStyle = oDocument.ParaStyles.Item("Body Text")
    oPoint.CharacterStyle = oDocument.CharStyles.Item("Bold")
    oPoint.TextContents = "Product Code: " & vbTab
    Set oPoint = oPoints.Item(oPoints.Count)
    oPoint.CharacterStyle = oDocument.CharStyles.Item("Plain")
    sBuf = rs.Fields("ProductCode")
    oPoint.TextContents = sBuf & vbLf
...

HTH,

Max