Catia Macro

[vvk555]

Do anyone know how to create a macro to activate/deactivate a particular constraint in assembly? I tried to record the macro but it is not working.

 

[drewmumaw]

Sub CATMain()

Dim productDocument1 As ProductDocument
Set productDocument1 = CATIA.ActiveDocument

Dim product1 As Product
Set product1 = productDocument1.Product

Dim constraints1 As Constraints
Set constraints1 = product1.Connections("CATIAConstraints")

Dim constraint1 As Constraint
Set constraint1 = constraints1.Item("Offset.1")

'---activate or deactivate---
constraint1.Deactivate
'constraint1.Activate

End Sub

Drew Mumaw

http://www.textsketcher.com

http://www.drewmumaw.com