Bauteil in Baugruppe einfügen (Regel) (Autodesk/Inventor VBA)


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

	PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung Meldungen abonnieren
Autor	Thema: Bauteil in Baugruppe einfügen (Regel) (3458 mal gelesen)
Rodario7 Mitglied Maschinenbautechniker Beiträge: 85 Registriert: 08.02.2013 Windows 7 64bit Inventor 2013 Visual Basic 2010 Express	erstellt am: 02. Apr. 2014 23:15 <-- editieren / zitieren --> Unities abgeben: Hallo zusammen, ich hoffe ich bin hier im richtigen Forum für mein Thema. Ich möchte folgendes machen: In Inventor 2013 eine Regel erstellen die mir folgendes bietet: 1.Abfrage ob ein Bauteil in der Baugruppe vorhanden ist. 2. Falls es vorhanden ist.... das Bauteil löschen 3. Falls es nicht vorhanden ist möchte ich es einfügen. Ich habe bisher nur den code für das ersetzen von Bauteilen gefunden (Component.Replace("Part1:1", "OtherPartfilename.ipt", True) Kann mir jemand weiterhelfen? ------------------ Gruß Klaus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer Beiträge: 9807 Registriert: 01.12.2003 AutoCAD 200x, Civil, LDD, MDT, ARD, ACA(ADT) Inventor AIP 4-11,200x WinXP, W2K	erstellt am: 02. Apr. 2014 23:28 <-- editieren / zitieren --> Unities abgeben: Nur für Rodario7 Dort wo du den REPLACE Code gefunden hast, steht doch auch ein Beispiel Code zum Hinzufügen von Bauteilen oOcc = oAsmCompDef.Occurrences.Add("C:\Temp\Part1.ipt", oMatrix) Zum Löschen gibt's hier was http://forums.autodesk.com/t5/Inventor-General/iLogic-Delete-occurence/td-p/3104770 ------------------ Mit freundlichem Gruß Udo Hübner www.CAD-Huebner.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Rodario7 Mitglied Maschinenbautechniker Beiträge: 85 Registriert: 08.02.2013 Windows 7 64bit Inventor 2013 Visual Basic 2010 Express	erstellt am: 02. Apr. 2014 23:35 <-- editieren / zitieren --> Unities abgeben: Super... das geht schon mal Und wie frage ich ab ob das Bauteil in der Baugruppe vorhanden ist? ------------------ Gruß Klaus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Rodario7 Mitglied Maschinenbautechniker Beiträge: 85 Registriert: 08.02.2013 Windows 7 64bit Inventor 2013 Visual Basic 2010 Express	erstellt am: 03. Apr. 2014 11:55 <-- editieren / zitieren --> Unities abgeben: Es wäre sehr nett wenn mir da jemand helfen könnte. Ich kann mir denken dass es eine triviale Lösung gibt, aber ich kenne sie nicht :-( ------------------ Gruß Klaus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Rodario7 Mitglied Maschinenbautechniker Beiträge: 85 Registriert: 08.02.2013 Windows 7 64bit Inventor 2013 Visual Basic 2010 Express	erstellt am: 03. Apr. 2014 14:17 <-- editieren / zitieren --> Unities abgeben: So hat sich erledigt... habs so gelöst: Code: Dim oDoc As AssemblyDocument oDoc = ThisApplication.ActiveDocument Dim oRefedDoc As Document For Each oRefedDoc In oDoc.AllReferencedDocuments If InStr(oRefedDoc.FullDocumentName, "Mein gesuchter Bauteilname") Then Component.Replace ("Mein gesuchter Bauteilname:1", "kompletter Pfad zur neuen Bauteildatei", True) End If Next ------------------ Gruß Klaus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)