| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: einfaches Macro starten (1628 mal gelesen)
|
Speedy.X Mitglied Dipl.Ing.
Beiträge: 45 Registriert: 17.05.2005
|
erstellt am: 17. Mrz. 2006 11:24 <-- editieren / zitieren --> Unities abgeben:
Hallo hilfreiches Forum! Ich möchte in einem einfachen Inventor10-Assemblydocument ein einfaches Macro per Knopf starten. Leider kriege ich das trotz Versuchen und Suchen und RTFM nicht hin. Einfache Struktur: ASM1.IAM -> Modul Test -> SUB ASM01() Es gibt überall Hinweise für neue Leisten, Einbindung AddIns, Icons. Aber ich finde nichts wie man ein einfaches Macro wirklich startet. Gut, bin kein Programmierer, auch ungeübt mit Inventor-VBA. Vielleicht suche ich auch nicht nach den richtigen Begriffen oder kenne den wirklich hilfreichen Link nicht. Aber dieses Problem sollte doch schon mehrfach gelöst worden sein. Nun hifreiches Forum, gibt es eine Chance?
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
stefela Mitglied Konstrukteur
Beiträge: 129 Registriert: 24.11.2003 Inventor 10
|
erstellt am: 17. Mrz. 2006 11:53 <-- editieren / zitieren --> Unities abgeben: Nur für Speedy.X
Hallo Speedy.X, du mußt z.B. das Programm in dein Default.ivb hineinschreiben (siehe Extras -> Anwendungsoptionen -> Datei). Direkt im Teil oder in der Baugruppe funktioniert nicht. Danach einfach in Inventor auf die Symbolleiste gehen -> RMT -> Anpassen -> Bei Makros das entsprechende Makro auswählen. Herzlichen Gruß Stefela Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Speedy.X Mitglied Dipl.Ing.
Beiträge: 45 Registriert: 17.05.2005
|
erstellt am: 21. Mrz. 2006 13:53 <-- editieren / zitieren --> Unities abgeben:
Hallo Stefela, ich hab's so gemacht, wie Du es beschrieben hast. Danke! Verstehe bloß nicht warum man in ein AsmDoc Code unterbringen kann und den nur mühsam starten kann. Na vielleicht spielt die Logik dazu in einer anderen Liga. Selbst ein indirekter Aufruf vom Default.ivb in mein AsmDoc funktioniert nicht. Jedenfalls funktioniert Deine Methode stabil und sicher. Gruß Rainer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
stefela Mitglied Konstrukteur
Beiträge: 129 Registriert: 24.11.2003 Inventor 10
|
erstellt am: 21. Mrz. 2006 14:16 <-- editieren / zitieren --> Unities abgeben: Nur für Speedy.X
|
rtend12 Mitglied Dipl.-Ing. (FH) Maschinenbau / Konstrukteur
Beiträge: 436 Registriert: 21.07.2004 Catia V5 (R16SP5, B18SP5) VB.Net 2003
|
erstellt am: 22. Mrz. 2006 21:17 <-- editieren / zitieren --> Unities abgeben: Nur für Speedy.X
Hallo, hab das mit der default.ivb am Anfang auch nicht so ganz verstanden, aber mit der Zeit lernt man die Vorzüge kennen. - die Makros sind in allen Dateien verfügbar, nicht nur in der du Sie reingeschrieben hast. - den Buttons können Icons mitgegeben werden - die Buttons haben einen ToolTip, ok es ist nur der Name des Moduls aber immerhin - eine Aktualisierung des makros muß nicht xx-mal gemacht werden sondern nur einmal in der .ivb Gruß Reinhard Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
P164 Mitglied
Beiträge: 39 Registriert: 03.06.2004
|
erstellt am: 27. Mrz. 2006 11:31 <-- editieren / zitieren --> Unities abgeben: Nur für Speedy.X
hallo kopiere nachfolgenden Code in ein Modul im AnwendungsProjekt dann erscehein unter Menü Extras-Anpassen-Befehle-Makros das Makro Ingolf123. Dies kannst Du in die Menüleiste Deiner Wahl schieben. Mit dem nachfogenden Code kannst Du Proceduren die in einem Dokumentenprojekt abgelegt sind starten Public Sub Ingolf123() Dim idAsm As Inventor.AssemblyDocument Set idAsm = ThisApplication.ActiveDocument Dim idPjc As InventorVBAProject Set idPjc = idAsm.VBAProject Dim idPjcComS As InventorVBAComponents Set idPjcComS = idPjc.InventorVBAComponents Dim idComSCom As InventorVBAComponent ' Set idComSCom = idPjcComS.Item(3) ' als ItemNr ' oder gleich als Name Set idComSCom = idPjcComS.Item("ThisDocument") Dim idComMemS As InventorVBAMembers Set idComMemS = idComSCom.InventorVBAMembers Dim idMemSMem As InventorVBAMember ' Set idMemSMem = idComMemS.Item(1) ' erste Procedur als Item ' oder gleich als Name Set idMemSMem = idComMemS.Item("idee123") idMemSMem.Execute ' Aufruf der Procedur End Sub
------------------ das Leben ist schön, meint Ingolf Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
rtend12 Mitglied Dipl.-Ing. (FH) Maschinenbau / Konstrukteur
Beiträge: 436 Registriert: 21.07.2004 Catia V5 (R16SP5, B18SP5) VB.Net 2003
|
erstellt am: 27. Mrz. 2006 23:10 <-- editieren / zitieren --> Unities abgeben: Nur für Speedy.X
Hallo P164, ich versteh den Sinn dahinter nicht ganz. Du schreibst ein makro ins Anwendungsprojekt, das ja die default.ivb ist, um ein Makro in einem Dokument auszuführen. Nimm doch das Makro aus dem Dokument und schreib das Makro selbst in das Anwendungsprojekt. Das Makro kannst du dann auch in eine Menüleiste schieben und es steht dir in allen Dokumenten zur Verfügung. Gruß Reinhard Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Speedy.X Mitglied Dipl.Ing.
Beiträge: 45 Registriert: 17.05.2005
|
erstellt am: 29. Mrz. 2006 11:36 <-- editieren / zitieren --> Unities abgeben:
Hallo P164, Danke für Deine Idee. Wollte Inventor auch in der Richtung verbiegen. Hab's nicht hinbekommen. Werde das auf alle Fälle beim nächsten Projekt ausprobieren. So kann die verschiedenen Projekte doch unter einen Hut bekommen. Danke! Gruß Rainer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |