---

Guten Morgen,

wir haben Ende letzten Jahres von Inventor 11 auf Inventor 2014 gewechselt. Jetzt habe ich ein Problem mit dem Zuweisen von Materialien.
Früher ging:

Code:

---

    Dim oDoc As PartDocument
    Set oDoc = ThisApplication.ActiveDocument
   
    Dim oMat As Material
    Set oMat = oDoc.Materials.Item("Materialname")
   
    oDoc.ComponentDefinition.material = oMat

---

Das scheint jetzt nicht mehr zu funktionieren. In der Programmierhilfe fand ich direkt jetzt nichts. Wie hat sich das denn jetzt mit den Bibliotheken alles geändert (Assets, MaterialAssets, etc.) bzw. wie hat sich die Zuweisung geändert?

Gruß
Andreas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Andreas,

da hat sich eigentlich nicht viel verändert:

Versuch mal das Auslesen des Materials mit

Code:

---

Sub Material()
  Dim oDoc As PartDocument
  Set oDoc = ThisApplication.ActiveDocument
  Dim Material As String
  Material = oDoc.PropertySets("{32853F0F-3444-11D1-9E93-0060B03C1CA6}").Item("Material").Value 'iProps in Projekt
  MsgBox "Material: " & Material
End Sub

---

Schreiben geht dann natürlich genau so.

------------------
Gruß Roland

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Roland,

Danke für die Antwort. Hat funktioniert.

Gruß
Andreas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP