---

Hi

möche in einer 2D Zeichung nach starten des Macros eine Ansicht auswählen. In dieser Ansicht linien etc. mit bestimmten eingeschaften Selecktieren und verändern.

Mein Queltext bisher

Sub CATMain()

'Mögliche Selektionen_________________________
DIM Was (1)
Was (0) = "DrawingView"
Was (1) = "DrawingView"

'Selektion Definieren anbinden und löschen________
DIM UserSel1 As Selection
Set UserSel1 = CATIA.ActiveDocument.Selection
UserSel1.EndSelectElement

'Selektion___________________________________
DIM E As CATBSTR
E = UserSel1.SelectElement ( Was , "Ansicht wählen ! ! !", true)

'Selection im Wertebereich_______________________
If E = "Normal" Then

UserSel1.Search "(CATDrwSearch.2DCircle.Color='(0,0,0)' + (CATDrwSearch.2DCurve.Color='(0,0,0)' + CATDrwSearch.2DLine.Color='(0,0,0)')),sel"

'Selection nicht im Wertebereich___________________
Else
MsgBox ("Abbruch")
End If

End Sub

Leider behält er die Slection nicht also eigentlich sucht er gar nicht. Wenn ich die Ansicht vorher wähle und dann nur die selection definiere und suchen lasse geht es. Dann behält er die Ergebnisse ausgewählt wenn ich wärende der Laufzeit auswähle nicht!

Besten Dank im Vorraus Greets Behrem

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP