Hallo Zusammen,
Ich wollte mein Einzelteil-Makro (Part) so umbauen, das der User das Ganze ebenfalls in einer Baugruppe starten kann. Da hier das .ActiveDocument ja immer das Product ist, habe ich mir eine Selektions-Abfrage gebastelt die das Einzelteil abfrägt (SelectedElement3), in welchem das Makro gestartet werden soll. Soweit so gut.
Code:
Dim Bauteil As Part
Dim PartDoc as Document
Dim Selektion As Object
Set Selektion = CATIA.ActiveDocument.Selection
....
Set Bauteil = Selektion.Item(1).Value
Set PartDoc = Bauteil.Parent
Selektion.Clear
....
Jetzt habe ich doch eigentlich im PartDoc das Document des Einzelteils oder?
Wieso kann ich dann über folgende Suche keine Geometrischen Sets im Einzelteil suchen?
Code:
Dim Einzelteilsuche As Selection
Set Einzelteilsuche = PartDoc.Selection
Einzelteilsuche.Search ".Geometrical Set.Name=Startset;all"
Das Ganze funktioniert jetzt erstmal unabhängig davon ob das Part in Bearbeitung gesetzt ist (blau) oder?
Die Suche liefert mir aber kein Ergebnis obwohl im Einzelteil ein Geometrisches Set mit dem Namen "Startset" vorhanden ist.
Noch dazu habe ich das Problem, das:
Code:
Einzelteilsuche.Clear
Kein Clear der Selektion erzeugt. Erst wenn ich die Einzelteilsuche als CATIA.ActiveDocument umdefiniere lässt sie sich clearen.
Wenn ich die Suche jetzt von Anfang an als:
Code:
Set Einzelteilsuche = CATIA.ActiveDocument.Selection
definiere, findet er mir das entsprechende Set. Aber natürlich auch in anderen Einzelteilen.
Kann mir bitte jemand auf die Sprünge helfen?
Vielen Dank.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP