|
CATIA V5 Programmierung : Schriftfeld ausfüllen
DanielFr. am 31.03.2010 um 14:37 Uhr (0)
Hallo,JA sicher geht das.Code:Sub CATMAin() Dim intDrawingDocObj As DrawingDocument Dim intScaleFirstViewStr As Double Set intDrawingDocObj = CATIA.ActiveDocument intScaleFirstViewStr = intDrawingDocObj.Sheets.ActiveSheet.Views.Item(3).Scale MsgBox "Masstab der ersten Ansicht: " & intScaleFirstViewStrEnd SubDer Masstab kommt als Double Typ raus. D.h. bei einem Wert von "0,5" ist dein Maßstab 1:2. Willst du das so haben musst du dir noch eine Funktion schreiben die eine Double Variable in e ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia starten ohne den intsallPath zu kennen
RonnyS am 11.11.2003 um 08:45 Uhr (0)
ööhhhhmm deine anlage funzt net(404) Start- Ausführen... Eingabe: cnext funzt bei mir auch problemlos, ich wolltes aber per vb starten, d.h. mein vb-proggi läuft, catia (noch) nicht un d da habsch des noch net wirklich hingekriegt. weisst du wie die befehlszeile lauten muss? ------------------ gr33t7 Ronny
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Method PartNumber failed
Jens Hansen am 11.12.2008 um 10:22 Uhr (0)
Hallo,prüf mal nach, ob bei den Systemen mit dem Cache-Modus gearbeitet wird; denn dann ist kein direkter Zugriff auf die Partnumber möglich. Dafür muss das part erst in den Design--Modus versetzt werden.SGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Schrift formatieren
Jens Hansen am 16.12.2008 um 16:23 Uhr (0)
Es könnte so aussehen (ohne gewähr da nicht getestet)for i=1 to myList.Count Set Texti = myList.Item(i).Value Texti.Italic = 1 Macht den Text kursivnextSuch mal in der online Doku nach "DrawingTextProperties"; dort findest du dann die ganzen EinstellungenSGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Brauche Hilfe Makro umbenennen Geo Sets im Part
tberger am 11.02.2010 um 08:30 Uhr (1)
Hallo,du kannst mit dem Makro-Rekorder (in diesem Fall) per Aufzeichnung folgendes erhaten:selection1.Search "CATGmoSearch.OpenBodyFeature,all"Bitte fülle noch deine Systeminfo aus.------------------Grüße aus dem ThurgauThomas+++++++++++++++++++++++++++++++++CATIA - eine Laune der Natur ..."Phase 2 in CATIA V5" - www.tobeplus.de tberger@tobeplus.de
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User Blickrichtung abfragen und in Vektor umwandeln
Jens Hansen am 04.12.2008 um 16:18 Uhr (0)
Hallo,ich verstehe leider nicht so recht was du wills?! Du kannst doch über equitation plane - paralel to screen eine Ebene parallel zur aktuellen Blickrichtung machen. Ist es nicht das was du willst?SGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ersetzen der
Lusilnie am 23.06.2010 um 00:31 Uhr (0)
Hallo Wishmaster,das geht z.B. mit "Cut & Paste" aus bzw. in die jeweilige Selektion:Code:Set iSel = CATIA.ActiveDocument.SelectioniSel.CleariSel.Add CATIA.ActiveDocument.Part.HybridBodies.Item("Geometrical Set.2")iSel.CutiSel.CleariSel.Add CATIA.ActiveDocument.Part.HybridBodies.Item("Geometrical Set.1").HybridBodiesiSel.PasteCATIA.ActiveDocument.Part.UpdateDamit kannst Du in einem separat geöffneten CATPart das "Geometrical Set.2" (auf Part-Ebene) unter das (ebenfalls auf Part-Ebene liegende) "Geometrical ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zu Drawing gehörendes Dokument
RonnyS am 05.11.2003 um 12:57 Uhr (0)
meines Wissens kann man mittels Catia.Documents auf alle Dokumente zugreifen. Mit Drawings hab ich zwar selbst noch nichts gemacht. Aber von der idee her müsstest du doch nur prüfen ob .catdrawing2 im name vorhanden ist. Also z.b. so Dim CATDrawingFileType as String CATDrawingFileType= .CATDrawing Dim MyPos as integer for i=1 to catia.documents.count step 1 myPos = InStr(1, catia.documents.item(i).name, CATDrawingFileType, If myPos 0 Then MSGBOX Hallo ich bin ein Drawing next EDIT// uups: ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Werte aus Excel in Catia Tabelle schneller schreiben.
ptit.tom am 13.11.2017 um 13:22 Uhr (1)
Hallo,Ich sehe 2 Möglichkeiten, das Makro zu beschleunigen.1. Excel auf einmal lesen: mit Range("A1 4").Value2 kann ein Bereich in einer Tabelle gespeichert warden. Es ist in der Regel schneller als einzelne Zellenzugriffe.2. Für die Tabelle in CATIA: DrawingTable.ComputeMode = CatTableOFF vor dem Ausfüllen und CatTableOn danach.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Position.GetComponents - Funktion
Steffen Hohmann am 24.07.2003 um 08:32 Uhr (0)
Hallo Laute, Was sind denn die Positionsdaten eines Features (Pad, Fillet, usw.)? Also die Position-Methode funktioniert nur mit Part s, Product s und sonstigen Komponenten, die in einer Baugruppe verbaut werden können. Eine andere Anwendungsmöglichkeit die funktioniert ist mir nicht bekannt. Dein zweites Makro läuft, wenn Du die Typdeklaration von oPosition auskommentierst. Aber Du bekommst in der Matrix dPosition nur die Positionskoordinaten vom oPart. Die Anweisung Set oPart = CATIA.ActiveDocument. ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Pfad über Dialog auswählen
RSchulz am 28.06.2012 um 09:42 Uhr (0)
Hallo Andreas,hier mal etwas Beispielcode zu deiner Frage...Hierfür muss die Library "CATIA V5 InfInterfaces Object Library" importiert werden. Code:CATIA fangen: Variable für CATIA definieren Public CATIA As INFITF.Application alternativ: As Object Public Sub GetCatia() Try Catia ansprechen CATIA = GetObject(, "CATIA.Application") Catch ex As Exception Fehlermeldung, wenn CATIA nicht gefunden oder angesprochen werden kann. MsgBox(StateMsg, ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Blatt in Drawing einfügen
KarinMueller am 19.11.2003 um 11:19 Uhr (0)
Hallo, ich habe eine Zeichnung mit meheren Blättern. In diese Zeichnung möchte ich ein weiteres Blatt einfügen, das bereits in einer anderen Zeichnung existiert. Ich habe es mit Selektion des gewünschten Blattes probiert, Selektieren geht, aber es wird nicht eingefügt. Warum? Mein Code: Set DrwDocument = CATIA.ActiveDocument Set DrwSheets = DrwDocument.Sheets Set DrwSheet = DrwSheets.Item(1) Set SelMasterDoc = CATIA.ActiveDocument.Selection SelMasterDoc.Add(DrwSheet) -- ... Blatt ko ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Existenz der Datei prüfen
DanielFr. am 08.12.2009 um 14:13 Uhr (0)
Hallo,das liegt an der Auswertung der booleschen Variablen. Dies kann VB so nicht verarbeiten. Konvertiere die Variable vorher in einen String und vergleiche mit dem Wert "True" dann wird es gehenHier mal ein Beispiel:Code:Sub CATMain() Dim myFilePathStr As String Dim myFileNameStr As String Dim ExitsBool As Boolean myFilePathStr = "deinPfad" myFileName = "deinDateiname" ExitsBool = CATIA.FileSystem.FileExists(myFilePathStr + myFileName) If CStr(ExitsBool) = "True" Then MsgBox "ersetzen" Else ...
|
| In das Form CATIA V5 Programmierung wechseln |
