|
CATIA V5 Programmierung : Product mit allen Unterprodukten / Unterparts speichern
Proofin am 12.10.2006 um 13:40 Uhr (0)
Hi Conrad,versuch es mal mit:Set myDoc =CATIA.ActiveDocumentSet subProducts=myDoc.Product.ProductsFor i=1 To subProducts.Count Set subProduct=subProducts.Item(i) set subProductDoc = subProduct.ReferenzProduct.Parent call subProductDoc.SaveAs("SpeicherPfad" & subproductDoc.Name)Next iMfgProofin[Diese Nachricht wurde von Proofin am 12. Okt. 2006 editiert.][Diese Nachricht wurde von Proofin am 12. Okt. 2006 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : drawing isolate via vba makro
Proofin am 09.03.2007 um 09:43 Uhr (0)
Hi toyo,im not sure but i think this is what you mean:----------------------- Code----------------------- Dim oDoc As Document Set oDoc = CATIA.ActiveDocument Dim oSheet As DrawingSheet Set oSheet = oDoc.Sheets.Item(1) oSheet.Isolate----------------------- Code-----------------------regards Proofin
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameterübergabe in Prozedur wie?
Proofin am 04.04.2007 um 11:20 Uhr (0)
Ok, der String bringt dir aber nichts es sein denn du willst in ausgeben.Ich bin nicht ganz sicher, ob ich richtig verstanden hab was du vor hast.Aber ich würde das Rekrusiv versuchen aus zulesen.In etwas so:---------------------------------------------Code---------------------------------------------Sub main()Call f_Daten_auslesen_2(CATIA.ActiveDocument.Product.Products)End SubSub f_Daten_auslesen_2(ByVal oProducts As Products) Dim ii As Integer zählt alle ausgaben Static zaehler As Integer alle Produk ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Polylinien Makro
Proofin am 18.01.2008 um 15:02 Uhr (0)
Hi nreim1,Willkommen im Forum.OHNE es getestet zu haben würde ich folgendes machen:Code:Language="VBSCRIPT"Sub CATMain()Set partDocument1 = CATIA.ActiveDocumentSet part1 = partDocument1.PartSet hybridShapeFactory1 = part1.HybridShapeFactorySet hybridShapePolyline1 = hybridShapeFactory1.AddNewPolyline()Set hybridBodies1 = part1.HybridBodiesSet hybridBody1 = hybridBodies1.Item("POINTS")Set hybridShapes1 = hybridBody1.HybridShapes PUNKT 1 Wird hinzugefügtDim PUNKTFor PUNKT = 1 To hybridShapes1.Count Set ref = ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Save As auf Produktstruktur kurze frage
Proofin am 15.02.2008 um 13:55 Uhr (0)
Moin Nico,meine Frage wäre was änderts du mit deinem Rename Makro??Die PartNumber?Hab deine Methoden mal etwas angepasst und hoffe das sie jetzt tut was sie soll.Code:Sub CATmain()CATIA.DisplayFileAlerts = FalseDim myproduct As Productdim Doc as documentSet myproduct = CATIA.ActiveDocument.Productset Doc = myproduct.referenceproduct.parent Enter Absolute Savepath hereDim bsppath As Stringbsppath = "G:exchangeTEST-DIE_MACRONeuer Ort"Dim Abssavepath As StringAbssavepath = InputBox("Please enter the Absolute ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Pfad der geöffneten Datei übergeben
Proofin am 26.10.2006 um 13:08 Uhr (0)
Hi Martin,es scheint das Catia bei dfx Dateien keinen Pfad angibt!Also ich habe bis jetzt noch keine Möglichkeit gefunden den Pfad ausfindig zu machen.GrußProofin
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Weitere VB Befehle bzw. Objekte zu Catia V5
Proofin am 16.12.2005 um 12:03 Uhr (0)
Hi PSchlebes,es gibt eine Datei im CATIA Installationsverzeichnis die heißt V5Automation.chm dort sind (fast) alle Befehle aufgeführt.MfgProofin
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : AddNewAssemble
Proofin am 04.09.2006 um 11:53 Uhr (0)
Hi JPF,soweit ich die Catia Hilfe richtig verstanden habe funktionieren die Boolschen Operationen nur mit Körpern. Dies sieht man auch wenn man das mal interaktiv versucht. Catia selektiert sofort den Körper und nicht die Welle.MfgProofin
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Länge von Kante in Draft messen-HILFE
Proofin am 11.09.2006 um 10:05 Uhr (0)
Hallo Sr.Hermsergänze dein Skript mal wie folgt:Dim MySelection as ObjectSet MySelection = CATIA.ActiveDocument.Selection- ErgänzungDim Ref1 as Referenceset Ref1 = MySelection.Item(1).Value----Dim TheSPAWorkbench As SPAWorkbenchDim TheMeasurable As MeasurableSet TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench")- ErgänzungSet TheMeasurable = TheSPAWorkbench.GetMeasurable(Ref1) ----hier bricht das makro ab---Dim dLength as DoubledLength = TheMeasurable.LengthMfgProofin
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Kante selektieren-aber wie damit weiterarbeiten
Proofin am 14.09.2006 um 11:10 Uhr (0)
Ja schreib statt Dim TheMeasurable As Measurablelieber Dim TheMeasurablemit der Deklaration hat Catia manchmal Probleme.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Kante selektieren-aber wie damit weiterarbeiten
Proofin am 14.09.2006 um 11:31 Uhr (0)
Ich sehe keinen Unterschied zu meinem Code: Dim SpaWB As SPAWorkbench Dim Meas As Measurable Call oSel.Clear sFilter(0) = "Edge" Call oSel.SelectElement2(sFilter, "Test", False) Set oRef = oSel.Item(1).Value Set SpaWB = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench") Set Meas = SpaWB.GetMeasurable(oRef) dLen = Meas.Lengthund bei mir funktioniert soweit alles.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Kante selektieren-aber wie damit weiterarbeiten
Proofin am 14.09.2006 um 13:20 Uhr (0)
Ich habe deinen Code mal bei mir ausprobiert und etwas verändert:was du nicht machen solltes ist 2 Selektion anlegen, immer nur eine und diese immer wieder leeren.Ich persönlich würde in einer Schleife keine Variablen deklarieren, immer vor der Schleife. Sub CATMain() Dim partDocument1 As Document Set partDocument1 = CATIA.ActiveDocument Dim part1 As Part Set part1 = partDocument1.Part Dim hybridShapeFactory1 As Factory Set hybridShapeFactory1 = part1.HybridShapeFactory Dim HB As HybridBody Set HB = part1. ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Kante selektieren-aber wie damit weiterarbeiten
Proofin am 14.09.2006 um 13:45 Uhr (0)
Mit welchem Catia Release arbeites du eigentlich?
|
| In das Form CATIA V5 Programmierung wechseln |
