---

Aussenmasse.zip AussenmasseFehler.jpg

Hallo Forum

Es wurde hier mal ein Makro (siehe Anhang) aufgestellt, das die Abmasse eines Part's in die Dateieigenschaften übernimmt. (Part modellieren, Makro ausführen, fertig). Das Marko stammt von Kalle.  Alles Bestens, ja?
Nun baut man das Part in eine BG. Will man die Aussenmasse in der BG ändern (z.B. DoppelKlick auf Model, Mass ändern, Neuaufbau), verursacht das Makro einen Fehler. (siehe Datei-Anhang)

Set swModel = app.ActiveDoc
    Set swModelExt = swModel.Extension
    Set swConf = swModel.GetActiveConfiguration
    ConfName = swConf.Name
    Set featdata = feature.GetDefinition
   
    params = swModel.GetBodies(swSolidBodies) (HIER BLEIBT DAS MAKRO STEHEN)

Ich kenne mich mit VB wenig aus  , leider. Wer hätte hier also eine Idee, dass das Makro auch in BG's läuft. Um konkrete Antworten bin ich euch sehr dankbar. Von mir aus leere ich auch mein Unities-Konto... 

------------------
Grüess  Amos

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

---

Hi,

ich denke mal, daß Du das Makro von der BG aus gestartet hast und er damit mit AssemblyDoc arbeitet und die Methode GetBodies dort nicht verfügbar ist.

Also über Komponente zum ModelDoc des Teiles und dann die Berechnung durchführen.

------------------
Gruß Ingo

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

---

Hallo Ingo

Danke für deine Antwort. Nein, das Makro hab ich im Teil eingefügt. Allerdings wird es in der BG ausgeführt, da SWX bei einer Modelländerung (Aussenmasse) das Part in der BR "durchrechnen" muss.
So stösst SWX auf das Aussenmass-Makro, und bringt den Feler...
Bitte das Makro mal antesten

------------------
Grüess  Amos

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

---

Aheu,

komischerweise rechnet er bei mir das Makro innerhalb der Baugruppe überhaupt nicht (weder in 2004 noch in 2005). Wenn mir einer sagen kann wie ich SWX dazu bringe das Makro auch in der Baugruppe auszuführen, dann würde ich versuchen es so umzuändern, dass es funktioniert.

EDIT: Kommando zurück. Ich hab bei mir noch ein On Error Resume Next vor dem Set swApp = Application.SolidWorks drin, daher übergeht er den Fehler und macht nichts. Wenn das ausreicht, dann einfach diese Zeile einfügen. Ich versuch aber mal das auch in der Baugruppe zum laufen zu bringen.

Bis dann,
Kalle

------------------
-----------------------------------------
Es gibt immer mehr Lösungen als Probleme.

[Diese Nachricht wurde von Kalle am 12. Mai. 2005 editiert.]

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

---

Hallo Kalle,

Ich wäre schon dankbar, wenn das Makro keinen Fehler in BG's verursachen würde. Der Laufzeitfehler verursacht dann auch im PDM Probleme (beim Kopieren z.B. von Part's).

------------------
Grüess  Amos

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

---

Aheu,

also die Lösung ist ganz ganz einfach, die swmRebuild Funktion kriegt vom Macrofeature ja das entsprechende Teildokument direkt mitgeliefert (hab das damals nur nicht gesehen). Also einfach aus

Set swModel = swApp.ActiveDoc

ein

Set swModel = part

machen und schon läufts.
Oder alle swModel durch part ersetzen. Geht auch.

Bis dann,
Kalle

------------------
-----------------------------------------
Es gibt immer mehr Lösungen als Probleme.

[Diese Nachricht wurde von Kalle am 12. Mai. 2005 editiert.]

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

---

Ja das war's super,     

Danke vielmals Kalle!!

------------------
Grüess  Amos

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