---

Hallo zusammen,

gibt es die Möglichkeit bei Erstellung einer Zeichnung die "Datei-eigenschaften" (Eigenschaftsname, Typ, Wert usw )automatisch aus dem Part zu übernehmen?
bzw evtl. auch ein Makro mit welchem ich die Eigenschaften in der Zeichnung updaten kann wenn ich sie im Part geändert habe?

Forensuche hat mich diesbezüglich nicht wirklich weiter gebracht.

sonnige Grüße vom Bodensee

Michael

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

---

Normalerweise reicht ein Neuaufbau der Zeichnung, um die aus Teilen in Texte der Zeichnung übernommenen Dateieigenschaften nach Änderungen zu aktualisieren. Klappt das bei Dir nicht?!

------------------
Lutz Federbusch
Mein Gästebuch
Der Mensch, Herr oder Sklave der Technik?

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

---

Hallo Michael!

1. Zeichnungsvorlage erstellen
2. Im Zeichnungskopf die Bezugshinweise mit den Dokumenteigenschaften verknüpfen

Wie das geht, findest du in der SWX-Hilfe unter Index-> "Dokumente, Eigenschaften" -> "Verknüpfen von Bezugshinweisen mit Dokumenteigenschaften"

[edit] Achso: Aktualisiert werden sie dann automatisch. [/edit]

Gruß, Jens

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

=)

[Diese Nachricht wurde von CAD-Maler am 08. Mai. 2008 editiert.]

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

---

Hi,

Nein. Das geht bei mir nicht. Ich weiß daß man Einträge im Schriftkopf aus den Eigenschaften des Part holen kann. Die würden sich ja dann auch aktualisieren. Aber mir gehts allein um die Einträge in den Dateieigenschaften. Diese braucht mein Kunde um die Datem im SAP verwalten zu können. Deshalb sollten sie bei Part und Zeichnung bis auf eine bestimmte Zeile identisch sein. Klar könnte ich sie von Hand rüberkopieren. Aber da sollte es doch ne bequemere Möglichkeit geben 

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

---

Da wirst Du wohl ein Makro bemühen müssen! Das war hier aber schon einmal Thema, möglicherweise findest Du eine fertige Lösung dafür...

------------------
Lutz Federbusch
Mein Gästebuch
Der Mensch, Herr oder Sklave der Technik?

[Diese Nachricht wurde von Lutz Federbusch am 08. Mai. 2008 editiert.]

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

---

Hallo Michael,

evtl. klappt es mit der DPS Varbox. Falls Du diese einsetzst, solltest Du die Dateiinfo mal versuchen zu ergänzen. Leider hab ich dies auch noch nicht testen können, werde mich aber nächste Woche mal daran setzen. Vielleicht hat damit bereits jmd andres Erfahrung mit.

Schönes Wochenende.
Siggi

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

---

Das Ausfüllen der Schriftkopfes funktioniert schon mal super. Auch die Verknüpfung zu den Datei-Eigenschaften des Teils.

Nun würde ich gerne das Sahnehäubchen kreieren! ;-)
Am sinnvollsten ist es für uns, um Externe oder Konstrukteure, die nicht dertaillieren (=Zeichnung erstellen), anzubinden, wenn das Makro die Datei-Eigenschften nicht in die Zeichnung, sondern in das "Modell in Ansicht, das in den Blatteigenschaften definiert ist" schreiben würde. Durch den Bezug, dass sich die Zeichnungen aus dem Teil holt, stehen dann in beiden Dokumenten dieselben Eigenschaften drin.

Außerdem füllen unsere Externen z.T. nur Eigenschaften im Teil. Die Zeichnung hat Bezugshinweise mit Verknüpfungen zum "Modell in Ansicht, das in den Blatteigenschaften definiert ist", alles paletti!

Problem dabei ist, jeder andere nutzt das Makro bei geöffneter Zeichnung und nicht bei geöffnetem Teil! Denn die Arbeitsanweisung kann ich so nicht abändern, dass wir alles ins Teil eintragen!

Wie schreibe ich in die Datei-Eigenschaften des "Modells in Ansicht, das in den Blatteigenschaften definiert ist"?

Würde mich freuen, wenn ich da weiter käme.

Gruß,
Malte

---

Mit View.GetReferencedModelName und View.ReferencedConfiguration bekommst Du die Infos zum Modell; das öffnest Du und schreibst die Daten in die Dateieigenschaften hinein und schließt es speichernd wieder...

------------------
Lutz Federbusch
Mein Gästebuch
Der Mensch, Herr oder Sklave der Technik?

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

---

SchriftkopffülltDokumenteigenschaften.rar

Okay, ich habe viel rumprobiert.
Ich kann mit meinem (anderen) Makro wunderbar den Schriftkopf einer Zeichnung füllen. Dazu wird die Eingabemaske bei geöffneter Zeichnung ausgefüllt und die Parameter werden in die Zeichnung / Schriftkopf übergeben.

Ich kann natürlich in Teilen oder Baugruppen die Eigenschaften über die Eingabemaske füllen. Wenn ich dann eine Zeichnung ableite, werden dort die Eigenschaften des Dokumentes eingetragen.

Was ich aber immer noch nicht kann ist, dass ich die Zeichnung eines Teils / Baugruppe geöffnet habe und nun das Makro starte, die Eingabemaske fülle und die Eigenschaftsparameter nun in das zugehörige Teil / BG geschrieben werden (so dass die Eigenschaften schließlich im Teil/BG und in der Zeichnung durch die Verknüpfung vorhanden sind).

Kann sich vielleicht jemand meinen angehängten Versuch ansehen und mir einen Tipp geben, warum ich den Wert nicht in das referenzierte Teil / BG geschrieben bekomme?

Ich habe das Forum bereits x-mal nach den entsprechenden Schalgwörtern durchsucht und jeden Beitrag bereits dreimal gelesen. Ähnliche Makros gibt es viele, die ich auch herangezogen habe. Aber leider bislang ohne Erfolg!

Jede Hilfe ist willkommen!

Gruß,
Malte

---

Niemand, der eine Antwort weiß? :-(

Gruß,
Malte

---

Hallo Malte

Anbei ein Quick&Dirty-Makro, ohne Fehlerabfragen.
Schreibt die Zeichnungsnummer "2008" in das Model/die Baugruppe der aktiven Zeichnung.

Gruss Andreas

Code:

---

Dim swApp, model, DrawingDoc, View, Teil As Object
Dim ModName, Zeichnung As String
Dim errors As Long
Dim dummy, res As Boolean

Const ZeichnungsNr = "2008"

Sub main()

Set swApp = Application.SldWorks
Set model = swApp.ActiveDoc

Set DrawingDoc = swApp.ActiveDoc
Set View = DrawingDoc.GetFirstView
Set View = View.GetNextView

ModName = View.GetReferencedModelName()
Zeichnung = model.GetPathName()

Set Teil = swApp.ActivateDoc2(ModName, True, errors)
dummy = Teil.AddCustomInfo("Zeichnungsnummer", "Text", ZeichnungsNr)

swApp.CloseDoc Teil.GetTitle()

Set model = swApp.ActivateDoc2(Zeichnung, True, errors)

model.Visible = True
res = model.EditRebuild()

End Sub

---

------------------
21 ist nur die halbe Antwort.

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