---

Hallo Catia-Freunde!

Ich möchte gern den Wert der Streckgrenze sämtlicher Bauteile aus Stahl ändern. Nur weiß ich nicht wie ich an den Wert per Makro rankomme. Per Hand rechte Maus auf "Steel" im Partbody und dann Properties\Analysis\yield strength

Bin für jede Hilfe dankbar!
Viele Grüße
CatiaV5User

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

---

Servus

Wenn es nur wenige Teile sind geht es ohne Macro am einfachsten:

Baugruppe öffnen -> "Formeleditor" öffnen -> Filter "yield strength" setzen -> Werte bei Bauteilen aus Stahl von Hand ändern -> Baugruppe speichern.

Gruß
Bernd

PS: Der Wert für die Streckgrenze ist nur zur Information, bei einer Analyse (FEM) wird dieser nicht berücksichtigt.

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Hi!
Müßte (in R16) wie folgt funktionieren!

Sub CATMain()

Dim partDocument1 As PartDocument
Set partDocument1 = CATIA.ActiveDocument
Dim part1 As Part
Set part1 = partDocument1.Part
Dim parameters1 As Parameters
Set parameters1 = part1.Parameters
Dim dimension1 As Dimension
Set dimension1 = parameters1.Item("PartBody\Steel\SAMIsotropicMaterial.1\Yield Strength")

dimension1.Value = 70000000#

End Sub

Gruß

Marko

[Diese Nachricht wurde von crow73 am 17. Jul. 2007 editiert.]

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

---

Danke Marko für deinen Beitrag,
nur bekomm ich in der Zeile

Set dimension1 = parameters1.Item("PartBody\Steel\SAMIsotropicMaterial.1\Yield Strength")

den Fehler The method item failed

Vielleicht weiß ja jemand, woran es liegt!

Grüße CatiaV5User

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

---

Hallo CatiaV5User,

Du solltest vielleicht mal schauen, wie der Parameter in Deinen Modellen wirklich heisst. Bei mir lautet der Parametername nicht
    "PartBody\Steel\SAMIsotropicMaterial.1\Yield Strength"
sondern
    "PartBody\Steel\Steel.1.1\Yield Strength".
Und mit diesem Namen gibt es dann auch keine Fehlermeldung.

mfg,
Lusilnie

------------------

Alle Aussagen zu DassaultSystemes-Produkten sind sehr optimistisch, selbst diese!!!

frei nach größeren Geistern

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

---

Streckgrenze_aendern.jpg

Hallo Lusilnie,

danke für deine Bemühungen, allerdings hat das so auch nicht geklappt. Ich hab schon sämtliche Parameternamesvarianten durchprobiert, nix klappt. Weiß einfach nicht den richtigen Parameternamen.
Im Anhang hab ich mal ein Screenshot von der Dateikarte mit dem Yield Strength. Vielleicht kann mir ja jemand meinen richtigen Parameternamen zum ändern der Streckgrenze sagen.

Hier ist auch mein Script mit dem ich versuche die Steckgrenze zu ändern.

Sub CATMain()

Dim partDocument1 As PartDocument
Set partDocument1 = CATIA.ActiveDocument
Dim part1 As Part
Set part1 = partDocument1.Part
msgbox part1.name
Dim parameters1 As Parameters
Set parameters1 = part1.Parameters
Dim dimension1 As Dimension
Set dimension1 = parameters1.Item("\PartBody\Steel\Steel.1.1\Yield Strength")

dimension1.Value = 70000000

Grüße CatiaV5User
End Sub

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

---

Servus

Versuch es mal mit der modifizierten Zeile:

Set dimension1 = parameters1.Item("Steel\Steel.1.1\Yield Strength")

bzw.

Set dimension1 = parameters1.Item("Steel\SAMIsotropicMaterial.1\Yield Strength")

Bei mir hat es so zumindest funktioniert.

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Hallo CatiaV5User,

Dein Bild ist ja schön, doch Du suchst den Namen an der falschen Stelle.
Deine Selektion des Materials ist ja schon in Ordnung. Nun musst Du mit dieser Selektion nur noch den "Formel-Editor" (Symbol "f(x)", meist unten-Mitte) aufrufen und schon sollte Dir unter den Parametern Dein zu ändernder Parameter mit dem exakten Namen angezeigt werden.
Den Namen dann im Script verwenden und ...

Anderer Ansatz: Du hast einen "Abschreib"-Fehler im Script, denn es sollte nicht "\PartBody\Steel\Steel.1.1\Yield Strength" sondern "PartBody\Steel\Steel.1.1\Yield Strength" lauten!

mfg,
Lusilnie

------------------

Alle Aussagen zu DassaultSystemes-Produkten sind sehr optimistisch, selbst diese!!!

frei nach größeren Geistern

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

---

Vielen Dank, Lusilnie!

Nun hat es geklappt!!!

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