|
CATIA V5 Programmierung : SelectElement2 mit Option Explicit
bgrittmann am 25.04.2019 um 23:01 Uhr (1)
Servus BastiWie lautet denn die Fehlermeldung?Deklariere mal die Selection als Object.Erklärung siehe hier.GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Achsenkoordinaten auslesen und Skizze zuweisen
noir333 am 26.05.2008 um 21:49 Uhr (0)
Hallo mirko78,du musst das Achsensystem als Objekt haben. Du kannst alle Achsensysteme, die unter dem Knoten "Achsensysteme" liegen mit der Liste Part.Axissystems.item(i), mit i von 1 bis part.axissystems.count . Anstelle von i kannst Du auch den Namen verwenden z.B. "Absolutes Achsensystem".Meinst Du das?-----------------------------
|
| In das Form CATIA V5 Programmierung wechseln |
Screenshots_von_Annotations_V01.zip |
CATIA V5 Programmierung : automatisiertes Erstellen von Screenshots anhand Annotated Views
denyo_1 am 12.06.2008 um 13:55 Uhr (0)
Hallo Manuel,so jetzt sind noch ein paar kleiner Bugs gefixt. Ich hoffe jetzt ist das Makro auch noch anwenderfrendlich. Sobald ein flasches Dokument (z.B. eine Drawing etc.) offen ist bricht das Makro ab. Falls sich keine Annotation Views im Produkt oder Part befinden bricht das Makro ab. Damit kann man nicht mehr viel falsch machen als USER Des weiteren wird nun der Hintergrund auf weiß geändert sowie der Kompass und der Spezifikationsbaum ausgeblendet für die Screenshots. Nachdem diese gemacht worden si ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Symmetrie im CATProduct
bgrittmann am 20.11.2020 um 16:28 Uhr (1)
ServusAFAIK lässt die Assembly Symmetry nicht per Makro ansprechen.Workaround der gehen könnte: neues Teil erzeugen dieses in die Baugruppe einfügen Körper (im Kontext und mit Verknüpfung) in das Part einfügen Ebene (im Kontext und mit Verknüpfung) in das Part einfügen Körper spiegelnGrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Herausfinden ob eine Sketch aktiv ist
imation1999 am 20.09.2013 um 09:40 Uhr (1)
Hallo RAA,vielen Dank für Deine Antwort.Deine Lösung sel1.Search ("Sketcher.AbsoluteAxis;in")Set CurSketch = PartDok1.Selection.FindObject("CATIASketch")ist nicht zu schön, aber funktioniert. Danke nochmal!
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : ### Sicherungsverwaltung über VB Script ###
TomK79 am 07.06.2005 um 11:55 Uhr (0)
Hallo Olaf! Ich hab das Ganze folgendermaßen gelöst: VAR_pfad = "D:Pfad" --- Angabe des Speicherorts Set productDocument1 = CATIA.ActiveDocument Set product1 = productDocument1.Product Datei = VAR_pfad & product1.PartNumber CATIA.ActiveDocument.SaveAs Datei Mit diesen 5 Zeilen speichere ich das oberste Product. Automatisch werden alle untergeorneten Parts/Products mitgespeichert. Der Dateiname ist jeweils die Produkt-/Partbezeichnung ("product1.PartNumber"). Ich hoffe, dass ich helfen konnte, Gruß TomK79
|
| 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 : Löschen von Relations und Parameters
denyo_1 am 23.10.2008 um 16:25 Uhr (0)
Hallo Jan,du hast doch in deinem ersten Beitrag erwähnt das du gerade ein Buch durcharbeitest. Ich würde dir emfehlen zuerst das Buch durchzuarbeiten, denn das ganze in einem Produkt zu realisieren ist ein bisschen komplizierter. Dazu braucht man schon ein bisschen Erfahrung. Im Forum gibt es schon ein fertiges Makro das eine Produktstruktur rekursiv durchläuft. In dieses Makro müsstest du dann dein eigenes einbauen.Warum willst du überhaupt die Parameter und Relation ausschneiden. Ch dachte du willst sie ...
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Parameter_mit_Eigenschaften_verknüpfen
bgrittmann am 26.09.2018 um 16:16 Uhr (15)
Servus FelsenIch hab dir mal einen kleinen Code zu deinem Problem zusammen geschrieben (damit ich in Übung bleib)Code:Sub CATMain()Dim oPartDocument As PartDocumentDim oParameterSet as ParameterSetDim oParameter as ParameterDim oUserRefPropertyParameter as ParameterDim strFormula as StringDim oFormula as FormulaDim i as IntegerDim sParameterName as StringSet oUserRefPropertyParameter = NothingIf TypeName(CATIA.ActiveDocument) "PartDocument" Then MsgBox "No PartDocument opened and active", vbCritical Exi ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zeichnungsmakro für Toleranzen
DasDon am 19.12.2012 um 14:54 Uhr (0)
frohe weihnachten....Code:MACRO_NAME = "ToleranceDRW"MACRO_VERS = "V1.0"VER: 1.0DESC: CREATE ADDS TOLERANCE TO SELECTED DIMENSIONS DEPENDING ON VALUE.PREP: ACTIVE DOCUMENT MUST BE OF TYPE CATDRAWINGLANG: CATSCRIPTDATE: 19/12/12CREA: DasDon-----------------------------------------------------------------------------------DECLARE VARIABLE -------------------- CONSTANT VARIABLES -------------------- GENERAL VARIABLES DIM oSel As Selection -------------------- ARRAYS DIM InputObj(0) InputObj(0) = "Drawin ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Textfeld suchen und löschen, aber nur auf aktuellem Blatt
n4426 am 16.11.2011 um 19:10 Uhr (0)
Hi Bernd,ich habs gestern dann noch so gelöst.Code:Public Function DeletTxtFeld(varTextfeldName As String, varSheetName As String) Dim intDocObj As Document Dim intWindowsObj As Windows Dim intObjTypeStr As String Dim intTextBoxNameStr As String intTextBoxNameStr = varTextfeldName ***Background View zugänglich machen Dim intSheetObj As DrawingSheet Dim intBckViewObj As DrawingView Set intDocObj = CATIA.ActiveDocument Set intSheetObj = intDocObj.Sheets.ActiveSheet Set intBckViewObj = in ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Löschen von Relations und Parameters
J.Streit am 23.10.2008 um 10:56 Uhr (0)
Hallo Daniel,ich bitte nochmal um Hilfe. Ich wollte erstmal versuchen, nur alle Hidden Parameters und Relations einzublenden. Im einzeln geöffneten Part funktioniert das auch ohne Probleme. Nun möchte ich das ganze von aktivierten RootProduct machen, wobei er in jedem geladenen Part suchen und einblenden soll. Welche Variable muss ich dafür setzen.Hier nochmal das bisherige:###############################Sub CATMain()Set oDoc = CATIA.ActiveDocumentSet partDoc = oDoc.PartSet oPara = partDoc.ParametersSet oR ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Fase
Guenter Graff am 01.09.2008 um 17:08 Uhr (0)
Hallo spikey jr.wo liegt das Problem, dass Du die Fase nicht hinbekommst? Fehlermeldung oder was? Eventuell ein Part hochladen und deine Systeminfo ergänzen.------------------GrußGünter
|
| In das Form CATIA V5 Programmierung wechseln |
