Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  SolidWorks
  Ursprung mit Makro verschieben

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
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


Sehen Sie sich das Profil von API-Fabi an!   Senden Sie eine Private Message an API-Fabi  Schreiben Sie einen Gästebucheintrag für API-Fabi

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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)



Sehen Sie sich das Profil von StefanBerlitz an!   Senden Sie eine Private Message an StefanBerlitz  Schreiben Sie einen Gästebucheintrag für StefanBerlitz

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für API-Fabi 10 Unities + Antwort hilfreich


29040_step-api-export-option.png

 
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


Sehen Sie sich das Profil von API-Fabi an!   Senden Sie eine Private Message an API-Fabi  Schreiben Sie einen Gästebucheintrag für API-Fabi

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Vielen Dank!
Das funktioniert wunderbar!

------------------
Gruß Fabi

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2024 CAD.de | Impressum | Datenschutz