|
CATIA V5 Programmierung : Auflisten *.CATDrawing u. Ausgabe in Datei
Wahl am 23.04.2007 um 11:46 Uhr (0)
Hallo, für mein Batch-Plot Programm möchte ich alle CATDrawings einesVerzeichnisses in eine Datei ausgeben. Der Anwender soll diese Datei anschliessend noch mit Notpad barbeiten können für die Feinauswahl. Dieser Teil funktioniert schon. Ich bekomme aber die Ausgabeumlenkung wie folgt nicht gebacken: CmdLine = "dir "+folderinput+"*.CATDrawing 1 "+folderinput+"liste"msgbox CmdLine Ergebnis = CATIA.SystemService.ExecuteProcessus(CmdLine)msgbox Ergebnis Hat jemand eine besser Idee ? mfG Wahl
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : 5000 Linien mit Makro erzeugen
doeberc am 24.04.2007 um 17:09 Uhr (0)
Hallo,das hier ist ein Makro um einfach nur eine Linie aus 2 Punkten (*Pt1 und *Pt2) zu erzeugen. Da ich 5001 solcher Punkte habe (durchnummeriert in einem Geom. Set) würde ich gerne 5000 Linien mit dem Makro erzeugen, dh. es müsste eine Schleife her die den Punktenamen etc immer um eins erhöht. Also Linie2 aus *Pt2 und *Pt3, Linie3 aus *Pt3 und *Pt4...Leider hab ich keine VBA Kenntnisse. Weiss jemand vielleicht wie man solch eine Schleife programmiert?Danke vorab,CorneliusLanguage="VBSCRIPT"Sub CATMain()S ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter aus Catia in eine Exceltabelle
SirKlabauter am 24.04.2007 um 16:19 Uhr (0)
Einen schönen guten Tag an alle,ich möchte aus Catia Parameter über VBA auslesen und in eine Exceltabelle schreiben. Funktioniert alles soweit.Hier mal der Code:Private Sub Fehler()Dim XLS As ObjectDim objxls As ObjectSet objxls = GetObject("", "excel.application")Set XLS = objxls.workbooks.Open("C: empFehler.xls")XLS.ActiveSheet.ActivateXLS.ActiveSheet.range("a1").SelectXLS.ActiveSheet.range("A1").Value = Kante1.ValueXLS.workbook.SaveXLS.CloseEnd SubDer Hacken an der ganzen Sache ist, das ich nicht eine s ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter aus Catia in eine Exceltabelle
tomtom1972 am 25.04.2007 um 07:03 Uhr (0)
Hi Sir Klabauter,Sub CATMain()Set objXL = CreateObject("Excel.Application")objXL.Visible = TrueSet oAWBook = objxl.Workbooks.Addwenn du die Zellen direkt ansprichst, geht das besser (=schneller) als über die SelektionobjXL.Cells(1,1).Value = "Test"sFileName = "C: est.xls"oAWBook.SaveAs sFileNameobjXL.QuitEnd SubGruß------------------tomtom1972[Diese Nachricht wurde von tomtom1972 am 25. Apr. 2007 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Variablendeklaration, warum plötzlich nötig?
Goosnargh am 25.04.2007 um 13:02 Uhr (0)
Ich weiß, ist Pfusch. Bisher hats VBA nicht angemeckert, dann vergisst mans gerne mal. An sich sollten alle Umbegungen gleich sein, das gleiche Catia, gleiches SP. Wo nimmt Catia denn das VBA her? ich weiss das gar nicht....Wundert mich halt wo das plötzlich herkommt.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Surfacic Curvature Analysis per Makro
qli am 25.04.2007 um 13:31 Uhr (0)
Als ich bis jetzt das Problem sehe, gibts keine Möglichkeit irgendwie direkt diese Radien zu kriegen.Mindestens ich habe es nicht gefunden. Die "Analysis" Toolbar ist per Makro nicht anwendbar. Wenn ich mich irre, wurde ich mich am meisten freuen Ich habe inzwischen eine andere Möglichkeit überlegt, aber auch diese sieht aus, als ist per Makro nicht machbar. Ich rede über Isoparametrische Kurven (Wireframe Toolbar). Diese finde ich auch nicht zwischen Makro Befehle Habt ihr eine Idee wie man diese Kurven ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter aus Catia in eine Exceltabelle
SirKlabauter am 26.04.2007 um 10:22 Uhr (0)
Danke tomtom!Du hast meine nächste Frage auch schon vorab beantwortet. Ich habe lange versucht das Macro zu erstellen. Durch einen Zufall hab ich dann gemerkt das ca. 20 Excelprozesse im Hintergrund liefen.Ich bin nicht auf die Idee gekommen den Befehl Quit auszuführen.Bist mein Held des Tages!Dominik------------------Hinweise auf Rechtschreibfehler kann man sich bitte sparen.[Diese Nachricht wurde von SirKlabauter am 26. Apr. 2007 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Verzeichniswahl
Bertel am 26.04.2007 um 16:57 Uhr (0)
Hallo Goosnargh,meinst du sowas? Dim Ordner As Folder Set Ordner = CATIA.FileSystem.GetFolder("C:irgendeinOrdner") Dim Dateien As Files Set Dateien = Ordner.Files Dim Datei As File------------------------------------------ Schleife über alle Dateien in Dir-------------------------------------------For i = 1 to Dateien.count Set Datei = Dateien.Item(i) if (InStr(Datei.Name,"CATDrawing")) then wenn Datei ein CATDrawing irgendwas mit der Datei machen end ifNextGrußBertel
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Verzeichniswahl
Goosnargh am 26.04.2007 um 16:15 Uhr (0)
Moin,ich kann über CATIA.FileSelectionBox ja Dateien auswählen.Weiss jemand, ob ich auch Ordner auswählen kann?
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Aus einer Selektion Referenzen erstellen
gehirnsuelze am 27.04.2007 um 11:54 Uhr (0)
Werte Profis,kleines Problem am Rande das mich schon ein paar Tage vom Weiterarbeiten abhält. Die Lösung ist warscheinlich trivial, doch irgendwie hänge ich trotzdem fest.Möchte die selektierten Elemente in Referenzen umwandeln, um sie dann später weiterverarbeiten zu können.Hier mein bisheriger Code: Sub CATMain()Dim partDocument1 As DocumentDim Auswahl As ObjectDim Liste As CollectionDim f As LongDim Test(100) As StringDim Referenz(100) As ReferenceSet partDocument1 = CATIA.ActiveDocumentSet Liste = New ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Verzeichniswahl
Proofin am 26.04.2007 um 16:46 Uhr (0)
Moin Goosnargh,meines Wissens nach gibt es mit Catia Mitteln keine Möglichkeit einenOrdnerauswahl Dialog anzuzeugen.GrußProofin
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Produkteigenschaften aus Parameter setzen
crow73 am 30.04.2007 um 15:18 Uhr (0)
Muss mich Timberwolve anschließen denke da könntest du Probleme bekommen!Die PartNumber kannst du mitDim partDocument1 As PartDocumentSet partDocument1 = CATIA.ActiveDocumentDim product1 As ProductSet product1 = partDocument1.GetItem("Part7")product1.PartNumber = "Part XXL"ändern. Oder besser wenns aktiv ist ohne den alten Namen zu kennen mitDim partDocument1 As PartDocumentSet partDocument1 = CATIA.ActiveDocumentDim product1 As ProductSet product1 = partDocument1.Productproduct1.PartNumber = "Part XXL2"De ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CreateReferenceFromName ist fehlgeschlagen
sestefanhome am 30.04.2007 um 17:09 Uhr (0)
Hallo,ich habe folgenden Code mit dem Makrorecorder aufgezeichnet:Code:Sub CATMain()Dim productDocument1 As ProductDocumentSet productDocument1 = CATIA.ActiveDocumentDim product1 As ProductSet product1 = productDocument1.ProductDim constraints1 As ConstraintsSet constraints1 = product1.Connections("CATIAConstraints")Dim reference1 As ReferenceSet reference1 = product1.CreateReferenceFromName("Zusammenbau/ZSB Formrahmen AS.1/Formrahmen AS.1/!xy-Ebene")Dim reference2 As ReferenceSet reference2 = product1.Cre ...
|
| In das Form CATIA V5 Programmierung wechseln |
