| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| |
| On-Demand-Webinare zu SOLIDWORKS PDM (SOLIDWOKS PDM) |
Autor
|
Thema: VBA - alle Gewinde in der Zeichnung rot markieren (1981 mal gelesen)
|
JFuks Mitglied
Beiträge: 28 Registriert: 20.11.2012 SWX 2019
|
erstellt am: 03. Feb. 2014 18:08 <-- editieren / zitieren --> Unities abgeben:
|
nahe Ehrenmitglied
Beiträge: 1747 Registriert: 18.01.2001 arbeite mit: Dell Precision 7750 i7 2,6 GHz 6 Kerne 32GB RAM 512GB SSD NVIDIA Quadro RTX 4000 ------------------------ SWX-2020 SP5.0 EPDM ---------------- Windows 10 ---------------- VB.net VB VBA ein wenig Swift am Mac
|
erstellt am: 04. Feb. 2014 06:58 <-- editieren / zitieren --> Unities abgeben: Nur für JFuks
Hallo JFuks ich würde einen Layer Gewinde erzeugen und dann allen Gewinden diesen Layer zuordnen. Um die Gewinde "abzugreifen" gibt es ein Beispiel in der API-Online-Hilfe. Such mal nach "Get Cosmetic Threads Annotations and Any Patterns Example (VBA)" ------------------ Grüße Heinz [Diese Nachricht wurde von nahe am 04. Feb. 2014 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Torsten Niemeier Ehrenmitglied V.I.P. h.c. Maschinenbau Ingenieur
Beiträge: 3682 Registriert: 21.06.2001 "ZUSE I.36", 8 BIT, 32 Lämpchen, Service-Ölkännchen "ESSO-Super", Software: AO auf Kuhlmann-Parallelogramm-Plattform ** CSWP 04/2011 ** ** CSWE 08/2011 **
|
erstellt am: 04. Feb. 2014 19:04 <-- editieren / zitieren --> Unities abgeben: Nur für JFuks
|
formi Mitglied Virtuell Optimization Engineer
Beiträge: 626 Registriert: 18.04.2007
|
erstellt am: 04. Feb. 2014 19:17 <-- editieren / zitieren --> Unities abgeben: Nur für JFuks
Hallo! Eine Variante, die vielleicht noch viel einfacher und On Board ist: - In der Zeichnung einen Layer Gewinde mit Farbe Rot erstellen - Im Auswahlfilter Gewindedarstellungen aktivieren - Strg+A drücken - Aktivierte Gewinde in den Layer verschieben
Die Gewinde werden in allen Ansichten (Draufsicht, Seitenansicht und Schnitten) erkannt, sowohl jene mit dem Bohrungsfeature als auch selbst erzeugte Gewindedarstellungen funktioniert eigentlich perfekt. Daher: Layer + Auswahlfilter + Strg+A + Verschieben = VERY EASY AND FAST HTH Formi
------------------ RX Benchmark Overall: Office: 106 Home: 182 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
JFuks Mitglied
Beiträge: 28 Registriert: 20.11.2012 SWX 2019
|
erstellt am: 05. Feb. 2014 07:52 <-- editieren / zitieren --> Unities abgeben:
|
JFuks Mitglied
Beiträge: 28 Registriert: 20.11.2012 SWX 2019
|
erstellt am: 07. Feb. 2014 10:06 <-- editieren / zitieren --> Unities abgeben:
Hallo Torsten Niemeier in dem link ist sehr gutes Beispiel, dankeschön. Weisst du, ob das gleiche, was du in der Zeichnung gezeigt hast auch im Model möglich ist? Hast du dazu evtl. auch ein Beispiel? Dankeschön. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |