Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  SolidWorks
  Macro> Block in Skizze einfügen

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
  
PLM TechnologieForum Bamberg
Autor Thema:  Macro> Block in Skizze einfügen (2341 mal gelesen)
GGbaby
Mitglied
Technische Zeichnerin

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

Beiträge: 6
Registriert: 27.10.2008

SW 2010 SP4.0

erstellt am: 14. Okt. 2010 09:25    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 habe ein Teil. Nun möchte ich mit einem Macro eine neue Skizze erstellen und dort einen Block hinzufügen, die ich dann 2 Beziehungen gebe. Allerdings fügt er den Block jedensmal nicht mit ein, wenn ich das Macro aufnehme.
Kann ich das zusätzlich noch nachtragen, weil er das nicht mit aufnimmt? Hat jemand eine Idee?

Gibt es vielleicht auch Hilfeseiten, zum erstellen von SolidWorks Makros? Erklärungen, Hilfen etc.??

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

Olaf Wolfram
Ehrenmitglied V.I.P. h.c.
CAD-Mutti und Konstrukteur CSWP CSWI



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

Beiträge: 2431
Registriert: 30.06.2008

I7-3770 CPU 3,40 Ghz
32 Gb RAM
64 bit
WIN 10
SWX 2019 SP5
NVIDIA Quadro K2000<P>
Lenovo ThinkStation

erstellt am: 14. Okt. 2010 12:13    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 GGbaby 10 Unities + Antwort hilfreich

Hallo Dschiedschiebaby,

anderer vorschlag-->leg dir den Block in deine Konstruktionsbibliothek und ziehe in einfach in die aktive Skizze...

..ansonsten wird sich schon jemand von unseren Makro-Gurus hier melden.

vlt solltest du mal dein Macro ( Code) hier reinkopieren, da hilft es sich besser!

Bitte unbedingt noch das Profil von Dir ausfüllen.(OS, SWX-Version; Hardware usw.)

------------------
CSWST/CSWI/CSWP/  3DVia

Worksline- Ost
...strebe niemals nach den Dingen, die auch dümmeren gelingen.....

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

HenryV
Mitglied
Konstrukteur, Engineering


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

Beiträge: 813
Registriert: 18.05.2005

SolidWorks 2022 x64 SP5.0
Dell Precision 5820
Intel Xeon W-2125 4x4GHz
NVIDIA Quadro P2000 5GB
32GB RAM
2x Dell U2412M, 24" TFT
Windows 10 Enterprise x64 22H2
Microsoft 365 E5
Microsoft Visual Studio Enterprise 2022

erstellt am: 14. Okt. 2010 15:52    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 GGbaby 10 Unities + Antwort hilfreich

Hallo GGbaby

Hier der Code zum Einfügen eines Blocks.

Code:
Sub main()

Dim swApp As SldWorks.SldWorks
Dim Part As SldWorks.ModelDoc2
Dim myBlockDefinition As SldWorks.SketchBlockDefinition
Dim swMathUtil As SldWorks.MathUtility
Dim swMathPoint As MathPoint
Dim nPt(2) As Double

Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Set swMathUtil = swApp.GetMathUtility

'Definition des Einfügepunkts xyz (Werte in Meter)
nPt(0) = 0
nPt(1) = 0
nPt(2) = 0
vPt = nPt

Set swMathPoint = swMathUtil.CreatePoint(vPt)
Set myBlockDefinition = Part.SketchManager.MakeSketchBlockFromFile(swMathPoint, "C:\block.SLDBLK", False, 1, 0)

End Sub


Gruss Andreas

------------------
21 ist nur die halbe Antwort.

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

kons92
Mitglied
Konstrukteur


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

Beiträge: 91
Registriert: 07.12.2009

i920,6GB DDR3,FX3500
SW2011 SP1.0
Win7 64Bit

erstellt am: 14. Okt. 2010 22:16    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 GGbaby 10 Unities + Antwort hilfreich

Also du musst eine Skizze erstellen und dann das Makro starten, dann kannst du den Block positionieren.

Hoffe es hilft dir!
Kons92

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