---

Moin!

Ich bastle mir grad einen Knopf, um aus der idw direkt ins referenzierte Modell zu springen. Klappt so weit schon ganz gut, nur in Baugruppenzeichnungen werden sämtliche beteiligten Modelle gleichrangig aufgelistet (z.B. 300 items) und das erste ist dann vielleicht nur irgendeine Schraube.

Code:

---

Public Sub OpenModel()
        Set odoc = ThisApplication.ActiveDocument
        If odoc.AllReferencedDocuments.Count = 0 Then
            MsgBox "Es ist in dieser Datei kein Modell referenziert."
        Else
            dateiname = odoc.AllReferencedDocuments.Item(1).FullFileName
        End If
        ThisApplication.Documents.Open(dateiname)
End Sub

---

Es muss doch auch einen Eintrag für die Hauptkomponente geben, bloß dass ich den noch nicht gefunden hab. Habt ihr einen Tip für mich?

------------------
Roland  
www.Das-Entwicklungsbuero.de

[Diese Nachricht wurde von Doc Snyder am 12. Mrz. 2009 editiert.]

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

---

Ah, jetzt hab ich gefunden, dass es unter "ReferencedFiles" (ohne "All..") bedeutend übersichtlicher zugeht. Nun ist es aber so, dass ich auch da verschiedene Files habe, nämlich zusätzlich zu dem der idw den Namen gebenden File auch das mit der Umgebung der dargestellten Baugruppe.

Wie finde ich das maßgebliche, also das, aus dem auch die iProps für das Schriftfeld kommen?

------------------
Roland  
www.Das-Entwicklungsbuero.de

[Diese Nachricht wurde von Doc Snyder am 12. Mrz. 2009 editiert.]

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

---

Hallo

Probier mal:

Code:

---

Public Sub OpenModel()
        Dim odoc As Document
        Dim dateiname As String
        Set odoc = ThisApplication.ActiveDocument
        If odoc.File.ReferencedFiles.count = 0 Then
            MsgBox "Es ist in dieser Datei kein Modell referenziert."
        Else
            dateiname = odoc.File.ReferencedFiles.Item(1).FullFileName
        End If
        ThisApplication.Documents.Open (dateiname)
End Sub

---

------------------
MfG
RK

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

---

Danke! In den ersten zwei Tests tut diese Variante schon mal genau das, was ich mir gewünscht hab.

------------------
Roland  
www.Das-Entwicklungsbuero.de

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

---

Äh, noch eine Frage:

Dass in meinem Code die Variablenanmeldung fehlte, liegt daran, dass die hier in dem von mir auch nur irgendwoher kopierten und ein bisschen geänderten Code mit "Option Explicit" vorweg deklariert werden.

Was ist davon zu halten? Ich sehe das selten, aber so wie ich den Hilfetext dazu verstehe, ist das besser. Stimmt das oder ist das ein Fehlschluss?

------------------
Roland  
www.Das-Entwicklungsbuero.de

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

---

Guten Roland,

Warum reicht dir Rmt im Browser auf die Erstansicht und Öffnen nicht aus?

Herzliche Grüsse

Sascha Fleischer

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

---

Hallo

Option Explicit sagt mW auch nur aus, das Variablen eben ausdrücklich vor ihrer Verwendung deklariert sein müssen. Wo genau im Code ist egal, Hauptsache vorher. Hinterher macht auch irgendwie keinen Sinn. 
Ich deklariere am Beginn des Scriptes alle Standardsachen (ThisApplication, ActiveDocument, Zählvariablen für Schleifen usw.), je nachdem was ich benötige. Dann sucht man sich keinen Wolf, wenn man nochmal nachsehen muß welchen Typ man verwendet hat.
Variablen die nur zur Anwendung kommen, wenn eine Vorbedingung erfüllt wird (innerhalb IF- oder CASE-Anweisungen z.B.), deklariere ich auch erst dort. Hab ich ein paar Bit Speicher gespart.
Das ist mein Autodidakt-System, die Profis haben sicher andere Meinungen.

------------------
MfG
RK

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

---

Guter Sascha, 

es ist natürlich ein bisschen Liebhaberei, aber mit einem einzigen Mausklick auf ein an immer derselben Stelle befindlichen Icon zwischen Modell und Zeichnung hin und her springen zu können, ist sehr performat. Oft sind es die kleinen Dinge, die durch ihre Häufigkeit, dann doch Bedeutung haben.

Z.B. kann man auch im idw-Browser über das Icon zum Ändern der Schriftfeldeinträge zu den iProps des Modells gelangen, aber auch für die iProps hab ich das im Standard verfügbare Icon direkt auf der Leiste, so dass ich auf dem Weg über das Modell viel schneller dran komme. Es ist auch besser, das Modell vor Augen zu haben, zu dem man gerade die Einträge macht, denn die Eingabemasken für idw und Modell sind optisch kaum zu unterscheiden.

------------------
Roland  
www.Das-Entwicklungsbuero.de

[Diese Nachricht wurde von Doc Snyder am 13. Mrz. 2009 editiert.]

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