---

Im_Fenstermenue.png Im_Zuletzt_verwendete_Dokumente.png

Hallo, möchte gern mit SW16, ein aktive CAD Teil per Tastenkürzel den Speicherordner öffnen wo das abgelegt ist.

Natürlich kann ich im Menü öffnen, was aber lästig ist (2 Klicks + Maustrecke).

Find den swCommand Befehl nicht, gibt ihn überhaupt? 

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

---

30582_explorer-in-swx.png

Hallo 4kspeed,

ich vermute, dass es da keine eigene Funktion speziell für das aktive Dokument gibt. Hast du die Funktion im Datei-Explorer innerhalb von SolidWorks mal probiert, ob die nicht für deine Zwecke okay wäre? Siehe Screenshot. Auf der anderen Seite ist der Weg dorthin natürlich auch recht weit und klicken musst du ggf. auch 2-3 mal ...

Die Alternative dazu wäre ein Makro, dass du dir auf eine Tastur legst:

Code:

---

' **********************************************************************
' * Makro sucht Ablagepfad des aktiven Dokumentes und öffnet
' * diesen in einem neuen Explorer-Fenster
' *
' * 16.05.2017 Stefan Berlitz
' * http://solidworks.cad.de
' * http://swtools.cad.de
' **********************************************************************

Sub main()

    Dim swApp       As Object
    Dim ModelDoc    As Object
    Dim pfad        As String
   
    Set swApp = Application.SldWorks
    Set ModelDoc = swApp.ActiveDoc
   
    ' nur den Pfad zur Ablage des Dokuments raussuchen
    pfad = Left(ModelDoc.GetPathName, InStrRev(ModelDoc.GetPathName, "\"))
   
    ' diesen Ordner im Explorer öffnen
    Shell "Explorer.exe " & pfad, vbNormalFocus

End Sub

---

Ob dann der Mausweg zum geöffneten Explorer-Fenster zu weit ist kann ich aber nicht beurteilen ...     

Ciao,
Stefan

------------------
Inoffizielle deutsche SolidWorks Hilfeseite    http://solidworks.cad.de

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

---

Hallo StefanBerlitz,

sehr gut, Makro ist die Lösung die ich gesucht habe, Danke!
Es markiert zwar die aktive Datei nicht aber das ist auch nicht schlimm.

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

---

Zitat:

---

Original erstellt von 4kspeed:
Es markiert zwar die aktive Datei nicht aber das ist auch nicht schlimm.

---

Aber das ist ja als echter Einzeiler machbar (oder Dreizeiler, wie man es sieht):

Code:

---

Sub main()

    ' Variante 2: ohne das ganze Gezumpel drumherum
    Shell "Explorer.exe /select, " & Application.SldWorks.ActiveDoc.GetPathName, vbNormalFocus

End Sub

---

    

Ciao,
Stefan

------------------
Inoffizielle deutsche SolidWorks Hilfeseite    http://solidworks.cad.de

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

---

Vielen Dank! 

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