I-Assembly/I-Part member Access

[Anonymous]

Hi,

I have I-Part/I-Assembly with many Factory Members. I can open the Factory Member Part/Assembly Files by browsing to their location.

But this is a cumbersome task to search for a particular member when they are a lot of them with similar part numbers.

Is there as way to open Factory Member File (Instead of the Master file which generates those members) from the User Assembly (Assembly which uses the I-Part/I-Assembly).

Thanks and Regards,

Jiten

[Anonymous]

Hi,

I have I-Part/I-Assembly with many Factory Members. I can open the Factory Member Part/Assembly Files by browsing to their location.

But this is a cumbersome task to search for a particular member when they are a lot of them with similar part numbers.

Is there as way to open Factory Member File (Instead of the Master file which generates those members) from the User Assembly (Assembly which uses the I-Part/I-Assembly).

Thanks and Regards,

Jiten

[Mark.Lancaster]

Jitenkumar

If you open a member from an assembly you get the iPart or iAssembly factory.   If you want the given member then you have to manually open it by navigating to the actual member.    It is set up that way because the factory is always the controlling file.

[Mark.Lancaster]

Jitenkumar

If you open a member from an assembly you get the iPart or iAssembly factory.   If you want the given member then you have to manually open it by navigating to the actual member.    It is set up that way because the factory is always the controlling file.

[Anonymous]

Thank You Mark.

It would have been good to have that option though.

if anyone has an API for this purpose, Please post it here.

Regards,

JIten

[Anonymous]

Thank You Mark.

It would have been good to have that option though.

if anyone has an API for this purpose, Please post it here.

Regards,

JIten

[Anonymous · Accepted solution]

Ok Did a little Internet search/Learning. Here it is.

Sub openselected()
  Dim oDoc As Document
  Dim obj As Object
  Set obj = ThisApplication.ActiveDocument.SelectSet.Item(1)
  If (TypeOf obj Is ComponentOccurrence) Then
     Dim occ As ComponentOccurrence
     Set occ = obj
       End If
    Set oDoc = ThisApplication.Documents.Open(occ.Definition.Document.Fullfilename, True)
    oDoc.Activate
End Sub

[Anonymous · Accepted solution]

Ok Did a little Internet search/Learning. Here it is.

Sub openselected()
  Dim oDoc As Document
  Dim obj As Object
  Set obj = ThisApplication.ActiveDocument.SelectSet.Item(1)
  If (TypeOf obj Is ComponentOccurrence) Then
     Dim occ As ComponentOccurrence
     Set occ = obj
       End If
    Set oDoc = ThisApplication.Documents.Open(occ.Definition.Document.Fullfilename, True)
    oDoc.Activate
End Sub