CAD Forum - tips, tricks, discussion and utilities for AutoCAD, Inventor, Revit and other Autodesk products []
CZ | EN | DE
Login or
  Visitors: 4815

CAD tip CAD tip # 12815:

Question CAD 
 %  platform  category 
Q - question

How to fill iProperties into Inventor files from Excel?

A - answer How to bulk import iProperties, e.g. Checked by, Date checked, Design state, etc. to a whole list of drawings or Inventor model files?

You can mass-set iProperties using a simple VBA macro running in Excel. You will need the list of file names and the requested iProperty values prepared in a preset Excel table.

Run the following macro from the VBA environment in Excel. Start by adding a reference to the "Inventor Object Library" in the VBA module (see Tools > References), to be able to use the object Inventor.ApprenticeServer for writing data into iProperties in the individual Inventor files.

An example of a XLS table contents:

VBA macro code to handle the import:

Sub WriteData()
    Dim appServer As Inventor.ApprenticeServerComponent
    Set appServer = New ApprenticeServerComponent
    Dim oSheet As Worksheet
    Set oSheet = ThisWorkbook.ActiveSheet
    For i = 2 To 3 ' data in rows 2 and 3 - DO NOT FORGET TO UPDATE!
        Dim file As String
        Dim checkedBy As String
        Dim checkedDate As Date
        file = oSheet.Range("A" & i).Value ' columns A+B+C
        checkedBy = oSheet.Range("B" & i).Value
        checkedDate = oSheet.Range("C" & i).Value
        Dim invDoc As Inventor.ApprenticeServerDocument
        Set invDoc = appServer.Open(file)
        invDoc.PropertySets("{32853F0F-3444-11D1-9E93-0060B03C1CA6}")("Checked By").Value = checkedBy
        invDoc.PropertySets("{32853F0F-3444-11D1-9E93-0060B03C1CA6}")("Date Checked").Value = checkedDate
End Sub

An archive with sample .IPT files and a XLS table containing the VBA macro: (by M.Navara @CADstudio)

100% *  CAD 
8.12.2020    20304×  
Prices - CAD eShop:
applies to: Inventor ·

See also:
Tip 13884:How to send e-mails with an iLogic macro?
Tip 13211:Automatic numbering/renaming of multi-volume bodies in a part.
Tip 13197:How to transfer a model or sketch parameter to iProperties?
Tip 12451:How to fill a material or appearance name into part's iProperties?
Tip 9952:iLogic rule - check whether iProperties are overridden.

Back   All CAD Tips

Have we helped you? If you want to support the CAD Forum web service, consider buying one of our CAD applications, or our custom software development offerings, or donating via PayPal (see above). You may also add a link to your web - like this "fan" link: CAD Forum - tips, utilities, blocks for Autodesk products
CAD:    OS:    Categ: 
Text:  FAQ glossary   

Publish interactive 3D PDF models from AutoCAD, Inventor or Revit with Share3D More info

Please use these tips at your own risk.
Arkance Systems is not responsible for possible problems that may occur as a result of using any of these tips.