Palettenfeature in Symbolleiste (DS SolidWorks/SolidWorks)


	Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS

	Nahe an industriellen Realbedingungen
Autor	Thema: Palettenfeature in Symbolleiste (335 mal gelesen)
wismail Mitglied Konstrukteur Beiträge: 117 Registriert: 22.02.2001 SWX 2015 SPI-Modul	erstellt am: 13. Jan. 2006 11:12 <-- editieren / zitieren --> Unities abgeben: Hallo SWX-user, wir haben ein Palettenfeature, das wir sehr häufig benötigen. Jetzt hätte ich dieses gerne mit Direktzugriff in einer Symbolleiste platziert, damit ich nicht bei jedem Aufruf erst die Schalterfolge "Extras" "Featurepalette" "Ordner, wo das feature drinsteht" "Feature" klicken muss. Leider hab ich den Direktzugriff weder über Optionen, Anpassen Symbolleisten noch über das Zuweisen einer Tastenkombination noch per Macroaufzeichnung erreichen können. War auch der erste Versuch mit Macroaufzeichnung, vielleicht liegts daran. Vielleicht hat ja einer von Euch eine Idee, wie ich hierzu einen Schnellzugriff erstellen kann. Im Archiv hab ich auch nichts dazu gefunden. Gruß Frank Euch allen natürlich noch ein gutes neues Jahr 2006 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. Jan. 2006 11:33 <-- editieren / zitieren --> Unities abgeben: Nur für wismail Ich habe in der API nur das Code: Part.InsertLibraryFeature gefunden. Das fügt dir an der zuletzt gewählten Stelle das entsprechende Feature ein, du hast allerdings dabei keinen weiteren Einfluss auf das Feature (Position, Konfiguration...), das musst du alles nachträglich noch richtigstellen Code: Dim swApp As Object Dim Part As Object Sub main() Set swApp = Application.SldWorks Set Part = swApp.ActiveDoc Part.InsertLibraryFeature "Palettenfeature.SLDLFP" End Sub Füge hier statt "Palettenfeature.SLDLFP" den Namen mit Pfad deines gewünschen Features ein, dann kannst du in der Toolbar einen Knopf für dieses Makro definieren. ------------------ Klaus Danke für deinen Besuch in meinem Gästebuch! www.al-ko.de privat... ForumsChat: Schau doch mal hier rein, wenn du Zeit hast... Saga of Ryzom Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
wismail Mitglied Konstrukteur Beiträge: 117 Registriert: 22.02.2001 SWX 2015 SPI-Modul	erstellt am: 13. Jan. 2006 15:48 <-- editieren / zitieren --> Unities abgeben: Hallo Klaus, danke für Deine Antwort. Nach ein bisschen probieren hats jetzt funktioniert. Gruß Frank Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
wismail Mitglied Konstrukteur Beiträge: 117 Registriert: 22.02.2001 SWX 2015 SPI-Modul	erstellt am: 13. Jan. 2006 16:35 <-- editieren / zitieren --> Unities abgeben: Hallo Kollegen, eine Frage hätt ich noch. Ich hab das Macro jetzt soweit, dass die Skizze gleich zur Bearbeitung geöffnet ist. In dieser Skizze ist ein Text, den mann editieren muss. Kann man das Macro so umschreiben, daß das Textbearbeitungsfenster gleich aufgeht oder eine Variable mit einbauen, die beim Makrostart abgefragt und dann als Text eingefügt wird ? Dim swApp As Object Dim Part As Object Sub main() Set swApp = Application.SldWorks Set Part = swApp.ActiveDoc Part.InsertLibraryFeature "G:\000_Vorlagen\Werkzeuge\Laservorlagen KML\Lasertext .SLDLFP" boolstatus = Part.Extension.SelectByID("skizzentext", "SKETCH", 0, 0, 0, False, 0, Nothing) Part.EditSketch End Sub Im vorraus schon mal Danke Frank 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: 16. Jan. 2006 08:10 <-- editieren / zitieren --> Unities abgeben: Nur für wismail Hmm.. also das sieht jetzt schlecht aus. Vorhandenen Skizzentext per Makro zu bearbeiten, habe ich noch nicht geschafft, obwohl es dazu in der Hilfe folgendes gibt: Code: SketchText::Text ... Description This property gets or sets the text that makes up this sketch text. Syntax (OLE Automation) retval = SketchText.Text (VB Get property) SketchText.Text = Value (VB Set property) ..usw. wie gesagt, ich habs noch nicht hinbekommen, aber vielleicht hast du ja mehr Ausdauer ------------------ Klaus Danke für deinen Besuch in meinem Gästebuch! www.al-ko.de privat... ForumsChat: Schau doch mal hier rein, wenn du Zeit hast... Saga of Ryzom Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)