| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| |
| SolidCAM im Einsatz bei der August Weckermann KG |
Autor
|
Thema: Ursprung mit Makro verschieben (1107 mal gelesen)
|
API-Fabi Mitglied CAD/PLM Admin
Beiträge: 56 Registriert: 23.11.2015 SOLIDWORKS 2020 SP5 Windows 10 SAP-PLM Interface (CAD-Desktop)
|
erstellt am: 10. Dez. 2015 11:33 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen! Ich möchte ein Makro schreiben, das das Modell als Step speichert und dabei als Option "Ausgabe Koordinatensystem" das Koordinatensystem1 wählt und anschließend gleich importiert. So wird der Ursprung verschoben Wie kann ich beim Speichern das Koordinatensystem1 auswählen? Bei SaveAs3 finde ich dazu keine Option. Bzw. geht das überhaupt? ------------------ Gruß Fabi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
StefanBerlitz Guter-Geist-Moderator IT Admin (CAx)
Beiträge: 8756 Registriert: 02.03.2000 SunZu sagt: Analysiere die Vorteile, die du aus meinem Ratschlag ziehst. Dann gliedere deine Kräfte entsprechend und mache dir außergewöhnliche Taktiken zunutze.
|
erstellt am: 10. Dez. 2015 11:58 <-- editieren / zitieren --> Unities abgeben: Nur für API-Fabi
Hallo API Fabi, Zitat: Original erstellt von API-Fabi:Wie kann ich beim Speichern das Koordinatensystem1 auswählen? Bei SaveAs3 finde ich dazu keine Option. Bzw. geht das überhaupt?
Ja, das geht Die angaben dazu findest du auch nicht beim SaveAs3, sondern bei den STEP-Exportoptionen in der API Hilfe. Such dort mal nach "step export option", bei der großen Übersicht findest du dann untr "Miscellaneous Enumerators" auch den passenden Eintrag für "Benutze bitte DIESES Koordinatensystem". Ein Quick-and-dirty-Beispiel damit zusammengehackt:
Code:
' ****************************************************************************** ' Beispiel zum Speichern eines Modells als STEP mit benutzedefiniertem ' Koordinatensystem, im Beispiel "Koordinatensystem1" genannt ' ' 10.12.2015 Stefan Berlitz ' ******************************************************************************' Konstanten für das Setzen der Option Const swDetailingNoOptionSpecified = 0 Const swFileSaveAsCoordinateSystem = 16 Sub main() ' late binding der Objekte für Versionsunabhängigkeit Dim swApp As Object Dim ModelDoc As Object Dim ModelDocExt As Object ' an SolidWorks anhängen, Modell und die Erweiterung dazu holen Set swApp = Application.SldWorks Set ModelDoc = swApp.ActiveDoc Set ModelDocExt = ModelDoc.Extension ' die Option setzen, damit ein benutzerdefiniertes Koordinatensystem ' genutzt wird und dem auch den Namen dieses Koordinatensystem mitgeben. Debug.Print ModelDocExt.SetUserPreferenceString( _ swFileSaveAsCoordinateSystem, _ swDetailingNoOptionSpecified, _ "Koordinatensystem1") ' und ModelDoc exportieren Debug.Print ModelDoc.SaveAs3("C:\temp\test.STEP", 0, 0) End Sub
Ciao, Stefan ------------------ Inoffizielle deutsche SolidWorks Hilfeseite http://solidworks.cad.de
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
API-Fabi Mitglied CAD/PLM Admin
Beiträge: 56 Registriert: 23.11.2015 SOLIDWORKS 2020 SP5 Windows 10 SAP-PLM Interface (CAD-Desktop)
|
erstellt am: 10. Dez. 2015 12:49 <-- editieren / zitieren --> Unities abgeben:
|