| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| | |
 | 3DEXPERIENCE Conference 2024 | München |
|
Autor
|
Thema: Makro nach Umstellung auf SWX 2011 (1693 mal gelesen)
|
Seminger
Mitglied
Dipl.-Ing. (FH) Maschinenbau
   Beiträge: 290
Registriert: 30.10.2009 SolidWorks Professional 2016 x64
Cimatron 14.0
PTC Creo Elements
Simufact.forming
Magma 5.4
---------------------------------------
Dell Precision T5810
Intel Xeon (R) 3,70 GHz
16 GB Ram
NVidia Quadro M4000
Windows 7 Professional 64Bit
|
erstellt am: 02. Aug. 2012 09:03  <-- editieren / zitieren -->   Unities abgeben:          
Guten Morgen zusammen! Ich habe bis gestern immer mit einem Makro gearbeitet, dass mir in einer Skizze eine waagerechte und eine senkrechte Konstruktionslinie durch den Ursprung legt.
Mit dem Makro ist mir hier schon mal geholfen worden --> klick. Der Quelltext liest sich so: Dim swApp As Object Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long Sub main() Set swApp = Application.SldWorks Set Part = swApp.ActiveDoc
Dim myModelView As Object
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
Part.ClearSelection2 True
Dim skSegment As Object
Set skSegment = Part.SketchManager.CreateCenterLine(-1#, 0#, 0#, 49#, 0#, 0#)
Dim bRet As Boolean
bRet = skSegment.MakeInfinite
Set skSegment = Part.SketchManager.CreateCenterLine(0#, -1#, 0#, -0#, 49#, 0#)
bRet = skSegment.MakeInfinite
End Sub Gestern haben wir auf SWX 2011 umgestellt und das Makro funktioniert nicht mehr. Fehlermeldung siehe Anhang. Alle anderen Makros, die wir einsetzen, funktionieren tadellos nach der Umstellung. Könnte mir jemand dabei helfen?
Mit diesem Programmieren kann ich einfach nicht um...  Schon mal danke! Mfg, Seb. ------------------
Einem Eisberg, der nur die Spitze zeigt, fehlt Selbstvertrauen... 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: 02. Aug. 2012 09:55 <-- editieren / zitieren --> Unities abgeben: Nur für Seminger 
|
Seminger
Mitglied
Dipl.-Ing. (FH) Maschinenbau
Beiträge: 290
Registriert: 30.10.2009 SolidWorks Professional 2016 x64
Cimatron 14.0
PTC Creo Elements
Simufact.forming
Magma 5.4
---------------------------------------
Dell Precision T5810
Intel Xeon (R) 3,70 GHz
16 GB Ram
NVidia Quadro M4000
Windows 7 Professional 64Bit
|
erstellt am: 02. Aug. 2012 10:21 <-- editieren / zitieren --> Unities abgeben:
Hallo Stefan! Ich danke Dir!
Wenn ich die richtigen Verweise einstellen will, kommt die Fehlermeldung "Fehler beim Laden einer dll" und nix ändert sich... Mfg, Sebastian ------------------
Einem Eisberg, der nur die Spitze zeigt, fehlt Selbstvertrauen... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Seminger
Mitglied
Dipl.-Ing. (FH) Maschinenbau
Beiträge: 290
Registriert: 30.10.2009 SolidWorks Professional 2016 x64
Cimatron 14.0
PTC Creo Elements
Simufact.forming
Magma 5.4
---------------------------------------
Dell Precision T5810
Intel Xeon (R) 3,70 GHz
16 GB Ram
NVidia Quadro M4000
Windows 7 Professional 64Bit
|
erstellt am: 09. Aug. 2012 17:18 <-- editieren / zitieren --> Unities abgeben:
|
Nobbi
Mitglied
Techniker
Beiträge: 151
Registriert: 21.08.2002 Windows 10 Enterprise
SW2001 - SW2019
MDT
ACPIx64-basierter PC
NVIDIA Quadro M4000
Space Pilot
SAP-Cideon
|
erstellt am: 09. Aug. 2012 19:42 <-- editieren / zitieren --> Unities abgeben: Nur für Seminger
|
Seminger
Mitglied
Dipl.-Ing. (FH) Maschinenbau
Beiträge: 290
Registriert: 30.10.2009 SolidWorks Professional 2016 x64
Cimatron 14.0
PTC Creo Elements
Simufact.forming
Magma 5.4
---------------------------------------
Dell Precision T5810
Intel Xeon (R) 3,70 GHz
16 GB Ram
NVidia Quadro M4000
Windows 7 Professional 64Bit
|
erstellt am: 10. Aug. 2012 08:04 <-- editieren / zitieren --> Unities abgeben:
Morgen Nobbi! Ist nur noch die 2011'er Version drauf.
Und das Problem ist ja, dass die Fehlermeldung lautet "Fehler beim Laden einer dll". Ich hab keine Ahnung welche... Mfg, Sebastian ------------------
Einem Eisberg, der nur die Spitze zeigt, fehlt Selbstvertrauen... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bk.sc
Ehrenmitglied V.I.P. h.c.
Konstrukteur Sondermaschinenbau
Beiträge: 2776
Registriert: 18.07.2012 -Solid Works 2019 SP5
-Pro Engineer WF 3
|
erstellt am: 10. Aug. 2012 08:17 <-- editieren / zitieren --> Unities abgeben: Nur für Seminger
Hallo Seb, quick and dirty, einfach die Zeilen Code:
'Dim myModelView As Object
'Set myModelView = Part.ActiveView
'myModelView.FrameState = swWindowState_e.swWindowMaximized
löschen oder auskommentieren. Diese Zeilen maximieren nur dein Ansichtsfenster, aber sollte in deinem Fall eigentlich nicht benötigt werden. Gruß
Bernd ------------------
--- Man muß nicht alles wissen, man muß nur wissen wo es steht --- Staatlich anerkannte Deutschniete  Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| | Elektroingenieur (m/w/d) | | Menschen und Technologien zu verbinden, den Perfect Match für unsere Kunden zu gestalten, immer die richtigen Expert:innen für die jeweilige Herausforderung zu finden - das ist unser Anspruch bei FERCHAU und dafür suchen wir dich: als ambitionierte:n Kolleg:in, der:die wie wir Technologien auf die nächste Stufe bringen möchte. Wir realisieren spannende Projekte für namhafte Kunden in den Technologiebereichen ... | | Anzeige ansehen | Elektrotechnik, Elektronik |
|
Seminger
Mitglied
Dipl.-Ing. (FH) Maschinenbau
Beiträge: 290
Registriert: 30.10.2009 SolidWorks Professional 2016 x64
Cimatron 14.0
PTC Creo Elements
Simufact.forming
Magma 5.4
---------------------------------------
Dell Precision T5810
Intel Xeon (R) 3,70 GHz
16 GB Ram
NVidia Quadro M4000
Windows 7 Professional 64Bit
|
erstellt am: 10. Aug. 2012 08:53 <-- editieren / zitieren --> Unities abgeben:
|
Foren auf CAD.de (alle Foren)
| 
