---

Hallo,

ich habe eine Frage zum VBA. Mit VBA möchte ich ein Feature auswählen, dann noch ein Koordinatensystem auswählen und zum Schluß den Dialog für Tabellen-gesteuertes Muster einblenden. Die ersten zwei Sachen (Feature und Koordinatensystem auswählen) funktionieren schon. Aber ich habe ein Problem mit der Einblendung des SolidWorks Dialogfensters "Tabellengesteuertes Muster".
Kann mir damit jemand weiterhelfen?

J.Fuks

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

---

24881_swcommands-liste.png 24881_swcommands-makro-verweis.png 24881_swcommands-objektbrowser-in-vbaeditor.png

Hallo JFuks,

und herzlich willkommen im SolidWorks bRett auf CAD.de  

Um Dialoge in SolidWorks aufzurufen kannst du seit einigen Versionen das sehr mächtige RunCommand benutzen. Das Schwierigste dabei ist die passenden Konstanten für die Dialoge herauszubekommen, dazu gibt es die swcommand_e Enumeration. Die Konstanten sind typischerweise mit dem entsprechenden englischen Namen der Funktion aufgelistet, hier also irgendwas mit "table driven pattern"

Das führt dann zu diesem einfach Code, der dir diesen Dialog per API aufruft:

Code:

---

Dim swApp As Object

Public Const swCommands_TableDrivenPattern = 300

Sub main()

    Set swApp = Application.SldWorks
    swApp.RunCommand swCommands_TableDrivenPattern, ""

End Sub

---

Du kannst natürlich auch statt der einen Konstanten einen Verweis auf die Command type library setzen, ich finde es einfacher die eine Konstante eben in den Code zu schreiben. Eine Übersicht über alle Command-Konstanten kannst du auch bei mir z.B. auf http://solidworks.cad.de/mm_990.htm runterladen, das kann man dann einfach im Editor aufrufen und dort danach suchen. Im VBA-Editor geht es, wenn du den Verweise gesetzt hast und dann auf F2 (Ansicht-Objektkatalog) klickst.

Ich hoffe, das hilft dir weiter.

Ciao,
Stefan

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

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

---

Hallo Stefan,

es funktioniert. 

Dankeschön

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