Zu langer Dateiname eines i-Parts:

Da in einem Standard-i-Part alle Parameter im Dateinamen auftauchen ist dieses oft der Grund, dass die Fehlermeldung "Dateiname zu lang" erscheint. Um dieses zu verhindern sollte in der Variantentabelle unter sonstiges eine Spalte "Dateinname" angelegt werden und dort der für die entspr. Variante zu verwendende Dateiname eingetragen werden.

VBA-Macro für Massenangabe:

Mit der Visual Basic for Applications (VBA) Subroutine wird die Masse (kg) des Parts bestimmt und in den iProperties unter dem Folder 'Benutzerdefiniert' abgelegt. Rechts der Programmcode:

' Masse eines Parts bestimmen und in iProperties eintragen
' by KB Gathmann, 02.07.2007
Sub Mass_Props()
   ' Set a reference to the part document.
   ' This assumes a part document is active.
   Dim oPartDoc As PartDocument
   Set oPartDoc = ThisApplication.ActiveDocument

   ' Set a reference to the mass properties object.
   Dim oMassProps As MassProperties
   Set oMassProps = oPartDoc.ComponentDefinition.MassProperties

   ' Set the accuracy to medium.
   oMassProps.Accuracy = k_Medium

   ' Set own Property
   Dim oPropSet As PropertySet
   Set oPropSet = oPartDoc.PropertySets.Item("{D5CDD505-2E9C-101B-9397-08002B2CF9AE}")

   On Error Resume Next
   ' Try to obtain the PropertySet to see if it already exists
   Set oPropSet = oPropSet.Item("Masse")

   ' If PropertySet does not exist then add the new PropertySet
   If Err Then
   ' Add the new PropertySet
   Set oPropSet = oPropsets.Add("Masse")
   ' Adding the new Property to the new PropertySet
   Call oPropSet.Add("A Value", "Masse", 2)
   End If

   ' Set Mass-Value to own Property Masse
   Dim oProp As Property
   Set oProp = oPropSet.Item("Masse")
   oProp.Value = Round(oMassProps.Mass, 3) & " kg"
End Sub

Im Part unter Extras/Macro den VisualBasicEditor starten, von Devault.ivb das Formular selektieren und den oben kopierten Code einfügen oder das File iprop_mass.bas importieren. Mit dem Klicken auf den Speicher-Button wird das VBA-Macro in Default.ivb gespeichert und ist für alle weitere Konstruktionen verfügbar. Wird nun im Modelbaum des Teils Platte.ipt selektiert und mit rechter Mousetaste iProperties ausgewählt, so wird unter Benutzerdefiniert die Masse des Parts angezeigt.

Wird von dem Part eine Zeichnung erstellt, so kann in die Zchg. durch das Erstellen einer Textnotiz der Massewert eingetragen werden.

Bei weiteren Fragen oder Anregungen bitte unter Menü/Kontakt eine E-Mail an mein Büro senden.