Hallo
ich habe folgendes Problem mit Selektion (simples Catscript erstellt 5 Geometrical.Set's)
für Root funktioniert aber für Stufe 2 (egal Geometrical.Set oder Part.Body) hängt bei Linie 69
oInputType(0) = "HybridBody"
oStatus = oSelection.SelectElement2(oInputType, "Select a Geometrical Set", True)
If (oStatus = "Cancel") Then
Exit Sub
End If
Set mySelection = oSelection.Item(1).Value
Dim hybridBody1 As HybridBody
Set hybridBody1 = hybridBodies1.Item(mySelection.Name) - Linie 69
Macro Aufzeichnung (für Selektion Stufe 2) zeigt folgendes:
Set hybridBody1 = hybridBodies1.Item("Geometrical Set.1")
Set hybridBodies2 = hybridBody1.HybridBodies
Set hybridBody2 = hybridBodies2.Item("Centre_Of_Gravity")
part1.InWorkObject = hybridBody2
Problem mit SelectElement2 ?
[Diese Nachricht wurde von PRZJEDRZ am 09. Nov. 2017 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP