Frederik Vollbrecht hat mir einen iLogic-Regel geschickt, die von einem Inventormodell eine Worddokument mit einigen iProperties und einem Vorschaubild erstellt. So sieht die Regel aus:
'set the folder name from the template report
folder ="C:\"
'Create the Word Application Object
wordApp = Interaction.CreateObject("Word.Application")
'Add the template document to the Word Session
wordDoc = wordApp.Documents.Add (folder & "ilogic_report_template.docx", Visible:=False)
'Write to the Bookmarks in the template
wordDoc.Bookmarks("FNAME").Range.Text = ThisDoc.FileName(False) 'without extension
wordDoc.Bookmarks("PNUM").Range.Text = iProperties.Value("Project", "Part Number")
wordDoc.Bookmarks("DES").Range.Text = iProperties.Value("Summary", "Author")
wordDoc.Bookmarks("RNUM").Range.Text = iProperties.Value("Project", "Revision Number")
'save iso view to jpg
imagedoc = ThisDoc.PathAndFileName(False) & ".jpg"
oCamera = InventorVb.Application.ActiveView.Camera 'current iso view
oCamera.fit
oCamera.apply
InventorVb.Application.ActiveView.SaveAsBitmap(imagedoc,1200,800 )
'Insert an image at the end of the document
wordDoc.Bookmarks.Item("\endofdoc").Range.InlineShapes.AddPicture(imagedoc)
'Save the Word file with a new name and close the document
wordDoc.SaveAs (ThisDoc.PathAndFileName(False) & ".docx")
wordDoc.Close()
wordDoc=Nothing
'Quit Word session
wordApp.Application.Quit()
wordApp=Nothing
Was anpasst werden muss, ist der Pfad zu der Reportvorlage in der zweiten Zeile folder ="C:\". Liegt die Vorlage ilogic_report_template.docx also im Verzeichnis c:\vorlagen muss der Eintrag folder ="C:\vorlagen\" lauten.
Der Report wird das Verzeichnis gespeichert, in dem die Inventordatei liegt.
Und so sieht der Report dann aus:
Hier könnt ihr die iLogicx-Regel und die Berichtsvorlage herunterladen.
Danke Frederik für diesen Tipp!
Das 
