|
CATIA V5 Programmierung : Update aller Inertia
shoutz000 am 27.05.2015 um 07:54 Uhr (1)
Servus ob man die Measure unterscheiden kann weiß ich nicht,aber die Measure lassen sich so selektieren und updaten:Code:Sub CATMain() Set oSel = CATIA.ActiveDocument.Selection oSel.Search "CATDMUSearchInformation.DMUMeasureType,all" Catia.StartCommand "MeasureForceUpdate"End Sub
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selection mit Relation
shoutz000 am 10.07.2014 um 07:20 Uhr (1)
Danke für die schnelle Antwort.Aber irgendwie produzier ich nur Blödsinn...Ich habe das "GetNameToUseInRelation" in zig verschiedenen Varianten versucht aber entweder kommen Fehlermeldungen oder das Makro läuft durch ohne den Parameter mit dem selektierten Maß zu verknüpfen oO Dim partDocument1 As Document Set partDocument1 = CATIA.ActiveDocument Dim part1 As Part Set part1 = partDocument1.Part Dim sStatus As String Dim Selection As Object Set Selection = partDocument1.Selection Selection.Clear R ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Nicht geladene Elemente löschen
shoutz000 am 29.05.2015 um 09:07 Uhr (1)
Ok ich bin weiter xDCode:Sub CATMain() Set oDoc = CATIA.ActiveDocument Set oSel = oDoc.Selection oSel.Search "(CATProductSearch.Part),all" DocCount = oSel.Count SketchCount = oSel.Count For i = 1 To DocCount ReDim Preserve PartArray(i) Set PartArray(i) = oSel.Item(i).Value Next For i = 1 To DocCount Set Part = PartArray(i) Next oSel.Search "(CATPrtSearch.Sketch),sel" For n = 1 To SketchCount ReDim Preserve SketchArray(n) Set SketchArray(n) = oSel.Item(n).Value ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Nicht geladene Elemente löschen
shoutz000 am 01.06.2015 um 06:57 Uhr (1)
Also ich habe jetzt des ganze We mit dem Editor rumgemacht undversucht mich da mal rein zu arbeiten. Die Hilfe mit der Arrayist nur teilweiße aufschlussreich...In einander verschachteln parts in array dann ein part raus dann sketchesin die nächste array usw... ich versuchs zwar aber wirklich weiter gekommenbin ich mit dem editor trotzdem nicht... So der aktuelle Stand:Bei Fett gibts jeweils Fehler?!Code: Public PartArray() Public SketchArray()Sub CATMain() Set oDoc = CATIA.ActiveDocument Set oSel = oDo ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selection mit Relation
shoutz000 am 10.07.2014 um 16:50 Uhr (1)
Frage gelöscht da selber eine Lösung gefunden![Diese Nachricht wurde von shoutz000 am 10. Jul. 2014 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selection mit Relation
shoutz000 am 10.07.2014 um 11:45 Uhr (1)
Juhuuuu das war es xDHammer vielen Dank.Ich habe gerade leider kaum Zeit.Sobald ich daran weiterarbeite schreib ich hier noch weil es kommen bestimmt noch Probleme ;-)Aber vielen Dank jetzt schoneinmal.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Stückliste Makro
shoutz000 am 12.09.2013 um 17:22 Uhr (1)
Hey super also funktionieren tut es auch recht schnell,habs mir kurz angeschaut und habs durchlaufen lassen, weil ich bin grad auch leider voll eingespannt.2 Probleme gibt es noch.1: Wenn ein UnterProduct mehrmals vorhanden ist listet er es auch so oft aufz.B Product 1 4* Part 1 Product 1 4* Part 1Soll aber eig so sein: 2* Product 1 4* Part 1geht das irgendwie?!2: Fast immer macht er zwischen zwei Funden 3 leere Zeilen rein (daher wird es eineunheimlich lange Tabelle da nur 1/3 der Zeilen gefüllt ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Nicht geladene Elemente löschen
shoutz000 am 29.05.2015 um 10:48 Uhr (1)
Zu den ungeladenen Elementen. Also ich bekomm jetzt die Anzahl dieserElemente ausgegeben, aber wie lösche ich diese?Code:Sub CATMain() Set oDoc = CATIA.ActiveDocument Set oSel = oDoc.Selection Set oDelete = oDoc.Product.Products oSel.Search "(CATProductSearch.Product),all" For i = oSel.Count To 1 Step -1 Set oElement = oSel.Item2(i).Value On Error Resume Next If oElement.PartNumber=IsError Then oDelete.Add i End If On Error GoTo 0 Next oSel.Clear MsgBox oDelete.CountEnd Sub
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selection mit Relation
shoutz000 am 11.07.2014 um 17:08 Uhr (1)
Weil die bei uns nicht genutzt wird, wir aber sehr oft Probleme mit der Aktuallität der Brennteile haben. Parametrisch aufbauen tut sie bei uns aber auch keiner. Deswegen das Makro.Die Parameter werden ja mit den selectierten Maßen befüllt.Die Formeln werden an die zwei Parameter weitergegeben, welche auf die befüllten Parameter zurückgreifen und das Ergebnis ermitteln.Dieses Ergebnis des Parameters "Abwicklung" will ich nun an das Maß in dem Sketcher des Brennteils weitergeben (Damit das Maß im Sketcher v ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Nicht geladene Elemente löschen
shoutz000 am 27.05.2015 um 21:14 Uhr (1)
Mein Makro läuft unter CatScript. So funktioniert es auch:Code:Sub CATMain()Set oDoc = CATIA.ActiveDocumentSet oSel = oDoc.Selection oSel.Search "(CATProductSearch.Product),all" For i = oSel.Count To 1 Step -1 Set oElement = oSel.Item2(i).Value On Error Resume Next If oElement.PartNumber=IsError Then oSel.Remove i End If On Error GoTo 0 NextMsgBox oSel.CountEnd SubAber so sind jetzt alle Elemente selektiert welche in Ordnung sind. [Diese Nachricht wurde von shoutz000 am 27. Mai. 2015 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Nicht geladene Elemente löschen
shoutz000 am 28.05.2015 um 11:10 Uhr (1)
Bin gerade an den Zeichnungen dran und komm nicht weiter...Hab mal des zusammengestümpert :-PMeckert die ganze Zeit rum das der Index i falsch gewählt wurde...er muss zwischen 0 und 1 liegen. Liegt an der -1 aber ohn (-)werden die Skizzen nur selektiert und mehr nicht?!Code:Sub CATMain()Set oDoc = CATIA.ActiveDocumentSet oSel = oDoc.Selection oSel.Search "CATPrtSearch.Sketch,all" For i = oSel.Count To 1 Step -1 Set oSketch = oSel.Item2(i).Value oSel.Delete Set oDocSel = oSel.Item2(i).Document ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Nicht geladene Elemente löschen
shoutz000 am 28.05.2015 um 21:50 Uhr (1)
Ich kenn mich mit beidem nicht aus und habe jetzt mal die Collectionversucht. Aber anscheinend ist die nicht definiert... Finde zu beidemaber nicht wirklich etwas hilfreiches...Code:Sub CATMain()Set oDoc = CATIA.ActiveDocument Set oList = New Collection Set oProd = oDoc.Product.Products For Each Sketch in oProd oList.Add Sketch next Set oSel = oDoc.Selection oSel.clear for i = 1 to oList.Count oSel.Add oProd.Item(oList.Item(i)) oSel.Delete If oProd.IsUpToDate=Tru Then CATIA.StartCommand "Un ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selection mit Relation
shoutz000 am 10.07.2014 um 13:11 Uhr (1)
Ok also 2 Probleme habe ich auf die Schnelle gefunden :-(1) Gibt es eine Möglichkeit alle Dimensions sichtbar zu machen?(so wie wenn man eine Formel erstellt und auf ein Skizze etc klickt, dann werden einem ja alle Dimensions angezeigt) Weil ich benötige die Blechdicke für die Formal allerdings kann man die im Strukturbaum nicht selectieren?!2) Das Makro funktioniert so wunderbar für ein Blechteil mit einer Biegestelle. Aber wenn es mehrere sind geben die Formeln Blödsinn aus, da alle Parameter gleich heiß ...
|
| In das Form CATIA V5 Programmierung wechseln |
