| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| |
| Finden Sie die richtigen Kunststoffmaterialien für Ihre Produktdesigns, Webinar am 02.08.2024 |
Autor
|
Thema: API: freistehende Elemente löschen (6358 mal gelesen)
|
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 23. Mrz. 2006 08:55 <-- editieren / zitieren --> Unities abgeben:
Hallo Experten ich hätte da mal wieder eine Frage: Im Zuge von Variantenkonstruktionen entsteht immer wieder die Situation, dass auf Zeichnungen verschiedene Elemente als "freistehend" übrig bleiben, weil die dazu gehörenden Features entfernt wurden. Es ist zwar möglich, diese freistehenden Beschriftungen und Bemaßungen auszublenden, das ist aber nicht wirklich zufriedenstellend. Zum einen sind sie eben nur ausgeblendet und nicht wirklich entfernt- gefällt mir nicht. Zum anderen ist die Darstellung dann auch nicht immer korrekt. In Ordinatenmaßen entstehen dabei zum Beispiel unschöne Lücken. Wenn diese freistehenden Maße gelöscht werden, dann werden diese Lücken geschlossen. Nun schwebt mir ein Makro vor, das über alle Bemaßungen und Beschriftungselemente inc. Mittelkreuze, Symmetrieachsen etc. drüber läuft und alle freistehenden Objekte löscht. Hat da vielleicht jemand ne Idee? Oder gar schon die Lösung? ------------------ Klaus www.al-ko.com >> Unbedingt hier klicken!!! << privat... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Kalle Mitglied Student
Beiträge: 706 Registriert: 14.04.2002
|
erstellt am: 23. Mrz. 2006 09:03 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Aheu Klaus, ich hab irgendwo ein Makro, welches zumindest die Mittelkreuze löscht (die sind bei mir andauernd freistehend). Den Rest müsste man eben noch dazuprogrammieren. Wenn Du das als Ausgangspunkt haben willst, so kann ich's raussuchen und hier posten. Falls jemand anderes schon 'ne Komplettlösung hat, dann bist Du mit der dann wohl besser aufgehoben. Bis dann, Kalle ------------------ ----------------------------------------- Es gibt immer mehr Lösungen als Probleme. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
G. Dawg Ehrenmitglied V.I.P. h.c. Teamleiter FEM Simulation
Beiträge: 2622 Registriert: 12.07.2004 SolidWorks_2o2o SP3.o Win10_x64, Quadro_P2ooo. VisualStudio_2o19_Pro. FEM: Forge_NxT_HPC, ANSYS_WB. 3D-Printer: Ultimaker_2, Tinker_Gnome.
|
erstellt am: 23. Mrz. 2006 09:32 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Zitat: Original erstellt von Kalle: Aheu Klaus,ich hab irgendwo ein Makro, welches zumindest die Mittelkreuze löscht (die sind bei mir andauernd freistehend). Den Rest müsste man eben noch dazuprogrammieren. Wenn Du das als Ausgangspunkt haben willst, so kann ich's raussuchen und hier posten. Falls jemand anderes schon 'ne Komplettlösung hat, dann bist Du mit der dann wohl besser aufgehoben. Bis dann, Kalle
Wäre toll, wenn Du das Makro hochladen könntest!! Genau aus diesem Grund zeichne ich keine Mittelkreuze mehr (oder nur noch dort, wo ich weiss, dass nichts mehr ändern wird)! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 23. Mrz. 2006 09:46 <-- editieren / zitieren --> Unities abgeben:
|
u.clemens Mitglied Konstrukteur
Beiträge: 964 Registriert: 04.07.2000 engineer's law o cheap o fast o good check only two !
|
erstellt am: 23. Mrz. 2006 10:32 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Zitat: Original erstellt von KMassler: ... Bräuchte dann aber ne Möglichkeit, per API festzustellen, ob eine Beschriftung freistehend ist ...
Schau dir in der API-Hilfe mal das Beispiel "Get Types of Entities for Selected Dimension Example" an. Damit sollte es gelingen, die "baumelnden" (dangling) Einträge zu finden ... ------------------ mfg uc Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Kalle Mitglied Student
Beiträge: 706 Registriert: 14.04.2002
|
erstellt am: 23. Mrz. 2006 10:52 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Aheu, hier also das Makro. Ist ein abgewandeltes Beispiel aus der API-Hilfe und der Quellcode ist nicht wirklich gepflegt. War 'ne Quick&Dirty Lösung, weil ich viele Zeichnungen zu bereinigen hatte. Viel Spass, Kalle ------------------ ----------------------------------------- Es gibt immer mehr Lösungen als Probleme. [Diese Nachricht wurde von Kalle am 23. Mrz. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 23. Mrz. 2006 14:23 <-- editieren / zitieren --> Unities abgeben:
|
Kalle Mitglied Student
Beiträge: 706 Registriert: 14.04.2002
|
erstellt am: 24. Mrz. 2006 08:36 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Aheu Klaus, ändere in Deinem Code mal swView.GetFirstAnnotation in swView.GetFirstAnnotation3. Bei meinem ersten Versuch hat das Makro nämlich schon versagt. Platte mit Bohrung in einee Zeichnung gezogen. Der Bohrung ein Durchmessermaß verpasst. Bohrung aus der Platte gelöscht. Mittelkreuz und Durchmessermaß sind freistehend. Makro ausgeführt. Nur das Mittelkreuz ist weg. Annotationcount liefert zwar 2 aber swAnn.GetNext bringt beim ersten Auftruf schon Nothing. Mit GetFirstAnnotation3 hat er die Bemaßung auch gefunden. Vielleicht löst das auch Dein Problem mit den Detailansichten (hab ich nicht versucht). Bis dann, Kalle ------------------ ----------------------------------------- Es gibt immer mehr Lösungen als Probleme. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
G. Dawg Ehrenmitglied V.I.P. h.c. Teamleiter FEM Simulation
Beiträge: 2622 Registriert: 12.07.2004 SolidWorks_2o2o SP3.o Win10_x64, Quadro_P2ooo. VisualStudio_2o19_Pro. FEM: Forge_NxT_HPC, ANSYS_WB. 3D-Printer: Ultimaker_2, Tinker_Gnome.
|
erstellt am: 24. Mrz. 2006 09:43 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Bei mir passiert genau NICHTS! Auch nicht nach dem Änderunsvorschlag (swView.GetFirstAnnotation3) von Kalle. Es gab mir zuerst eine Meldung: Set swSelMgr = Drw.SelectionManager Dann aber lief es durch. Hatte aber nichts bereinigt. Das andere Makro "Mittelkreuze löschen" funktioniert einwandfrei!! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 24. Mrz. 2006 10:11 <-- editieren / zitieren --> Unities abgeben:
Zitat: Original erstellt von Kalle: Aheu Klaus,ändere in Deinem Code mal swView.GetFirstAnnotation in swView.GetFirstAnnotation3. ...
YES! Damit läufts! Zumindest bei meinen bisher betroffenen Fällen! Herzlichen Dank Zitat: Original erstellt von G.Dawg: Es gab mir zuerst eine Meldung: Set swSelMgr = Drw.SelectionManager
Wie ist das zu verstehen...kam da ein Meldungsfenster? Oder eine Debug-Meldung? Mit welchem Inhalt? ------------------ Klaus www.al-ko.com >> Unbedingt hier klicken!!! << privat... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
G. Dawg Ehrenmitglied V.I.P. h.c. Teamleiter FEM Simulation
Beiträge: 2622 Registriert: 12.07.2004 SolidWorks_2o2o SP3.o Win10_x64, Quadro_P2ooo. VisualStudio_2o19_Pro. FEM: Forge_NxT_HPC, ANSYS_WB. 3D-Printer: Ultimaker_2, Tinker_Gnome.
|
erstellt am: 24. Mrz. 2006 10:22 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Zitat:
Wie ist das zu verstehen...kam da ein Meldungsfenster? Oder eine Debug-Meldung? Mit welchem Inhalt? [/i]
Sorry, das war der Debug-Mode. Es ist leider nur einmal aufgetaucht - Der Fehler taucht auf, wenn ich die Änderung von Kalle nicht mache!! :: Laufzeitfehler '91': Objektvariable oder With-Blockvariable nicht festgelegt. :: Aber das Makro funktioniert bei mir nicht so wie es geplant war! Es läuft durch ohne Fehlermeldung, löscht aber nichts (ja, ich habe freistehende Elemente)! [Diese Nachricht wurde von G. Dawg am 24. Mrz. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 24. Mrz. 2006 10:27 <-- editieren / zitieren --> Unities abgeben:
Kannst du das Macro mal "manuell" aus dem Editor starten und zwar schrittweise mit F8? Und dann mal schauen, ob er die Beschriftungen überhaupt erkennt und was im Direkt-Fenster ausgegeben wird (habe ziemlich viele Debug.print-Befehle drin stehen). Werden die Maße etc. in SWX markiert? Benenne mal deine Zeichnungsansichten um und schau im direktfenster, ob überhaupt die richtige Zeichnung durchlaufen wird. Hmm... ------------------ Klaus www.al-ko.com >> Unbedingt hier klicken!!! << privat... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
G. Dawg Ehrenmitglied V.I.P. h.c. Teamleiter FEM Simulation
Beiträge: 2622 Registriert: 12.07.2004 SolidWorks_2o2o SP3.o Win10_x64, Quadro_P2ooo. VisualStudio_2o19_Pro. FEM: Forge_NxT_HPC, ANSYS_WB. 3D-Printer: Ultimaker_2, Tinker_Gnome.
|
erstellt am: 24. Mrz. 2006 10:33 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Ok! Bin mit F8 durch, hier hängt er sich auf: Set swSelMgr = Drw.SelectionManager Nachdem der Schritt-für-Schritt Modus diese Zeile markiert hatte, drückte ich nochmals F8 und bekam die Oben genannte Fehlermeldung. Und jetzt sogar mit oder ohne Kalle's Änderung!!! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 24. Mrz. 2006 10:55 <-- editieren / zitieren --> Unities abgeben:
Was für eine Fehlermeldung? "Objekt erforderlich" oder was? Und dein Mittelkreuzlöschmakro läuft? Hast du das komplette macro übernommen? Hast du die Zeile Code: Dim Drw As Object
im Declarations-Bereich?Kannst du mal das Direktfenster öffnen und schauen, was da alles steht, vielleich auch mal den Inhalt posten? Obwohl...da dürfte an der Stelle nur stehen "Blatt1 - Annotations found: " und dann die Anzahl der Beschriftungen auf Blattebene. Seltsam ... oder mach mal aus dem Dim Drw As Object ein Public Drw As Object...ist zwar überflüssig, aber wer weiß... ------------------ Klaus www.al-ko.com >> Unbedingt hier klicken!!! << privat... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
G. Dawg Ehrenmitglied V.I.P. h.c. Teamleiter FEM Simulation
Beiträge: 2622 Registriert: 12.07.2004 SolidWorks_2o2o SP3.o Win10_x64, Quadro_P2ooo. VisualStudio_2o19_Pro. FEM: Forge_NxT_HPC, ANSYS_WB. 3D-Printer: Ultimaker_2, Tinker_Gnome.
|
erstellt am: 24. Mrz. 2006 11:03 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Zitat: Original erstellt von KMassler: Und dein Mittelkreuzlöschmakro läuft?
Kein Problem!! Das läuft wunderbar!! Zitat:
Hast du das komplette macro übernommen? Hast du die Zeile Code: Dim Drw As Object
im Declarations-Bereich?
Habe ich alles! Zitat:
Kannst du mal das Direktfenster öffnen und schauen, was da alles steht, vielleich auch mal den Inhalt posten? Obwohl...da dürfte an der Stelle nur stehen "Blatt1 - Annotations found: " und dann die Anzahl der Beschriftungen auf Blattebene.
Siehe CODE weiter unten... Zitat:
Seltsam ... oder mach mal aus dem Dim Drw As Object ein Public Drw As Object...ist zwar überflüssig, aber wer weiß...
Hab ich nun auch geändert, dann hat er gemeckert, dass ich keine Zeichnung offen habe und nach dem Makro neustart kam wieder die Meldung 91!
Code:
File = View = Blatt1 View = Drawing View1 // Sollte Top_View sein!!! Detailelement595 1 Detailelement596 1 Detailelement597 1 Detailelement598 1 Detailelement599 1 Detailelement600 1 Detailelement601 1 Detailelement602 1 Detailelement603 1 --------------- -------------------------------------------------- --------------------------------------------------
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 24. Mrz. 2006 11:25 <-- editieren / zitieren --> Unities abgeben:
|
G. Dawg Ehrenmitglied V.I.P. h.c. Teamleiter FEM Simulation
Beiträge: 2622 Registriert: 12.07.2004 SolidWorks_2o2o SP3.o Win10_x64, Quadro_P2ooo. VisualStudio_2o19_Pro. FEM: Forge_NxT_HPC, ANSYS_WB. 3D-Printer: Ultimaker_2, Tinker_Gnome.
|
erstellt am: 24. Mrz. 2006 11:42 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Öööööhm.....?! Oooops!! Das Problem war, dass ich ein zweite Session von Solidworks offen hatte und dort war, logischerweise, keine Zeichnung offen!!!! Nun funktioniert alles so wie es sollte!!! Ich entschuldige mich zutiefst für meine Tollpatschigkeit und wünsche allen ein schönes Wochenende!!! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 24. Mrz. 2006 11:49 <-- editieren / zitieren --> Unities abgeben:
|
Kalle Mitglied Student
Beiträge: 706 Registriert: 14.04.2002
|
erstellt am: 27. Mrz. 2006 08:52 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Aheu, die Sache mit den zwei SolidWorks Sessions macht mir auch andauern Probleme (bzw. einem Kollegen von mir, der meine Makros einsetzt). Hat jemand eine Möglichkeit zu steuern an welche SolidWorks-Sitzung sich ein Programm dranhängt? Mir fällt dazu nur ein, dass es direkt als AddIn programmiert wird, denn das weiss ja dann zu welchem SolidWorks es gehört. Bis dann, Kalle ------------------ ----------------------------------------- Es gibt immer mehr Lösungen als Probleme. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 27. Mrz. 2006 11:40 <-- editieren / zitieren --> Unities abgeben:
|
G. Dawg Ehrenmitglied V.I.P. h.c. Teamleiter FEM Simulation
Beiträge: 2622 Registriert: 12.07.2004 SolidWorks_2o2o SP3.o Win10_x64, Quadro_P2ooo. VisualStudio_2o19_Pro. FEM: Forge_NxT_HPC, ANSYS_WB. 3D-Printer: Ultimaker_2, Tinker_Gnome.
|
erstellt am: 08. Dez. 2006 07:58 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
So, ich "muss" dieses Thema nochmals aus der Vergangenheit ausgraben. Frage: WIESO muss ich die Verweise jedesmal, nach einem Neustart von SolidWorks (nur für dieses Makro hier), neu definieren? Ist das wirklich Sinn der Sache? Wie kann ich das umgehen? Danke für Euren Rat!! ------------------ SolidWorks is my friend... SolidWorks, frieeeend! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 08. Dez. 2006 09:32 <-- editieren / zitieren --> Unities abgeben:
Das musst du normalerweise nicht. Ich würde mal tippen, dass da irgendwo die SWX-Installation vermurkst ist. Da solltest du mal SWX neu intstallieren, eventuell incl. Registry aufräumen etc. Das wäre zumindest mein erster Schritt... [Edit] noch ne Idee...arbeitest du mit SWX 2006 oder 2007? Hast du mein Makro verwendet oder selber eins geschrieben? Vielleicht auch mal ein neues, leeres Makro beginnen, den Verweis auf SWX setzen und dann den Inhalt vom alten Makro in das neue kopieren. Vielleicht merkt er sich das dann? [/Edit] ------------------ Klaus www.al-ko.com | Pssst...unbedingt hier klicken!!! | mein Gästebuch | privat... [Diese Nachricht wurde von KMassler am 08. Dez. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
G. Dawg Ehrenmitglied V.I.P. h.c. Teamleiter FEM Simulation
Beiträge: 2622 Registriert: 12.07.2004 SolidWorks_2o2o SP3.o Win10_x64, Quadro_P2ooo. VisualStudio_2o19_Pro. FEM: Forge_NxT_HPC, ANSYS_WB. 3D-Printer: Ultimaker_2, Tinker_Gnome.
|
erstellt am: 08. Dez. 2006 09:37 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Mist....! Ich meine, vielen Dank für Deinen Rat! Leider habe ich keine Zeit SolidWorks neu zu installieren! Doch ich denke, dass unser Admin (der liest da auch heimlich mit) mir in den nächsten paar Jahren das "neue" SP5.1 aufspielen wird. Und mit etwas Glück, darf ich noch miterleben wie SolidWorks 2007 inkl. PLM auf meinem Computer laufen wird. ------------------ SolidWorks is my friend... SolidWorks, frieeeend! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 08. Dez. 2006 09:56 <-- editieren / zitieren --> Unities abgeben:
|
G. Dawg Ehrenmitglied V.I.P. h.c. Teamleiter FEM Simulation
Beiträge: 2622 Registriert: 12.07.2004 SolidWorks_2o2o SP3.o Win10_x64, Quadro_P2ooo. VisualStudio_2o19_Pro. FEM: Forge_NxT_HPC, ANSYS_WB. 3D-Printer: Ultimaker_2, Tinker_Gnome.
|
erstellt am: 08. Dez. 2006 10:32 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
|
Conrad Mitglied Dipl.-Ing. (FH)
Beiträge: 280 Registriert: 20.12.2002 Windows 10 SolidWorks 2018/Sp5.0 Intel(R) XEON(R) CPU E5-1620v4 @ 3.49Ghz 32 GB RAM 64-Bit proALPHA Client for Open Enterprise Server 2 SP4 (IR10) Linux basierte file server
|
erstellt am: 13. Dez. 2007 11:36 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Hallo wollte gerade das makro testen und habe die gleichen Probleme wie G. Dawg. Habe alles genannte ausprobiert, aber es half nichts Ich arbeite allerdings noch mit SWX 2004 Vieleich ist dort der Hund begraben ------------------ Grüße aus dem Allgäu Conrad Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 13. Dez. 2007 11:57 <-- editieren / zitieren --> Unities abgeben:
|
tbd Mitglied Teamleiter
Beiträge: 825 Registriert: 26.01.2006 Dell Percision T5400 Intel(R) Xeon(R) CPU X5460 @ 3.16GHz 3,25 GB RAM Nvidia Quadro FX 4600 ----- Win XP Prof SP 3 SW 2008 SP 5.0 PARTsolutions 8.1.08 Cideon SAP PLM 5.103.5.17 Visual Studio 2008
|
erstellt am: 13. Dez. 2007 12:04 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
SolidWorks 2004 ist lange her, deshalb nur eine Vermutung. Evtl gab es in SolidWorks 2004 noch keinen SelectionMgr Objekt. Deshalb ist es evtl. auch bei einem Verweis auf die SolidWorks Type Library nicht verfügbar. Also erst wie Klaus beschierben hat die Verweise prüfen. Wenn es dann noch nicht klappt liegt es wahrscheinlich an eine zu alte SolidWorks Version. ------------------ Mfg Daniel Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 13. Dez. 2007 12:34 <-- editieren / zitieren --> Unities abgeben:
|
Conrad Mitglied Dipl.-Ing. (FH)
Beiträge: 280 Registriert: 20.12.2002 Windows 10 SolidWorks 2018/Sp5.0 Intel(R) XEON(R) CPU E5-1620v4 @ 3.49Ghz 32 GB RAM 64-Bit proALPHA Client for Open Enterprise Server 2 SP4 (IR10) Linux basierte file server
|
erstellt am: 13. Dez. 2007 12:34 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Zitat: Original erstellt von tbd:
Also erst wie Klaus beschierben hat die Verweise prüfen. Wenn es dann noch nicht klappt liegt es wahrscheinlich an eine zu alte SolidWorks Version.
Habe ich gemacht. Hab auch schon ein neues Makro mit dem "Alten" Inhalt erstellt. ------------------ Grüße aus dem Allgäu Conrad [Diese Nachricht wurde von Conrad am 13. Dez. 2007 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
scharp Mitglied Konstrukteur Verpackungsmaschinen
Beiträge: 98 Registriert: 10.10.2002
|
erstellt am: 07. Jan. 2011 15:52 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
|
scharp Mitglied Konstrukteur Verpackungsmaschinen
Beiträge: 98 Registriert: 10.10.2002 Solidworks 2020 SP 3 Logocad Triga 4.2 Windows 10 MaxxDB 3.5
|
erstellt am: 07. Jan. 2011 16:00 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
|
scharp Mitglied Konstrukteur Verpackungsmaschinen
Beiträge: 98 Registriert: 10.10.2002
|
erstellt am: 10. Jan. 2011 20:35 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
|
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 11. Jan. 2011 08:07 <-- editieren / zitieren --> Unities abgeben:
|
ad_man Mitglied freiberuflicher Entwicklungsing. (Fahrzeugtechnik, CSWP, CPPA))
Beiträge: 1378 Registriert: 20.12.2003
|
erstellt am: 11. Jan. 2011 10:03 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
|
ad_man Mitglied freiberuflicher Entwicklungsing. (Fahrzeugtechnik, CSWP, CPPA))
Beiträge: 1378 Registriert: 20.12.2003 SolidWorks 2023 SP5 mit Enterprise PDM , Windows 11, Dell Precision 3660, i7-12700K, 96 GB DDR-Ram, Quadro RTX A4000
|
erstellt am: 11. Jan. 2011 19:07 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
|
scharp Mitglied Konstrukteur Verpackungsmaschinen
Beiträge: 98 Registriert: 10.10.2002
|
erstellt am: 11. Jan. 2011 20:54 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Das mit dem 3x fragen war folgendermaßen: Bei den ersten 2mal tauchte die Frage gar nicht in der aktuellen Beitragsliste des SWX-Forums auf. Erst als ich die Warnmeldung "Achtung, sie antworten auf einen Beitrag, der älter als ein Jahr ist" aus meinem Text löschte, klappte es. Ich wollte jetzt nicht drängen oder so. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 12. Jan. 2011 08:38 <-- editieren / zitieren --> Unities abgeben:
Hallo Gerd, das mit dem 3x Fragen war auch keine ernst gemeinte Kritik , ich weiß aus eigener Erfahrung, dass sowas auch im WBF leicht vor kommt. @Andreas: Danke für die Änderung . Wenn sich das auf die Zeile Set swApp = Application.SldWorks beschränkt, dann werd ich das bei Gelegenheit mal in meinen anderen Makros umbauen- obwohl ich mit CreateObject in SolidWorks-Makros noch nie Probleme hatte. Anders in externen Anwendungen, die ich mit VB6 oder VB.Net geschrieben habe, dort verwende ich immer GetObject. Ich habe mir erlaubt, meine (korrigierte) Version nochmal anzuhängen, die enthält noch die User-Form, die während des Durchlaufs die Aktivität anzeigt- damit der User weiß, dass sein Rechner was tut und nicht nur dumm rattert.
------------------ Klaus www.al-ko.com | mein Gästebuch | privat... | Nasenheim Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ad_man Mitglied freiberuflicher Entwicklungsing. (Fahrzeugtechnik, CSWP, CPPA))
Beiträge: 1378 Registriert: 20.12.2003
|
erstellt am: 12. Jan. 2011 11:18 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
Hallo Klaus, ich hatte bei meinen Makros auch keine Probleme, bis ich auf Win7 x64 umgestiegen bin. Dann bin ich auf Daniels Seite gestoßen und habe die Create-Object-Zeile in "Set swApp = Application.SldWorks" umgewandelt. Und siehe da, ab da lief es dann. Neben der genannten Zeile habe ich dann noch die Verweise entsprechend gesetzt und dann lief das Ganze. ------------------ ========== Gruß Andreas ========== Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
SteffenB Mitglied Geprüfter Konstrukteur (IHK) / Key-User
Beiträge: 268 Registriert: 10.08.2005 Intel Xeon 3,6Ghz 32GB RAM NVIDIA Quadro 2000 Windows 7 Pro / 64bit SWX 2015 SP2.1
|
erstellt am: 13. Jan. 2011 07:47 <-- editieren / zitieren --> Unities abgeben: Nur für KMassler
|
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 13. Jan. 2011 08:01 <-- editieren / zitieren --> Unities abgeben:
|