Die Inventor FAQ wird unterstützt von:

Inventor FAQ Logo

28.11.2013

iLogic Regel die einen Report zu einem Inventordokument erstellt

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.

image

Und so sieht der Report dann aus:

image

Hier könnt ihr die iLogicx-Regel und die Berichtsvorlage herunterladen.

Danke Frederik für diesen Tipp!

1 Kommentar:

  1. Immer gerne, freut mich wenn ich helfen konnte.
    Bei Fragen könnt ihr mich gerne bei Facebook anschreiben:

    https://www.facebook.com/f.vollbrecht

    AntwortenLöschen

War der Beitrag hilfreich oder hast du eine Ergänzung dazu?
Ist noch eine Frage offen?
Ich freue mich auf deine Rückmeldung!

Related Posts Plugin for WordPress, Blogger...
Inventor FAQ Newsletter. Emailadresse: