Could anyone help me with this. I found a macro which can edit the drawings iproperties, so I'm guessing it'd only be a matter of pointing the macro at the part instead of the drawing. Thanks
Function Fill_In_Checked_By(ByVal name, ByVal dt) As Boolean ' Get the active document. Dim invDoc As Document Set invDoc = ThisApplication.ActiveDocument ' Get the part number property. Dim invPartNumberProperty As property Set invPartNumberProperty = invDoc.PropertySets.Item("Design Tracking Properties").Item("Checked By") invPartNumberProperty.Value = name Set invPartNumberProperty = invDoc.PropertySets.Item("Design Tracking Properties").Item("Date Checked") invPartNumberProperty.Value = dt invDoc.Update End Function
Access a broad range of knowledge to help get the most out of your products and services.