|
Inventor VBA : Abgeleitete Komponente
isensa am 02.03.2007 um 16:52 Uhr (0)
Hallo LeuteAus einem IAM erstelle ich ein ipt (abgeleitete Komponente ohne VBA). Kann ich über VBA Farbstiel der Element ergänzen und zwar alle Teile vom Hauptkörper iam synchronisieren.Unter Suchen habe ich ein paar Code gefunden (Material ergänzen), nur das ergänzen im ipt aller Einzelteile geht nicht.Besten Dank für eure HilfemfgSascha
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Abgeleitete Komponente
isensa am 07.03.2007 um 21:41 Uhr (0)
Hallo daywa1k3rHast du keinen Tipp für mein Problem?Gruss Sascha
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Abgeleitete Komponente
isensa am 05.03.2007 um 12:15 Uhr (0)
Hallo ZusammenIst es immer noch verwirrend.Oder gibt es keine Lösung für dieses Problem.mfgSascha
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Abgeleitete Komponente
isensa am 04.03.2007 um 14:06 Uhr (0)
Hallo ZusammenDie Materialfarbe bekomme ich aus dem iam.Nur aus der Abgeleiteten Komponente(ipt) habe ich keine Ahnung.Code:Sub Materialfarbe()Dim artikel(80, 80) As StringDim i, j As IntegerDim pfad As StringDim oDoc As Inventor.DocumentSet oDoc = ThisApplication.ActiveDocument*** Verknüpfung suchen For i = 1 To oDoc.ReferencedFiles.Count pfad = oDoc.ReferencedFiles(i).FullFileName Next i *** Baugruppe (iam) öffnenDim oAsmDoc As AssemblyDocumentSet oAsmDoc = ThisApplication.Documents.Open( ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Abgeleitete Komponente
isensa am 03.03.2007 um 13:50 Uhr (0)
Hallo IgorEs ist immer schwierig das ganze in Worte zu verfassen. Daher habe ich ein Film beigelegt.Im ipt muss nur die Farbe geändert werden und zwar die gleiche wie im iam.Geht das?Gruss Sascha
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Abgeleitete Komponente
isensa am 29.03.2007 um 11:08 Uhr (0)
Hallo zusammenSeit Tagen Versuche die Materialfarbe auszulesen und auch zu ändern.Aber nichts geht und mit Google finde ich auch keine Lösung.Geht das nur über VB?
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Abgeleitete Komponente
isensa am 05.03.2007 um 07:40 Uhr (0)
Hallo ZusammenBrowserbaum kann ich Darstellen. Die einzelne Bauteile bekomme ich.Wie kann ich die Materialfarbe zuweisen?Code:Call oAsmDoc.Close(False)*** BrowserbaumDim ThePane As BrowserPaneDim name As StringSet ThePane = odoc.BrowserPanes("PmDefault")Dim temp As StringDim oTopNode As BrowserNodeSet oTopNode = ThePane.TopNodeDim Node As BrowserNode For Each Node In oTopNode.BrowserNodes temp = Node.BrowserNodeDefinition.Label If Right(temp, 3) = "iam" Or Right(temp, 3) = "ipt" Then name = No ...
|
| In das Form Inventor VBA wechseln |