|
CATIA V5 Programmierung : Partnumber auslesen, Part abspeichern
prosper am 31.01.2005 um 20:05 Uhr (0)
Hi, das ist natürlich per Macro möglich,habe es schon mehrmals gemacht. Den code kann ich jetzt nicht ganz genau schreiben, da ich momentan kein V5 zu verfügung habe. Es ist aber notwendig im Designmode zu arbeiten, damit die andere Teile alle Informationnen mit kriegen. Aber das gibt z.B. sowas: set oprod = CATIA.ActiveDocument.product.product.item(2) sprodname = oprod.PartNumber oprod.referenceproduct.parent.saveas sprodname & .CATProduct das alte Produkt kannst du entweder per macro oder per Hand lösc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia V5 Parameter über Excel VBA steuern
prosper am 25.01.2006 um 20:23 Uhr (0)
Hallo Josef,Es liegt meiner Meinung nach nicht an einer dll.Wenn diese FehlermeldungLaufzeitfehler 429Objeterstellung durch ActiveX-Komponente nicht möglichauftaucht, heisst es für mich, dass deine "CATIA.Application" in der Windows Registry nicht sauber implementiert ist.Das Problem hatte ich auch schon. due brauchst aber Admin Rechte um den Eintrag in die Registry zu bringen.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia Befehl per Makro aufrufen?
prosper am 26.04.2005 um 19:32 Uhr (0)
Hallo, Catrin hat allerdings recht. Du kannst immer noch mit CATIA.StartCommand() probieren MfG Chris
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter und objekt löschen
prosper am 03.05.2005 um 19:03 Uhr (0)
Hallo, probier doch sowas, vielleicht funktionniert es: In diesem beispiel sagen wir, dass du ein Part offen hast in dem sich zwei Bodies (b1 und b2) befinden die du löschen möchtest. Geht natürlich mit Parameters usw genau so. Objekte in die Selection packen und Selection löschen. Sub abc() dim oobjects(1) set oobjects(0) = Catia.activedocument.part.bodies.item( b1 ) set oobjects(1) = Catia.activedocument.part.bodies.item( b2 ) set osel = CATIA.activedocument.selection osel.clear for i=0 to ubound(oobject ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Dateipfad auslesen
prosper am 27.04.2005 um 19:58 Uhr (0)
Hallo, falls nur das Part offen ist kannst du den Pfad auslesen. mit .ReferenceProduct.Parent.FullName Habe kein CATIA zu verfügung aber sowas sollte funktionnieren (falls dein CATPart dein aktives Dokument ist): set otmp = CATIA.ActiveDocument.Part Do set otmp = otmp.Parent Loop until TypeName(otmp) = PartDocument spfad = otmp.fullName Das kannst du aber im VB-Editor viel einfacher raus finden. Gruss Chris
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA hat keine Kontrolle nach Makro lauf
prosper am 26.09.2005 um 20:26 Uhr (0)
Geht sowas nicht mit:If Status "Normal" thenExit SubEnd if????
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bohrung per VBA einfügen
prosper am 26.04.2005 um 19:15 Uhr (0)
Hallo, vielleicht kann dir sowas weiterhelfen: Sub CATMain() Set osel = CATIA.ActiveDocument.Selection osel.Clear Dim afilter(0) afilter(0) = Face Set partDocument1 = CATIA.ActiveDocument Set part1 = partDocument1.Part Set shapeFactory1 = part1.ShapeFactory sstatus = osel.SelectElement(afilter, Select a Face , False) Set oref = osel.Item(1).Reference osel.EndSelectElement Set hole1 = shapeFactory1.AddNewHoleFromPoint(0, 0, 20, oref, 10) hole1.Type = catSimpleHole hole1.AnchorMode = catExtremPointHoleAnc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CreateReferenceFromName
prosper am 18.07.2005 um 20:34 Uhr (0)
Es ist aber nicht notwendig das Unterprodukt ineu zu öffnen, das funktionniert im root. Catia muss wissen in welchem Produkt "sie" die constraint erzeugen soll, und das passiert direkt im product document
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : GetCoordinates
prosper am 20.07.2005 um 19:27 Uhr (1)
Hallo Felsen,habe das Makro "on the fly" programmiert deswegen.Probiere es doch einfach mal mit:Set Datei = CATIA.FileSystem.CreateFile ("c: empoutput.csv", True)Ein folder C: emp muss es aber geben...Viel Spass!GrussProsper
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Objekt einfügen
prosper am 29.04.2005 um 19:03 Uhr (0)
Hallo, probier doch mal sowas: Dim spart(0) spart(0) = c: mpPart.CATPart CATIA.ActiveDocument.Product.Products.AddComponentsFromFiles spart, All vielleicht... Gruss Chris
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Datei in Drawing einfügen
prosper am 16.06.2005 um 19:41 Uhr (0)
Sub CATMain() Set opic = CATIA.ActiveDocument.Sheets.ActiveSheet.Views.Item(1).Pictures Set onewpic = opic.Add( C:your_pic.bmp , 100, 100) End Sub Ein Drawing muss bereits offen sein
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA Refresh
prosper am 27.04.2005 um 19:43 Uhr (1)
Hallo René,jetzt ist alles klar. Bin mal gespannt ob es im R14-CATScript immer noch so gut funktionniert als unter R12. Das ist mir nur aufgefallen, weil ich mit den Editor entwickle, die Makros werden aber später alle als CATScript ausgeführt.Danke.chris
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Durchzählen von Körpern
prosper am 17.09.2005 um 16:08 Uhr (0)
Hallo, in diesem Beispiel muss ein Part offen sein.Sub CATMainset obodies = CATIA.AtciveDocument.Part.Bodiesanzahlkoerper = 10for i = 1 to anzahlkoerper set onewbody = obodies.Add() onewbody.Name = "Welle." & inextend SubReicht dir sowas?Chris
|
| In das Form CATIA V5 Programmierung wechseln |
