---

Hallo zusammen,

Ich mal wieder :-)

Bei der Fertigstellung meines Title Block Macros mit CATScript fehlt mir leider noch eine Funktion, die ich nach langem Probieren leider nicht hin bekomme.

Neben dem Füllen von Texten mit 3D Properties als auch dem Erzeugen von Attribulinks zwischen Texten und 3D oder 2D Attributen möchte ich auch gerne den Maßstab eines Blattes als Attributlink in einen Text meines Schriftfeldes einfügen.

Bei Attributen funktioniert es einwandfrei mittels

If oText.Name = "PTC_WM_NAME" Then
oText.InsertVariable 0, 50 , parameters1.Item("MATERIAL")
End If

Appliziere ich jedoch den Befehl (Deklaration der entsprechenden Variablen selbstverständlich durchgeführt)

oText.InsertVariable 0, 50 , oDrwDocument.Sheets.Item("Blatt.001").Scale
bringt er einen Fehler (Objekttypen nicht verträglich).

Hat jemand eine Idee wie der Befehl zum Einfügen eines Maßstabes als Attributlink statt InsertVariable lauten muss?

Ich wäre euch für eure Hilfe sehr dankbar!

Vielen Dank und Gruß
Sven

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

---

Keiner eine Idee?
Manuell ist der Attribut Link problemlos zu erzeugen.
Muss doch auch einen Script Befehl dafür geben 

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

---

Hallo Sven2010,

Dein Problem ist relativ einfach zu erklären: Du versuchst ein Objekt von Typ "Double" anstelle eines Objektes vom Typ "Parameter" zu verwenden.

Laut V5Automation.chm würde die richtige Abfrage in etwa so lauten:

Code:

---

oText.InsertVariable 0, 50 , parameters1.Item("Drawing\Blatt.001\ViewMakeUp.1\Scale")

---

oder auch nur

Code:

---

oText.InsertVariable 0, 50 , parameters1.Item("Blatt.001\ViewMakeUp.1\Scale")

---

Habe es jetzt nicht getestet!

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

---

Hi,

supi!!!
Beide Codes laufen einwandfrei. Scheint als müsste ich mich doch mal mehr mit der automation.chm auseinandersetzen!

10+ Unities für dich!

Vielen vielen Dank und Gruß
Sven

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