---

Kann man folgende Fehlermeldung in einem Makro abfragen ?

"Die folgende Komponente in dieser Baugruppe haben keine gültige Dichte".

Genauer gesagt, innerhalb eines anderen Makros soll dies abgefragt werden, bevor es "abstürzt".

Schon Mal Danke im Voraus !

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

---

Hallo,
ich weiß nicht, mit welchen Befehlen du Arbeitest, ein Auszug wäre nicht schlecht.

Ich habe folgenden Schnipsel aus einer ähnlichen Abfrage.

Code:

---

        Dim MassProp As Variant          'zum Gewicht auslesen
        Dim Masse As Double
        'und die MassProperties auslesen und Gewicht ermitteln
        MassProp = swModel.GetMassProperties()
        ' die Reihenfolge der MassProps im Variant ist:
        ' CenterOfMassX, CenterOfMassY, CenterOfMassZ, Volume, Area, Mass, MomXX, MomYY, MomZZ, MomXY, MomZX, MomYZ
        ' Masse ist die 6. Eigenschaft, also Index 5
        If Not IsEmpty(MassProp) Then
            Masse = Round(MassProp(5), 3)
        End If
       

---

Evtl. hilft dir das weiter.
Grüße Andi

------------------
Hast du kein Problem?
Such dir eins. ( Und löse es )

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

---

Hallo Andi,

das hat mir sehr weiter geholfen.
Musste aber in meinem Makro den Befehl
swModel.GetMassProperties()
in
Model.GetMassProperties
ändern.

DANKE !! 

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