| | | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS | | | | SPS, eine Veranstaltung am 12.11.2024
|
Autor
|
Thema: Mehrere Maß-Eingabe Dialogfeld Modifizieren vereinfachen (2057 / mal gelesen)
|
4kspeed Mitglied
Beiträge: 91 Registriert: 27.10.2016
|
erstellt am: 09. Jun. 2017 14:37 <-- editieren / zitieren --> Unities abgeben:
Angenommen ich muss schnell in der Skizze (part) die 2 Maße abändern (immer nur die 2 in Kreis, siehe Skizzen-Beispiel als Anhang). Für meine Maus heißt das, Maß A navigieren und doppelklicken... danach Maß B navigieren und doppelklicken... Das ist doch zuviel Mausarbeit bzw. Mausquälerei wenn ich das jeden Tag 100 mal die gleiche Maße abändern muss (wegen Individuelle Anpassung bzw. Sonderteilanfertigung ist es immer unterschiedlich). Ich stelle mir so schneller vor z.b. mit einer Macro, ohne das man die Maus zwingend benutzen muss! Start Makro: Maß A Dialogfeld "Modifizieren" öffnet sich, nach einer Betätigung (Enter) öffnet sich dann automatisch das Maß B Dialogfeld "Modifizieren" Mit dem Makrorecorder habe ich schon versucht er erkennt das Dialogfeld nicht bzw. nimmt nicht mit auf.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ThoMay Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 5260 Registriert: 15.04.2007 SWX 2019 Windows 10 x64
|
erstellt am: 09. Jun. 2017 19:52 <-- editieren / zitieren --> Unities abgeben: Nur für 4kspeed
|
dopplerm Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 3627 Registriert: 11.02.2005 Win 10 SWX 2019 SP 5.0
|
erstellt am: 11. Jun. 2017 09:43 <-- editieren / zitieren --> Unities abgeben: Nur für 4kspeed
die Maße über Dateieigenschaften steuern dann kannst du dir einen Reiter im Property Part Builder hinterlegen und dort die Maße einfach eingeben lg Martin ------------------ ich spiel noch immer gern mit Bauklötzen, nur sind sie jetzt teurer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Heiko Soehnholz Ehrenmitglied V.I.P. h.c. Dipl.-Ing. (FH) Maschinenbau
Beiträge: 5499 Registriert: 03.07.2002 SOLIDWORKS 2001 - 2024SP3.1 Elite AE Award 2023 SOLIDWORKS Premium, Simu, Flow, Plastics, Composer, MBD, Inspection, PDMP, Visualize, TopsWorks, DPS Tools, JobBox, MacroSheet, etc. Passungstabelle von Heinz WIN10x64 22H2 | HP ZBook 17 Fury G8
|
erstellt am: 11. Jun. 2017 13:45 <-- editieren / zitieren --> Unities abgeben: Nur für 4kspeed
Dann wäre noch die Möglichkeit, die Werte über Gleichungen greifbar zu machen. Außerdem würde ich immer Instant2D (und Instant3D) verwenden. Da braucht es keine Doppelklicke, sondern nur einfache. Man muss für die Änderung auch nicht in die Skizze gehen. Und den Wert kann man so direkt in die Bemaßung schreiben, anstelle der etwas sperrigeren Dialogbox. Und zu guter Letzt wird direkt neu aufgebaut; das kann man sich also auch noch sparen... Also schon bei der Handarbeit ginge es deutlich eleganter...
------------------ Einen schönen Gruß von Heiko - www.dps-software.de - www.iknow-solidworks.de - Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bk.sc Ehrenmitglied V.I.P. h.c. Konstrukteur Sondermaschinenbau
Beiträge: 2795 Registriert: 18.07.2012 -Solid Works 2019 SP5 -Pro Engineer WF 3
|
erstellt am: 12. Jun. 2017 06:32 <-- editieren / zitieren --> Unities abgeben: Nur für 4kspeed
Als letzte Möglichkeiten gäbe es auch noch den Configurations-Publisher, hier würden die Konfigurationen erst beim einfügen in eine Baugruppe erzeugt werden, analog der Registerkarte mit steuernden Eigenschaften bzw. Bibliotheksfeature mit Wertetabelle, kannst du die Werte direkt in einem Task bzw. auf einer Property Manager Page eingeben (Auf dieser hast du nur zusätzliche Eingriffsmöglichkeiten wie Min/Max Werte, Einstellbarkeit des Inkrementes, Checkboxen, Listen usw.). Für etwas komplexere Themen, nach was sich deine ganzen Macro-Anfragen langsam anhören, gibt es in SolidWorks auch Drive-Works Express oder MacroSheet (von DPS) um Teilautomatisiert Konstruktionen zu erstellen. Gruß Bernd ------------------ --- Man muß nicht alles wissen, man muß nur wissen wo es steht --- Staatlich anerkannte Deutschniete [Diese Nachricht wurde von bk.sc am 12. Jun. 2017 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
4kspeed Mitglied
Beiträge: 91 Registriert: 27.10.2016
|
erstellt am: 12. Jun. 2017 07:42 <-- editieren / zitieren --> Unities abgeben:
Ich gehe davon aus dass die Zusatzanwendungen (Drive-Works Express, MacroSheet) was kosten? Wenn das Teil keine Skizze hat geht es so schneller...
Code: Dim swApp As ObjectDim Part As Object Dim boolstatus As Boolean Dim longstatus As Long, longwarnings As Long Sub main() Set swApp = _ Application.SldWorks Set Part = swApp.ActiveDoc ' MACRO PLAYBACK START boolstatus = Part.Extension.SelectByID2("Point1@Ursprung", "EXTSKETCHPOINT", 0, 0, 0, False, 0, Nothing, 0) Part.ClearSelection2 True Dim skSegment As Object Set skSegment = Part.SketchManager.CreateCenterLine(0#, 0#, 0#, 0#, 0.03, 0#) Part.ClearSelection2 True Set skSegment = Part.SketchManager.CreateCenterLine(0#, 0#, 0#, 0.03, 0#, 0#) Part.ClearSelection2 True ' MACRO PLAYBACK OVER Set skSegment = Part.SketchManager.CreateLine(0#, 0#, 0#, 0.063284, 0#, 0#) Part.ClearSelection2 True Set skSegment = Part.SketchManager.CreateTangentArc(0.063284, 0#, 0#, 0.085177, -0.021554, 0#, 1) Set skSegment = Part.SketchManager.CreateLine(0.085177, -0.021554, 0#, 0.089277, -0.061218, 0#) Part.SetPickMode Part.ClearSelection2 True Part.ViewZoomTo2 -1.61611937510318E-02, 4.85988914153334E-02, 0.150307013940955, 7.78075500461186E-02, -1.83461613551855E-02, 0.150307013940956 boolstatus = Part.Extension.SelectByID2("Line3", "SKETCHSEGMENT", 4.42430195924623E-02, -3.30883426689681E-04, 0.150307013940956, False, 0, Nothing, 0) Dim myDisplayDim As Object Set myDisplayDim = Part.AddDimension2(3.28216634528788E-02, 1.15634392041097E-02, 0) Part.ClearSelection2 True Dim myDimension As Object Set myDimension = Part.Parameter("D1@Skizze9") Part.ClearSelection2 True boolstatus = Part.Extension.SelectByID2("Line4", "SKETCHSEGMENT", 8.53254650978294E-02, -3.01688236810092E-02, 0.142507124019615, False, 0, Nothing, 0) boolstatus = Part.Extension.SelectByID2("Arc1", "SKETCHSEGMENT", 8.39727745751644E-02, -1.64861081643094E-02, 0.142507124019615, True, 0, Nothing, 0) Part.SketchAddConstraints "sgTANGENT" Part.ClearSelection2 True boolstatus = Part.Extension.SelectByID2("Line4", "SKETCHSEGMENT", 8.44565789923883E-02, -2.59394201139417E-02, 0.142507124019615, False, 0, Nothing, 0) Part.SketchAddConstraints "sgVERTICAL2D" Part.ViewZoomTo2 4.61100147033213E-02, -9.51016856126286E-03, 4.9999999999974E-05, 0.126351730460111, -6.70487641413558E-02, 5.00000000003758E-05 boolstatus = Part.Extension.SelectByID2("Line4", "SKETCHSEGMENT", 0.080900990714889, -3.70366786718854E-02, 5.00000000001674E-05, False, 0, Nothing, 0) Part.ViewZoomTo2 8.60823941897887E-02, -2.33093609163245E-02, 5.00000000000036E-05, 0.207979366181273, -0.102274066042883, 5.0000000000555E-05 boolstatus = Part.Extension.SelectByID2("Line4", "SKETCHSEGMENT", 8.52629175237819E-02, -4.41071245878698E-02, 5.00000000002035E-05, False, 0, Nothing, 0) Set myDisplayDim = Part.AddDimension2(9.97968369391854E-02, -4.42292583644698E-02, 0) Part.ClearSelection2 True Set myDimension = Part.Parameter("D2@Skizze3") Part.ViewZoomtofit2 End Sub
Nach dem ersten Maß-Eingabe kommt die 2. und dann ist es fertig! Aber bei einer "vorhandene Skizze" kriege ich es nicht hin, das ist mein Prob. Tabelleneingabe von Euch sind auch keine schlechte Lösung aber Ihr müsst mit der Maus arbeiten, richtig? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Heiko Soehnholz Ehrenmitglied V.I.P. h.c. Dipl.-Ing. (FH) Maschinenbau
Beiträge: 5499 Registriert: 03.07.2002 SOLIDWORKS 2001 - 2024SP3.1 Elite AE Award 2023 SOLIDWORKS Premium, Simu, Flow, Plastics, Composer, MBD, Inspection, PDMP, Visualize, TopsWorks, DPS Tools, JobBox, MacroSheet, etc. Passungstabelle von Heinz WIN10x64 22H2 | HP ZBook 17 Fury G8
|
erstellt am: 12. Jun. 2017 08:28 <-- editieren / zitieren --> Unities abgeben: Nur für 4kspeed
|
bk.sc Ehrenmitglied V.I.P. h.c. Konstrukteur Sondermaschinenbau
Beiträge: 2795 Registriert: 18.07.2012 -Solid Works 2019 SP5 -Pro Engineer WF 3
|
erstellt am: 12. Jun. 2017 11:24 <-- editieren / zitieren --> Unities abgeben: Nur für 4kspeed
Hallo, ich frage dich nochmal: Was ist dein finales Ziel, vielleicht ist ja dein Ansatz falsch bzw. zu kompliziert gedacht? Hast du dir unter anderem schonmal überlegt Inputboxen oder UserForms für die Werteingaben zu verwenden? Um Bemassungen bzw. Parameter zu ändern benötigst du das Dimension Object und hiervon die Methode SetValue3 (SetUserValueIn2 / SetSystemValue3). 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 |
4kspeed Mitglied
Beiträge: 91 Registriert: 27.10.2016
|
erstellt am: 16. Jun. 2017 08:15 <-- editieren / zitieren --> Unities abgeben:
Hallo bk.sc, danke der Nachfrage. Ganz einfach, Ziel ist es Solidworks ohne mit der Standard-Maus zu arbeiten oder wenigsten minimieren. Ich werde aber die Zusatzanwendungen die oben genannt wurden mal ausprobieren, danke. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
|