| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| |
| FMB, eine Veranstaltung am 05.11.2024
|
Autor
|
Thema: Hilfe bei Macro (1004 mal gelesen)
|
Stefan67 Mitglied Maschinenbau Techniker
Beiträge: 69 Registriert: 26.11.2004 Dell M6800, 32 GB RAM, Nvidia Quadro K3100 SW2021SP5.1, DraftSight , WIN10-64
|
erstellt am: 22. Jun. 2015 15:25 <-- editieren / zitieren --> Unities abgeben:
Hallo Leute, ich versuch zur Zeit per Macro au zwei Benutzerdefinierten Eigenschaften zusätzlich eine dritte zu erzeugen. Per "Hand funktioniert es wie ich mir es vorstelle (siehe Bild), nun möchte ich es noch im Macro haben. Die Suche im Forum war bis jetzt erfolglos. Gruß Stefan Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Joshua63 Mitglied Maschinenbautechniker
Beiträge: 371 Registriert: 08.11.2006 W10 SP1 Intel i7 8700K Quatro P4000 32GB RAM SW 2021 SP4.1 SWX PDM Professional 2021
|
erstellt am: 22. Jun. 2015 16:10 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan67
Hi, kann vielleicht sein das es an den Anführungszeichen liegt --> Chr(34) Google mal, da findet sich bestimmt was...... Gruß ------------------ Viele Wege führen zum Ziel .......... und ich will alle wissen ! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
HenryV Mitglied Konstrukteur, Engineering
Beiträge: 817 Registriert: 18.05.2005 SolidWorks 2022 x64 SP5.0 Dell Precision 5820 Intel Xeon W-2125 4x4GHz NVIDIA Quadro P2000 5GB 32GB RAM 2x Dell U2412M, 24" TFT Windows 10 Enterprise x64 22H2 Microsoft 365 E5 Microsoft Visual Studio Enterprise 2022
|
erstellt am: 22. Jun. 2015 17:12 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan67
Hallo Stefan Gibt es die Eigenschaft(19) bzw. "Description" schon in deinem Dokument? Wenn nicht, musst du sie zuerst erstellen. Die "For"-Schleife muss mit einem "Next" abgeschlossen werden. "$PRP:" & Chr$(34) & "ZEICHNAME" & Chr$(34) kann man auch so schreiben "$PRP:""ZEICHNAME""", funtionieren tut aber beides. Gruss Andreas
------------------ 21 ist nur die halbe Antwort. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Stefan67 Mitglied Maschinenbau Techniker
Beiträge: 69 Registriert: 26.11.2004 Dell M6800, 32 GB RAM, Nvidia Quadro K3100 SW2021SP5.1, DraftSight , WIN10-64
|
erstellt am: 22. Jun. 2015 21:09 <-- editieren / zitieren --> Unities abgeben:
Hallo Andreas, erst mal Danke für den Zaunpfahl, das "NEXT" hab ich total übersehen. Ja die Eigenschaft "Description" wird auch in dem Macro erzeugt. Die Einbindung der Eigenschaft "ZEICHNAME" klappt jetzt, aber wie bekomm ich die zweite Eigenschaft "ZEICHNAME2" mit ca. 15 Leerzeichen noch dazu??? Grüß Stefan
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ad_man Mitglied freiberuflicher Entwicklungsing. (Fahrzeugtechnik, CSWP, CPPA))
Beiträge: 1384 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: 23. Jun. 2015 07:44 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan67
Moin Stefan, du gebrauchst eigentlich gar keine FOR-NEXT-Schleife, da diese laut deinem Screenshot nur ein einziges Mal durchlaufen wird. Du könntest es wie folgt handhaben: Code: i = 19 swModel.CustomInfo2("", Eigenschaft(i)) = "PRP:""ZEICHNAME"" & "PRP:""ZEICHNAME2""
------------------ ========== Gruß Andreas ========== [Diese Nachricht wurde von ad_man am 23. Jun. 2015 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
HenryV Mitglied Konstrukteur, Engineering
Beiträge: 817 Registriert: 18.05.2005 SolidWorks 2022 x64 SP5.0 Dell Precision 5820 Intel Xeon W-2125 4x4GHz NVIDIA Quadro P2000 5GB 32GB RAM 2x Dell U2412M, 24" TFT Windows 10 Enterprise x64 22H2 Microsoft 365 E5 Microsoft Visual Studio Enterprise 2022
|
erstellt am: 23. Jun. 2015 07:49 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan67
Hallo Stefan Leerzeichen kannst du mit dem Befehl Space() erstellen. Code: swModel.CustomInfo2("", Eigenschaft(i)) = "$PRP:" & Chr$(34) & "ZEICHNAME" & Chr$(34) & Space(15) & "$PRP:" & Chr$(34) & "ZEICHNAME2" & Chr$(34)
oder so Code: swModel.CustomInfo2("", Eigenschaft(i)) = "PRP:""ZEICHNAME""" & Space(15) & "PRP:""ZEICHNAME2"""
Gruss Andreas ------------------ 21 ist nur die halbe Antwort. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Stefan67 Mitglied Maschinenbau Techniker
Beiträge: 69 Registriert: 26.11.2004 Dell M6800, 32 GB RAM, Nvidia Quadro K3100 SW2021SP5.1, DraftSight , WIN10-64
|
erstellt am: 23. Jun. 2015 08:01 <-- editieren / zitieren --> Unities abgeben:
|