Vous permet d'inséré des Ifeature automatiquement

Vous n'avez qu'à changer le chemin du ifeature.(en rouge)
si vous avez plus qu'un ifeature vous pouvez changé le nom de la macro; Le nom suivis du mot SUB est éditable.

Sub StartiFeaturePlacement()

ThisApplication.CommandManager.PostPrivateEvent kFileNameEvent, "C:\CHEMIN DU IFEATURE"

Dim odef As ControlDefinition
Set odef=ThisApplication.CommandManager.ControlDefinitions("PartiFeatureInsertCmd")

odef.Execute

End Sub



Fonctionne bien sous Inventor 2009