|
CATIA V5 Programmierung : Automatisieren Zeichnungen aktualisieren
CTenschert am 09.03.2005 um 13:26 Uhr (0)
ich bin Anfänger was Catia-Programmierung angbelangt kenne mich aber mit Access-VBA einigermassen aus. Geht eigentlich einfach, Zeichne einfach die Arbeitsschritte auf (Tools/Makro/Makroaufzeichnung starten), und Passe dann den Code an. Habe ich eine Chance folgendes zu programmieren: -Öffnen einer IGES-Datei Müssen nur als *.ig2 geladen (Importiert) werden -Selektieren aller Texte Geht mit der Select Funktion. (kannst Du aufzeichnen) Makro Aufzeichen, auf Suchen gehen (Bearbeiten/Suchen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Automatisieren Zeichnungen aktualisieren
CTenschert am 10.03.2005 um 12:02 Uhr (0)
Hallo, Habe Aufgezeichnet, und dann wie oben beschrieben die Visproperty eingebaut. Im VBA Editor ist es möglich mit F1 Hilfe zu Methoden, Functionen zu bekommen. Guter Einstieg ist natürlich auch die Inofficielle Hilfeseite catia.cad.de, dort liegen ein paar Makros, ansonsten COE auf Englich . ############# VBA Beispiel ################ ################################################################### # Programmiert von: Carl Tenschert carl.tenschert(at)fh-koeln.de # # Programmiert für: Forum C ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : SaveAs ohne User Interaktion programmieren
Steffen Hohmann am 21.04.2005 um 08:14 Uhr (0)
Hallo Kangaroo, wenn nachfolgende Anweisung vor dem SaveAs eingefügt wird, sollten eigentlich alle Meldungen unterbunden werden. CATIA.DisplayFileAlerts = False Gruß Steffen
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Verzweifelte INPUTBOX
serrano am 14.09.2006 um 15:07 Uhr (0)
Hallo,Villeicht kann ich dir helfen. Ich habe CATIA nicht da und kann es leider nicht ausprobieren.Nach der Inputbox:If oString = "" ThenGoTo oEndeEnd If...CODE...oEnde:End Submit GoTo oEnde springst du wo du willst wenn der String Leer ist.Hoffentlich könnte ich dir helfen. Wenn nicht, dann habe ich es mindestens versucht. ------------------mfg,serrano
|
| In das Form CATIA V5 Programmierung wechseln |
|
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 : Parameterwerte in VB einlesen
k71 am 16.10.2006 um 13:27 Uhr (0)
Hallo Jan,wie gesagt mit UserForms hab ich bis dato nicht gearbeitet.Ich hab einfach mal eine Userform kreirt mit einem Eingabefeld und einer Schaltfläche:Private Sub CommandButton1_Click()Set part1 = CATIA.ActiveDocument.PartSet Param = part1.Parameters.RootParameterSet.DirectParametersEingabe1 = TextBox1Param.Item("Breite").Value = Eingabe1part1.UpdateEnd SubDas Problem ist, daß die Änderung am Parameter "Breite" erst nach Beendigung der Userform übernommen werden.Aber vielleicht hat hierzu ja jemand noc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Edit Back ground
Lusilnie am 20.10.2006 um 10:09 Uhr (0)
Hallo leipziger,hilft Dir dies:Code:Option ExplicitLanguage = "VBSCRIPT"Sub CATMain() Dim drawingDocument1 As drawingDocument Set drawingDocument1 = CATIA.ActiveDocument Dim drawingSheets1 As drawingSheets Set drawingSheets1 = drawingDocument1.Sheets Dim drawingSheet1 As drawingSheet Set drawingSheet1 = drawingSheets1.ActiveSheet If drawingSheet1.Views.ActiveView.name = drawingSheet1.Views.Item(2).name Then drawingSheet1.Views.Item(1).Activate Else drawingSheet1.Views.Item(2).Activate End If ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Lusilnie am 25.10.2006 um 22:14 Uhr (0)
Hallo Hokay,nach meiner Meinung funktioniert das mit der Textbreite nur für Texte, nicht für eine Selektion!Es müßte also etwa so lauten (ungetestet, da CATIA gerade nicht vorhanden!):Code:Dim K as IntegerFor K = 1 to selection1.count selection1.Item(K).Value.visProperties.SetParameterOnsubString catCharSpacing,0,0,70Next( Oder ohne ".Value" ?)mfg,Lusilnie------------------Alle Aussagen zu DassaultSystemes-Produkten sind sehr optimistisch, selbst diese!!!frei nach größeren Geistern
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Lusilnie am 25.10.2006 um 22:14 Uhr (0)
Hallo Hokay,nach meiner Meinung funktioniert das mit der Textbreite nur für Texte, nicht für eine Selektion!Es müßte also etwa so lauten (ungetestet, da CATIA gerade nicht vorhanden!):Code:Dim K as IntegerFor K = 1 to selection1.count selection1.Item(K).Value.visProperties.SetParameterOnsubString catCharSpacing,0,0,70Next( Oder ohne ".Value" ?)mfg,Lusilnie------------------Alle Aussagen zu DassaultSystemes-Produkten sind sehr optimistisch, selbst diese!!!frei nach größeren Geistern
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Lusilnie am 25.10.2006 um 22:14 Uhr (0)
Hallo Hokay,nach meiner Meinung funktioniert das mit der Textbreite nur für Texte, nicht für eine Selektion!Es müßte also etwa so lauten (ungetestet, da CATIA gerade nicht vorhanden!):Code:Dim K as IntegerFor K = 1 to selection1.count selection1.Item(K).Value.visProperties.SetParameterOnsubString catCharSpacing,0,0,70Next( Oder ohne ".Value" ?)mfg,Lusilnie------------------Alle Aussagen zu DassaultSystemes-Produkten sind sehr optimistisch, selbst diese!!!frei nach größeren Geistern
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia Stückliste aus VB bearbeiten
Heini_K am 02.11.2006 um 15:32 Uhr (0)
Hallo Crinuy,Also die BOM (Bill of Materials) kann man mit der Methode "ExtractBOM" des Objekts Product exportieren. Anbei ein Beispiel zum Export der BOM des Rootproducts als .txt-File:---------------------------------------Sub CATMain()Dim MyProduct As ProductSet MyProduct = CATIA.ActiveDocument.ProductDim catFileTypeText As CatFileTypeMyProduct.ExtractBOM catFileTypeText , "C:TestBOM.txt" ---bzw. bei Unix als Pfadz.B. "/home/CATIA/macros/Schreibtest/BOM.txt"End Sub--------------------------------------- ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Nur sichtbare Flächen
tomtom1972 am 13.12.2006 um 10:22 Uhr (0)
Moin,das ganze geht so:-cgr erzeugen. Der cgr ist eine Hüllkurve, enthält also nur die aussenliegenden Flächen. Jene, welche du behalten möchtest.-Jetzt willst du aber die "echten" Flächen behalten, nicht den cgr. Daher dient der cgr nur zum Abgleich (da er die Info enthält, was eine aussenliegende Fläche ist)-Der Abgleich läuft über einen Clash (eine Kollisionsuntersuchung) zwischen dem cgr und allen restlichen Modellen.-Der Clash erzeugt (wenn er vom Typ catConflictTypeClash ist) Conflicts (also Konflikt ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : part and drawing open with a macro
listing_code am 07.03.2007 um 16:33 Uhr (0)
Hi,I hope I could understand your problem!try with this:---------------------------------------------------------------------Set doc1 = CATIA.DocumentsSet doc = CATIA.DocumentsSet Partdoc= doc.Open("Z:dataINTERNESzk_zeichnungencarrier.CATPart")Set Partdoc1 = doc1.Open("Z:dataINTERNESzk_zeichnungenCarrier.CATDrawing").......... etc. ... L_C
|
| In das Form CATIA V5 Programmierung wechseln |
