|
CATIA V5 Programmierung : Filename = PartNumber?
Makronizer am 18.09.2009 um 08:36 Uhr (0)
Da ich bisher nur Makros gesehen habe, die die PartNumber aus dem FileName beziehen, stelle ich nun ein Makro online, welches den entgegengesetzten Fall darstellt. PartNumber wird ausgelesen und anschließend wird das Part, Product, Drawing, cgr in einem seperaten Ordner unter neuem Namen Abgespeichert. Hoffe, es kann dem Einen oder anderen behilflich sein.Sub Speichern()Dim Eingabe Eingabe = "S:..." Eingabe = InputBox ("Bitte geben Sie den Öffnungs Ort ein.", "Alle Parts/Products Öffnen", Eingabe)If (Einga ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter einer Selection ändern
Makronizer am 24.09.2009 um 16:14 Uhr (0)
Nach reichlichem Hin- und Herprobieren habe ich mich nun dazu entschlossen, mal die gesamte Makrogemeinde zu befragen. Ich stehe wahrscheinlich heute nur auf dem Schlauch.Folgendes Problem:Ich habe eine Produktstruktur mit unzähligen Parts und Products. Einige dieser Parts beinhalten Stücklisten in Form von Parametern. Die Parts sollen nun über eine UserSelection ausgewählt werden. (Soweit kein Problem)Nun möchte ich besagte Parameter ändern. Dim oSelElem As SelectedElement Set oSelElem = CATIA.Activ ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter einer Selection ändern
Makronizer am 25.09.2009 um 10:59 Uhr (0)
Das Problem ist eigentlich so banal, dass ich mich ehrlichgesagt geschämt habe, die Lösung zu posten... Hier das Ergebnis: Dim oSelElem As SelectedElement Set oSelElem = CATIA.ActiveDocument.selection.Item(1) Dim strParam1 As StrParam Set strParam1 = oSelElem.Value.Parameters.GetItem("Positionsnummer") strParam1.Value = TextBox1.ValueAuf was zugegriffen werden kann ist im watch-Fenster ersichtlich, wenn man oSelElem markiert und ins watch-Fenster zieht. Dort kann man die Struktur aufkla ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User-Selektion nach CATParts in einem CATProduct
Makronizer am 24.09.2009 um 12:55 Uhr (0)
Hallo Shamrock2,folgendes Makro sollte funktionieren: Auswahl festlegen ----------------------------------------------- Dim selElements(1) selElements(0) = "Part" selElements(1) = "Product" Selektion definieren und leeren --------------------------------- Dim userSel As Object Set userSel = CATIA.ActiveDocument.selection userSel.Clear Selektion vornehmen lassen -------------------------------------- Dim E As String E = userSel.SelectElement2(selElements, "Part auswählen.", True)bei mir la ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User-Selektion nach CATParts in einem CATProduct
Makronizer am 24.09.2009 um 13:49 Uhr (0)
Wenn ich nochmal stören darf... also ich habe die userSelektion (siehe oben). Das heißt, CATIA hat dieses markiert. Wie binde ich denn nun die GetItem-Methode ein? Ich möchte, das UserForm zur Eingabe von ca 20 Parameter-Werten dient... die Parts in denen diese Parameterwerte geändert werden sollen, werden dann einfach über die selection ausgewählt. Mein Problem ist momentan, dass ich einfach nicht dahinterkomme, wie ich mit dem selektierten Part weiterarbeiten kann... :-(Scheint heut nicht mein Tag zu sei ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User-Selektion nach CATParts in einem CATProduct
Makronizer am 24.09.2009 um 14:09 Uhr (0)
Hallo Joachim,soweit ich weiß funktioniert die Selektion während eines Makros nicht mit Strg-Funktion. Da würde sich die Vorselektion anbieten, die du dann mit der For-Funktion durchgehen kannst.For i = 1 To xxx(zb UserSel).CountDie Selektion vor Starten des Makros funktioniert ganz einfach mit:Set UserSel = CATIA.ActiveDocument.SelectionGrußThomas
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Kopieren mehrerer Bodies
Makronizer am 01.10.2009 um 14:47 Uhr (0)
Hallo zusammen,folgendes Problem:Ich verwende innerhalb eines Makros mehrere Selektionen. Die erste Selektion wäre ein Body, die zweite Selektion sind mehrere Parts, in denen die Bodies mit dem Namen der ersten Selektion herausgefiltert werden. So weit funktioniert alles bestens. Die gefilterten Bodies will ich nun kopieren und genau da streikt CATIA, bzw mein Wissen der Makroprogrammierung. Der Befehl xxx.Copy wird als Fehler herausgeschmissen.Irgendwelche Ideen oder Denkanstöße?Makro: Selektion definiere ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Partnumber durchgehen
Makronizer am 18.11.2009 um 08:39 Uhr (0)
Guten Morgen allerseits,ich habe mal wieder ein Problem:folgendes Szenario: Ich will die Partnumber durchgehen und auf ein bestimmtes Maß ausweiten ohne die existierende Partnummer abzuändern.hört sich erstmal einfach an, ist es wahrscheinlich auch.Die Partnumber wollte ich mit einer For ... To... Step 1, Next durchgehen. For i = 0 To 30 Step 1 Teilebez = CATIA.Documents.Item(m).Product.PartNumberusw.Nun komme ich nicht weiter. Will Buchstabe für Buchstabe durchgehen und kleine Buchstaben in große a ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Partnumber durchgehen
Makronizer am 18.11.2009 um 10:17 Uhr (0)
Bräuchte doch nochmal einen Denkanstoß:Bisheriger Ansatz:For m = 1 To CATIA.Documents.CountIf (Right(CATIA.Documents.Item(m).Name, 10) = "CATProduct") Then Teilebez = CATIA.Documents.Item(m).Product.PartNumber Zahl1 = Len(Teilebez) For i = i To Zahl1 Teilebez = Left(CATIA.Documents.Item(m).Product.PartNumber, i) Teilebez = Right(Teilebez, 1) Teilebez = UCase(Teilebez) If Teilebez = "" Or Teilebez = " " Then Teilebez = "_" End If Teilebezneu = Teilebez --- ???? NextEnd ...
|
| In das Form CATIA V5 Programmierung wechseln |
