在 Catia 中使用 VBA 进行选择和更改以及属性

Using VBA in Catia for selection and changing and attribute

我试图仅在 Catia 中更改活动选择的属性。我希望采用此代码并对其进行概括,这样它就不会针对 1 个特定项目,而是会在我选择的任何项目上激活宏。

Sub CATMain()

    Dim documents1 As Documents
    Set documents1 = CATIA.Documents

    Dim partDocument1 As PartDocument
    Set partDocument1 = documents1.Item("Test 1.CATPart")

    Dim product1 As product
    Set product1 = partDocument1.GetItem("Test 1")

    product1.Revision = "test"

    product1.Definition = "yo"

End Sub

谢谢你的帮助。

回答了我自己的问题...

Sub CATMain()

    Dim objSel As Selection
    Set objSel = CATIA.ActiveDocument.Selection

    objSel.Item(1).Value.ATTRIBUTE = "hi"

End Sub

这会更改所选项目的所需属性。