| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| | |
 | FMB 2025, eine Veranstaltung am 04.11.2025
|
|
Autor
|
Thema: SWX - Zeichnung - Angaben der Oberflächenbeschaffenheit per VBA auslesen (202 / mal gelesen)
|
Mssrs18
Mitglied
   Beiträge: 21
Registriert: 11.05.2022
|
erstellt am: 25. Mrz. 2025 22:27  <-- editieren / zitieren -->   Unities abgeben:          
Hallo Zusammen, ich möchte gerne per Makro die Angaben zur Oberflächenbeschaffenheit aus einer Zeichnung auslesen.
Hat das schon jemand realisiert oder Tipps zur Realisierung.
Es gibt Beispielmakros, welche leider bei der Ermittlung der Annotation enden, ich benötige aber die Werte, z. B. Ra 1,6. Vielen Dank schon mal. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
dopplerm
Ehrenmitglied V.I.P. h.c.
Konstrukteur
Beiträge: 3662
Registriert: 11.02.2005 Win 10
SWX 2019 SP 5.0
|
erstellt am: 26. Mrz. 2025 10:07 <-- editieren / zitieren --> Unities abgeben: Nur für Mssrs18 
|
Mssrs18
Mitglied
Beiträge: 21
Registriert: 11.05.2022
|
erstellt am: 26. Mrz. 2025 17:37 <-- editieren / zitieren --> Unities abgeben:
|
dopplerm
Ehrenmitglied V.I.P. h.c.
Konstrukteur
Beiträge: 3662
Registriert: 11.02.2005 Win 10
SWX 2019 SP 5.0
|
erstellt am: 26. Mrz. 2025 22:54 <-- editieren / zitieren --> Unities abgeben: Nur für Mssrs18
nter makromania oder vielleicht tauschbörse findest du die programme, aus denen du dies entnehmen kannst eines der programme, wird im forum sogar hin und wiueder aktualisiert reloaded lg martin ------------------
Das Leben ist Veränderung. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Mssrs18
Mitglied
Beiträge: 21
Registriert: 11.05.2022
|
erstellt am: 27. Mrz. 2025 07:06 <-- editieren / zitieren --> Unities abgeben:
Hallo Dopplerm, ich habs gelöst.
Ich durchlaufe in einer Schleife alle Blätter der Zeichnung.
Innerhalb der Blätter durchlaufe ich die Auflistung der Ansichten.
Und innerhalb der Ansichten hole ich mir die verwendeten Annotations (swAnn.GetType()) und prüfe dort auf "Case swAnnotationType_e.swSFSymbol". Vielen Dank für deine Bemühungen.
Gruß
Martin Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
dopplerm
Ehrenmitglied V.I.P. h.c.
Konstrukteur
Beiträge: 3662
Registriert: 11.02.2005 Win 10
SWX 2019 SP 5.0
|
erstellt am: 27. Mrz. 2025 09:35 <-- editieren / zitieren --> Unities abgeben: Nur für Mssrs18
Hallo Martin, leider konnte ich beim programmieren nicht mehr unterstützen
und mir wollte ums verrecken nicht einfallen,
mit welchem Stichwort wir den älteren Thread gefunden hätten,
aber super dass du es gefunden hast. LG Martin ------------------
Das Leben ist Veränderung. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
