Hallo Georg,
eine Darstellungsbibliothek kannst du so hinzufügen:
Code:
Dim oDesignProjectManager As DesignProjectManager = InventorApplication.DesignProjectManager
oDesignProjectManager.ActiveDesignProject.AppearanceLibraries.Add("C:\Bibliothek\Test.adsklib")
Der Pfad muss natürlich angepasst werden und "InventorApplication" muss natürlich irgendwo zugewiesen sein, damit du Inventor ansprechen kannst. Sowie du es innerhalb VBA mit "ThisApplication" tust.
Wenn du die Standard-AddIn Vorlage nutzt ist dies aber der Fall.
------------------
Mit Besten Grüßen
Ruzy5624
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP