|
CATIA V5 Programmierung : MO auslesen
Bappnaas am 16.11.2009 um 07:37 Uhr (0)
Moin,Fehlermeldungen habe ich keine.Hier ist der aktuelle Code:Code:Private Sub gezielt_Click()UserForm1.Hide Dim arrOfVariant(0) As Variant Dim manuProgWork As manufacturing.ManufacturingProgram Dim mfgActsWork As manufacturing.MfgActivities Dim mfgOpWork As manufacturing.ManufacturingOperation Dim objBuffer As Object Dim selWork As INFITF.Selection Dim sStatus As String arrOfVariant(0) = "ManufacturingOperation" Set selWork = CATIA.ActiveDocument.Selection Rem Zielprogramm ankli ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catvba Zugriffsrechte
blackhawk am 19.11.2009 um 08:52 Uhr (0)
Hi Dominik, Die Variante mit der Exe fällt raus, da in Catia ein Icon eingebunden werden soll von dem aus die Anwendung gestartet wird. Da das Projekt relativ umfangreich ist, ist es nicht so einfach eine vba draus zu machen. Gibt es nicht eine Möglichkeit in der ich meine Vbas so belassen kann wie sie sind?MfG
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Variable Skizzen Geometrie
Mörchen am 08.03.2011 um 11:13 Uhr (0)
Hallo DaDuke,willkommen im Forum!Das würde mit der anpassungsfähigen Translation gehen. Ich glaube aber, die ist nur lizenzabhängig vorhanden. Außerdem ist sie nicht ganz einfach. Ich bin grad unterwegs und habe hier kein CATIA dabei... Soweit ich mich erinnere, geht es nicht mit geschlossenen Führungskurven, also müsstest Du zwei halbe Flächen machen.Eine andere Möglichkeit wäre die Fläche mit Mehrfachschnitten. (Multisectionsurface), auch aus zwei Teilen.------------------GrußMörchen
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Variable Skizzen Geometrie
DaDuke am 08.03.2011 um 11:08 Uhr (0)
Hallo Zusammen!Ich habe folgendes Flächen konstruktions Problem: Ein Profil soll um ein Achse rotieren dabei soll der Aussendurchmesser dieser Skizze einer Ellipse und der Innendurchmesser einem Kreis folgen. Alle anderen Skizzenmasse sollen konstant sein. Als Annäherung kann man sich das Profil als Rechteck mit verrundeten Ecken vorstellen.Wie baue ich das im Catia am besten auf?Mein erster Gedanke war mit Hilfe einer Translationsfläche, jedoch skaliert Catia dann jeweils die gesamte skizze zwischen dem I ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bohrungen innerhalb einer Selection modifizieren
pittyplatsh am 19.11.2009 um 18:40 Uhr (0)
Was ich mich gerade Frage ist, warum du so einen umständlichen Weg gehst?ThreadlistM12.Item(I).Value ist das Objekt Hole, welches du modifizieren möchtest. Du lässt dir den Namen ausgeben (Namen sind Zeichenketten, also vom Typ String) suchst den Body und dann innerhalb des Bodys über den Namen wieder das Objekt...Code:ThreadlistM12.Item(I).Value.Type würde da sicherlich reichen. Und du hast auch keine Probleme wegen Namen (diese sind ja nicht zwingend eineindeutig).Alternativ würde ich, wenn kein Weg dran ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Item auslesen
pittyplatsh am 19.11.2009 um 18:57 Uhr (0)
Code:Sub CATMain()Dim produkt As ProductSet produkt = CATIA.ActiveDocument.ProductDim filter(0)filter(0) = "AnyObject"Dim b As ObjectDim sel As StringDim usersel As SelectionSet usersel = CATIA.ActiveDocument.Selectionsel = usersel.SelectElement2(filter, "Bitte Teil selektieren", False)If sel = "Normal" Then Selektion war erfolgreich, "Cancel" zb bei Abbruch ...Set b = usersel.Item(1).Value um zum selektieren Objekt zu gelangenMsgBox(b.Name) Gibt den Namen des Objektes ausEnd IfEnd SubDas SelectedElement i ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Pfade aus Suchfenster auslesen
WMA HSU am 01.09.2020 um 11:26 Uhr (1)
Hallo zusammen,Ich hab mal wieder ein Automationsproblem und könnte Eure Hilfe gebrauchen, weil ich nicht weiterkomme. Ich habe ein .CADPart, in dem zwei Muttern als Surfaces gespeichert sind.Ich brauche von beiden den Pfad, wie er im Strukturbaum vorliegt. Mein aktueller Weg sieht vor, dass ich die Objekte mit der Such-Funktion finde und anschließend über ihre Eltern zum .CADPart nach oben klettere und mir so den Pfad aufbaue. Leider verliere ich damit kritische Informationen, da der abgebildete Strukturp ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bei selection ersetzen
bgrittmann am 19.11.2009 um 19:35 Uhr (1)
ServusÜber den Index des "Item" ist IMHO ein Umweg.Versuch es mal so ungetestet:Code:Sub CATmain() Dim oDoc As Document Dim oProd As Product Dim oSel As Object Dim myType(0) Dim myStatus As String Dim Itemname As String Set oDoc = CATIA.ActiveDocument Set oProd = oDoc.Product Set oSel = oDoc.Selection oSel.Clear myType(0) = "Product" myStatus = oSel.SelectElement2(myType, "Bitte Part auswählen", True) If myStatus = "Normal" Then Part = oSel.Item(1).Val ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bei selection ersetzen
bgrittmann am 27.08.2020 um 13:05 Uhr (1)
Servus LionelDann musst du ReplaceComponent von der Products-Collection ausführen im dem sich das auszutauschende Teil befindet.Beispiel:Code:Sub CATMain() Dim oDoc As Document Dim oProducts As Products Dim oSel As Object Dim myType(0) Dim myStatus As String Dim oProductOld as Product Dim oProductNew as Product Set oDoc = CATIA.ActiveDocument Set oSel = oDoc.Selection oSel.Clear myType(0) = "Product" myStatus = oSel.SelectElement2(myType, "Bitte Part auswählen", True) If myStatus = "Normal" ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Reorder Blatt im Drawing
moppesle am 27.08.2020 um 20:48 Uhr (1)
Hallo Lionel,Mein Anliegen ist folgendes.Ein automatisches erzeugen von Blattnummern aufzählend von 1 bis n im bestehenden Baum. Natürlich ohne Detail SheetsWenn nun ein Blatt oder Blätter nachträglich im Baum eingefügt werden wird ein interner Index, so vermute ich, der Blätter erzeugt.Auch wenn die Blätter immer vor den Detail Sheets im Baum angeordnet sind.Ein Reordern eines Blattes bringt wohl den Blattindex in die richtige Reihenfolge und somit auch meine generiert Balttnummern. ------------------Gru ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro Bauteil schneiden
bgrittmann am 27.08.2020 um 22:11 Uhr (1)
ServusKleines Beispiel mit der Suche (per Makrorekorder erfasst)Code:Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = partDocument1.Selectionselection1.Clearselection1.Search "(CATGmoSearch.OpenBodyFeature.Name=Planes + CATGmoSearch.OpenBodyFeature.Name=Intersections + CATGmoSearch.OpenBodyFeature.Name=Intersections2),all"selection1.DeleteGrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Item auslesen
IIYTII am 19.11.2009 um 09:20 Uhr (0)
Hi,bin mal wieder bei meinen Selections....Ich klicke auf ein Part im Product und dann brauche ich den command um als ergebnis "ItemX" zu bekommen. Wie lautet der?sel.nameliefert mir nur "Catia Selection + fortlaufende Zahl"In der Dokumentation habe ich auch mal geschaut, jedoch gab es dort keinen Eintrag unter selection. Gibt es da eine extra Rubrik für Makroprogrammierung?
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Item auslesen
IIYTII am 19.11.2009 um 09:55 Uhr (0)
Sub CATMain()Dim produkt As ProductSet produkt = CATIA.ActiveDocument.ProductDim filter(0)filter(0) = "AnyObject"Dim b As SelectedElementDim selDim userselSet usersel = CATIA.ActiveDocument.Selectionsel = usersel.SelectElement2(filter, "Bitte Teil selektieren", False)Set b = CATIA.ActiveDocument.Selection.Item(1)MsgBox (b.Value)End Subwo ist mein fehler?
|
| In das Form CATIA V5 Programmierung wechseln |
