---

Auswahl_Standardansicht.txt

Hallo,

ich habe eine Baugruppe mit einer Unterbaugruppe. Diese Unterbaugruppe enthält 6 Bauteile. 2 Bauteile werden in der Unterbaugruppe durch eine iLogic Regel ein-, bzw. ausgeblendet.
Nun werden mir diese jedoch in der übergeordneten Baugruppe trotzdem angezeigt. Manuell kann ich dies ändern, indem ich auf die Unterbaugruppe klicke und die Darstellung von Hauptansicht auf Standard ändere.
Dies muss ich jedoch jedesmal machen wenn ich die iLogic Regel ausführe und die Regel Bauteile ein-, bzw. ausblendet.

Wollte nun mit VBA ein Makro schreiben das mir diesen manuellen Schritt erspart. Hierzu muss ich die DesignViewRepresentation ändern, das ist mir klar.
Schaffe es auch die DesignViewRepresentation der Unterbaugruppe und der Hauptbaugruppe zu ändern.
z.B. von Hauptansicht in Standard

Öffnet man die Unterbaugruppe wird alles richtig angezeigt (z.B Standard) und man sieht das das geschrieben Makro funktioniert.

Die Bauteile werden jedoch in der Hauptbaugruppe trotzdem angezeigt.
Muss ich hier irgendwie die Ansicht aktuallisieren oder ähnliches?

Anbei das halbfertige Makro.
Ein Dankeschön schon im Voraus.

lg Scorb

------------------
mfg Scorb

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

---

Hallo

Soweit ich das auf die Schnelle überblicken konnte fehlt da noch etwas. Die Darstellung deiner Unterbaugruppen in der Hauptbaugruppe kann für jede Occurrence einzeln gesteuert werden. Heißt, die gleiche Unterbaugruppe kann einmal in DesignViewRepresentation "Standard" und einmal in "Vorgabe" in der Hauptbaugruppe dargestellt werden.
Du muß also für jede ComponentOccurrence in deiner Hauptbaugruppe mittels SetDesignViewRepresentation("Standard") die Darstellung aktivieren. Meiner Meinung nach so (ohne Rekursion in 2. Unterbaugruppenebene):

Code:

---

Dim oCompOcc As ComponentOccurrence
For Each oCompOcc In openDoc.ComponentDefinition.Occurrences
    If oCompOcc.DefinitionDocumentType = kAssemblyDocumentObject Then
        If oCompOcc.BOMStructure <> kPurchasedBOMStructure And kPhantomBOMStructure Then
            Call oCompOcc.SetDesignViewRepresentation("Standard")
        End If
    End If
Next

---

------------------
MfG
Ralf

[Diese Nachricht wurde von rkauskh am 19. Nov. 2012 editiert.]

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

---

Hallo Ralf !

Genau das war der Fehlende Baustein.
Stichwort:"SetDesignViewRepresentation".

Vielen Dank. Hat mir sehr geholfen.

MfG
Alex

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