
High,
nach langer erfolgloser Nacht brauche ich unbedingt etwas Hilfe.
Bin noch etwas grün hinter den Programmier-Ohren eher ein CAD-Anwender aber ich möchte folgendes knacken!!
In einer Assembly ist die Darstellung der Verknüpfung der Parts eher Katastrophal.
Ich bräuchte ein Makro, welches mir die verknüpfte Fläche (Linie, Achse)anders einfärbt und später wieder zurückfärbt.
Die Ausgabe der Verknüpfung in einer Msgbox hab ich geschafft.
For I = 1 To myConstraints.Count
Set myConstraint = myConstraints.Item(I)
Select Case myConstraint.ReferenceType
Case catCstRefTypeFixInSpace ' = 1
MsgBox ("Im Raum Fixiert " & myConstraint.GetConstraintElement(1).DisplayName)
Case catCstRefTypeRelative ' = 0
Select Case myConstraint.Type
Case catCstTypeOn ' = 2
MsgBox ("Kongruenz zwischen " & myConstraint.GetConstraintElement(1).DisplayName & " und " & myConstraint.GetConstraintElement(2).DisplayName)
Case catCstTypeDistance ' = 1
MsgBox ("Offset zwischen " & myConstraint.GetConstraintElement(1).DisplayName & " und " & myConstraint.GetConstraintElement(2).DisplayName)
End Select
End Select
Next
Problem !!!!!:
Wie kann ich nun diese Fläche ansprechen und umfärbeln???(Ohne mit der Maus zu selektieren)
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP