|
CATIA V5 Programmierung : Teilenummern mit Makro umbennen
martin2 am 18.04.2006 um 16:01 Uhr (0)
Hallo tomtom1972,erst mal Vielen Dank für Deine Antwort!Leider schaffe ich es jedoch immer noch nicht mit folgender Anweisung zu erkennen, ob es sich um ein Produkt oder ein Part (im Gesamtprodukt) handelt...Set oProducts = CATIA.ActiveDocument.Product.ProductsFor n = 1 To oProducts.Count MsgBox (n & " " & TypeName(oProducts.Item(n)))NextEs erscheint stets "Product" - somit habe ich kein Unterscheidungsmerkmal...Deine Meinung / Hilfe?Danke Martin!
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Eingabe an Parameter zuweisen
MaxZ am 21.07.2005 um 15:55 Uhr (0)
hallo! probier mal: Sub CATMain() Set partDocument1 = CATIA.ActiveDocument Set part1 = partDocument1.part Set parameters1 = part1.Parameters Set length1 = parameters1.Item("Parameter1") length1.Value = 5# End Sub [edit] oder eben: length1.Value = eingabewert [/edit] bei mir klappts falls der parameter "Parameter1" existiert. Ciao Max [Diese Nachricht wurde von MaxZ am 22. Jul. 2005 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Koerper auslesen
Schwobaseggele am 23.12.2008 um 15:35 Uhr (0)
Hallöchen,danke für die Vorschläge, aber sie führen mich nicht ganz zum Ziel. Es werden mir nur die selektionen angezeigt, aber die Boolschen Operation will Katze Catia nicht mehr machen??? Das ist ja auch das was ich noch nicht ganz verstehe, müssen die selektierten Elemente noch in Objekte (Körper) gewandelt werden, damit ich sie weiter verarbeiten kann????Ich hab den Code mal angehängt, weis echt nicht an was das liegt!!!TschÖ mit Ö
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Hauptkörper eines Parts kopieren und in ein anderes Part einfügen?!?!?!
Sitzpinkler am 29.10.2012 um 17:17 Uhr (0)
Hallo,ich bin quasi ein Neuling in sachen Makroprogrammierung für Catia. Nun möchte ich gerne wissen, wie ich den Hauptkörper eines vorhandenen Parts kopiere und in ein neues Part einfüge.Das einfügen bereitet hier besondere Probleme.Kann mir vielleicht jemand eine Befehlsliste erstellen mit der man eine tote Kopie (ohne Verlinkung) erzeugt?Hoffe auf schnelle Hilfe.gruß
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Klick OK ...
Gaby75 am 14.06.2007 um 11:50 Uhr (0)
Hallo !!Eigentlich funktioniert das jetzt mit dem Code.Es gibt nur eine Kleinigkeit.Ich denke der Code wird nicht ganz richtig beendet.Auf jedenfall muß ich nachdem ich die dxf-Daten umgewandelt und in die "Datenbank.CATdrawing" kopiert habe Catia neu starten.Das selbe ist bei dem andern Code, mit dem ich aus dieser "Datenbank.CATdrawing" verschiedene Ansichten auswähle.Ich habe hier mal ein Beispiel:Ich lasse das Makro1 über 10 Dateien laufen und kopiere sie in die Catdrawing, dann starte ich das Makro2 u ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punkt mit CommandButton
sawah am 30.06.2011 um 11:17 Uhr (0)
Hallo Berndich habe das hier versucht klappt aber nicht. Code:Dim punkt_vorhanden As Booleanpunkt_vorhanden = False Dim intPointCoordObj1 As HybridShapePointCoordFor Each intPointCoordObj1 In CATIA.ActiveDocument.Part ????????FEHLERIf intPointCoordObj.Name = "Punkt_b" Then punkt_vorhanden = True Set intPointCoordObj1 = intPointCoordObj End If Next intPointCoordObj1 If Not punkt_vorhanden Then Set intPointCoordObj1 = intHybShapeFacObj.AddNewPointCoord((ws.Cells(38, 2).Value), (ws.Cells(38, 3).Val ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : 3D Section automatisch umbenennen
bgrittmann am 10.11.2016 um 12:44 Uhr (1)
ServusFolgender Code läuft unter CATScript:Code:Sub CATMain() Dim cSections As Sections Set cSections = CATIA.ActiveDocument.Product.GetTechnologicalObject("Sections") Dim oSection As Section Set oSection = cSections.item(1) MsgBox oSection.Name oSection.Name = "BlaBla"End SubDas gehört zur SPAWorkbench. Den genaue Bibliothek kenne ich nicht (bin nicht in .net unterwegs)GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : CATvba aus Benutzerumgebung starten funktioniert nicht
afaliwan am 07.12.2016 um 14:40 Uhr (15)
Danke Bernd, Danke Joe,hat geklappt Hier der Code (Dateipfad gekürzt):Code:Sub CATMain() Dim myScript Dim SysServ Dim Params() Set SysServ = CATIA.SystemService myScript = SysServ.ExecuteScript("R:[...]EntwicklungMakro.catvba", catScriptLibraryTypeVBAProject, "Makro", "CATMain", Params)End Sub ------------------"Die Genialität einer Konstruktion liegt in ihrer Einfachheit. Kompliziert bauen kann jeder." - Sergej P. Koroljow
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : vba - Text in CATDrawingsTextfeld einfügen
Feyza am 08.04.2011 um 12:24 Uhr (0)
Hallo,bei:Dim Benennung As DrawingTextSet Benennung = CATIA.ActiveDocument.Sheets.Item(1).Views.Item(3).Texts.Item("Benn1")Benennung.Text = txtben1.Textkommt folgende Fehlermeldung:Laufzeitfehler 2147352565 (8002000b):The method Item failed-----------------------------------------Bei:Dim drwText As DrawingTextSet drwText = objSel.Item(1).ValuedrwText.Text = txtben1.TextFehlermeldung:Object erforderlich------------------Schöne GrüßeFeyza : )
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Annotation (FTA) in 3D verschieben
user7 am 15.09.2022 um 12:41 Uhr (1)
Hallo zusammen, ich habe automatisiert eine Annotation erstellt und würde diese gerne Die automatisch erstellte Dimension ist nicht optimal positioniert und ich würde sie gerne programmatisch nach unten verschieben. Den Befehl "Line-Up" über selektierte Dimensionen kann ich nicht verwenden, da ich das Ganze vollständig im Makro lösen möchte, und der Befehl zwei Klicks als User-Interaction benötigt. Dieser Code erstellt eine Dimension anhand von zwei selektierten faces (später werden diese nicht mehr von Ha ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Fill-Fläche und -Umfang messen
bgrittmann am 13.05.2012 um 12:26 Uhr (1)
ServusAlso bei mir funktioniert es mit diesem Code:Code:Dim TheSPAWorkbench As SPAWorkbenchSet TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench")Dim theMeasurable As MeasurableSet theMeasurable = TheSPAWorkbench.GetMeasurable(ref_fill)Dim Umfang As DoubleUmfang = theMeasurable.PerimeterMsgBox CStr(Umfang)Welcher Fehlermeldung kommt bei dir? Liegt es vielleicht nur an der Typkonvertierung bzw an eine falschen Deklaration?GrußBerndPS: Bitte Systeminfo ausfüllen.------------------Warum einfac ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Attribute Link, wie?
DonYouAn am 17.03.2010 um 14:55 Uhr (0)
Hallo Daniel,danke, Du hast mir sehr geholfen.Allerdings kann ich nicht auf Textobjekte im Background zugreifen. Der Background ist bei uns im Unternehmen gesperrt.Bei der Zeile Code:Set intDrwTextObj = intDrwTextsObj.GetItem("SAP__DRAW-DOKNR")meckert Catia, dass "Method GetItem failed". SAP__DRAW-DOKNR ist auf Background View[3] definitiv vorhanden. Muss ich etwas anderst machen um auf BG-Objekte zuzugreifen oder ist dies denn überhaupt möglich?DankeDonYouAn--------------------
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parametername PartNumber umbenennen
moppesle am 23.08.2022 um 19:12 Uhr (1)
Hallo zusammen,@RandleÜber den Formeleditor hatte ich es auch schon probiert. Habe aber nur den Namen nach dem Slash geändert und somit keine Änderung hervorgerufen.Trotzdem ein Dank an dich, du hast mich auf den richtigen Weg gebracht. @BerndDir auch besten Dank für deinen Code. Habe ihn schon fleißig in mein Makro eingearbeitet. Vielen Dank euch beiden. ------------------Gruß UweAuch Catia ist nur ein Mensch!
|
| In das Form CATIA V5 Programmierung wechseln |
