Использование VBA в Catia для выбора, изменения и атрибута - PullRequest
0 голосов
/ 16 апреля 2020

Я пытаюсь изменить атрибуты в Catia только при активном выборе. Я собираюсь взять этот код и обобщить его так, чтобы вместо нацеливания на 1 указанный элемент c он включал макрос для любого выбранного элемента.

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

Спасибо за помощь.

1 Ответ

0 голосов
/ 16 апреля 2020

Ответил на мой собственный вопрос ....

'' Sub CATMain ()

Dim objSel As Selection

Установить objSel = CATIA.ActiveDocument.Selection

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

End Sub '' '

Изменяет требуемые атрибуты выбранного элемента.

...