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

Autor

Thema: Bauteil in Baugruppe einfügen (Regel) (3269 mal gelesen)

Rodario7
Mitglied
Maschinenbautechniker

Senden Sie eine Private Message an Rodario7

Schreiben Sie einen Gästebucheintrag für Rodario7

Beiträge: 85
Registriert: 08.02.2013

Windows 7 64bit
Inventor 2013
Visual Basic 2010 Express

erstellt am: 02. Apr. 2014 23:15

Editieren oder löschen Sie diesen Beitrag!

<-- 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

Senden Sie eine Private Message an CAD-Huebner

Schreiben Sie einen Gästebucheintrag für CAD-Huebner

Beiträge: 9732
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

Integration (Electronic and Mechanical) Design Engineer (f/m/d)
Location: Regensburg We are seeking an Integration (Electronic and Mechanical) Design Engineer (f/m/d) with a strong background in designing medium voltage power electronics converters. You will work on the mechanical design and development of innovative and reliable converter solutions, while collaborating closely with cross-functional teams of electrical and software engineers....
*Anzeige ansehen*	Elektrotechnik, Elektronik

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 >>)