---

Servus,

ich habe momentan das Problem, dass der Zeichnungsnamen nicht dem Bauteilnamen entspricht. Dadurch funktioniert die Änderung des Dateityps nichts. Daher hilft mir dieser Link nicht weiter.

http://ww3.cad.de/foren/ubb/Forum258/HTML/000836.shtml

Kann man über VBA die Zeichnung direkt über einen Verweis des Bauteils öffnen?

Was ich suche ist:

Öffne mir die Referenzierte Zeichnung zum Bauteil.

Meines Wissens steht kein Verweis zur Zeichnung in den IProperties

Kann man über VBA sagen Rechtskick -> Zeichnung öffnen.?

Vielen Dank für eure Hilfe

Gruß Pete

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

---

Wie Du schon richtig sagtest, weiß keine IV-Datei wohinein sie überall referenziert wurde.
IV bzw. der Apprentice dazu sucht alle im Suchbereich vorhandenen irgendwie in Frage kommenden Dateien zusammen und wirft in jede Datei einen kurzen Blick hinein um zu schauen ob die gegebene Datei darin referenziert ist.
Das kann je nach Art und Umfang des Suchbereichs natürlich etwas dauern.

Bin mir ganz sicher dass genau dieser Vorgang programmäßig zugänglich ist, weiß aber nicht wie das konkret ginge.
Erschwerend mag da hinzu kommen, dass Du im Falle eines Bauteils nur genau die entsprechende Bauteilzeichnung haben möchtest, und nicht auch die Zeichnungen von Baugruppen wo ebendieses Bauteil referenziert ist.

------------------
mfg - Leo

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

---

Hallo Pete,

Da hast du einfach Pech mit deiner Struktur (IDW ungleich IPT)

Was du machen kannst:
1. beim Speichern der IDW den FullFileName der IDW in das IPT in einen Benutzer-Parameter eintragen.
  z.B. IDW_Name = D:\Irgendwo\Irgendwas.idw
2. aus dem IPT heraus diesen IDW_Name auslesen und die IDW öffnen.

Bei mehreren IDWs zu einer IPT eben mehrere IDW_Name1, IDW_Name2...

------------------
Gruß Roland

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

---

Danke soweit,

ich finde die Idee, zuerst die Zeichnungen nach den referenzierten Teilen zu fragen garnicht schlecht.

Meine Herangehensweise wäre nun, dass ich alle Zeichnungen mit den Referenzen in eine Textdatei schreiben lasse und im nachhinein, mit einem Bauteil die Zeichnung erfragen kann.
Die Erfragung der Referenz sollte am besten ohne öffnen von unnötigen Fenstern erfolgen... Performance usw...

Mein Problem ist nun, dass ich nach durchforstung des Internets leider keine möglichkeit gefunden habe den Referenzpfad einer Zeichnung auszulesen.

Hat jemand von euch ein Schlagwort oder vielleicht schon ein Code?

Vielen Dank

Gruß Peter

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

---

Hallo Peter,

damit du aml einen Ansatz hast:

Code:

---

    Select Case oDoc.DocumentType
    Case Is = kDrawingDocumentObject
        Set oDrwDoc = ThisApplication.ActiveDocument
        If oDrwDoc.ActiveSheet.DrawingViews.Count > 0 Then
            If oDoc.ReferencedDocuments.Count > 0 Then
                Set oRefDoc = oDoc.ReferencedDocuments.Item(1)

---

------------------
mit freundlichem Gruß
aus der Burggemeinde Brüggen
Lothar Boekels

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

---

Zitat:

---

Original erstellt von Pete85:
Meine Herangehensweise wäre nun, dass ich alle Zeichnungen mit den Referenzen in eine Textdatei schreiben lasse...

---

Wenn du nur einige 100 IDWs hast, mag das gehen.
Bei mehreren 10.000 IDWs läuft die Suche in der Textdatei ewig.
Dann brauchst du eine Datenbank - Genau das ist Vault Basic (und koscht nix)

Vielleicht wäre es ja noch nicht zu spät, dein Nummernsystem zu korrigieren:
Zeichnungsnummer = Dateiname (IPT bzw. IAM) = Dateiname IDW.
Und das in sinnvolle Unterordner ablegen, dann findet immer jeder alles, ohne zu suchen.

------------------
Gruß Roland

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

---

Hi pete
Schau mal hier

http://ww3.cad.de/foren/ubb/Forum258/HTML/001755.shtml

      

[Diese Nachricht wurde von thomas109 am 19. Jun. 2019 repariert. ]

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