Open parts from assembly having only specific user parameter and change the parameter values and save then close

[pranaykapse1]

I want to open parts or component occurrences in a separate window from the assembly having only a specific user parameter (let's say "Pipe_Standatd") and change the parameter values("Pipe_Standatd=ASME") and save it then close that part.

please help me with the logic code.

[bradeneuropeArthur]

Do you have some more details?

Maybe some screenshots about what you mean?

[A.Acheson]

You should be able to do this without opening the part. The part is all ready open in the context of the assembly. 

  'Get the active assembly.
    Dim AsmDoc As AssemblyDocument = ThisDoc.Document

    'Get the assembly component definition.
    Dim AsmDef As AssemblyComponentDefinition = AsmDoc.ComponentDefinition

    'Get all of the leaf occurrences of the assembly.
    Dim LeafOccs As ComponentOccurrencesEnumerator = AsmDef.Occurrences.AllLeafOccurrences

    'Iterate through the occurrences and print the name.
    For Each Occ As ComponentOccurrence In LeafOccs
		Dim occDef As PartComponentDefinition = Occ.Definition
		Dim OccDoc As PartDocument = occDef.Document
		
		If  OccDoc.IsModifiable Then
			Logger.Info(Occ.Name)
			occDef.Parameters.Item("Pipe_Standard").Value = "ASME"
		End If
    Next

[pranaykapse1]

Some of the external rules are not running without opening in a separate window.
is it possible to change the user parameter values using the VBA editor?

[pranaykapse1]

I want to change the same user parameter value(say "Pipe_Standatd= ASME") to a lot of parts from the same assembly.
It is perfectly working by using the below logic rule.

Dim oAsmDoc As AssemblyDocument = ThisDoc.Document
For Each oOcc As ComponentOccurrence In oAsmDoc.ComponentDefinition.Occurrences
Try
Parameter(oOcc.Name, "Pipe_Standatd") =ASME
Catch
'null
End Try
Next

But some of the parts are dependent on external rules so they do not work properly without opening in a separate window.
So I need some logic rule to change user parameter( "Pipe_Standatd") value to ASME .
Process should be :
-> open the parts having "Pipe_Standatd" in separate window.
-> then do change the value of user paramer to "ASME".
-> save the file.
-> close.
Is it possible using VBA editor ?

[A.Acheson]

In your initial post you mention ilogic and external rules. Why would you want to use VBA?

Can you please post the whole workflow including what the rules will be doing. The process is not clear. 

With document found from occurrence you can open the occuurence in its own document.

From API help under documents

Dim ActiveDoc As Document = ThisApplication.Documents.Open( FullDocumentName As String, [OpenVisible] As Boolean ) As Document

'DO SOMETHING WITH DOCUMENT