|
CATIA V5 Programmierung : Körper hinzufügen
Esterbauer am 03.01.2018 um 11:23 Uhr (1)
Das suchen Funktioniert schon mal, aber das Hinzufügen der gefunden Körper bekomme ich einfach nicht hin.Hab unten ein Scriptteil gefunden weis aber nicht was ich da falsch mache. Hat wer einen Tipp für mich !Sub CATMain() Dim partDocument1 As Document Set partDocument1 = CATIA.ActiveDocument Dim selection1 As Selection Set selection1 = partDocument1.Selection selection1.Search "Name=*Abzugskörper,all"End Sub Dim j As Integer For j = 1 To UBound(aSelectedElements) Set oZPBodies = oZP.ReferenceProd ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Speicherpfad auslesen
Esterbauer am 03.01.2018 um 11:25 Uhr (1)
Danke jetzt funktioniert es. Datei Neu aus im Produkthier mein CodeSub CATMain() Strfolder = CATIA.ActiveDocument.Path StrPath = Left(Strfolder, InStrRev(Strfolder, "")) StrTargetPath = StrPath & "Startup\_.catpart" MsgBox StrTargetPath Dim PListe As Products Set PListe = CATIA.ActiveDocument.Product.Products Dim oPartDoc As Document Set oPartDoc = CATIA.Documents.NewFrom(StrTargetPath) Antwort_Pos = InputBox("Beispiel: 100 ", " Positionsummer", "") Zahl = Antwort_Pos If Antwort_Pos = "" The ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Stückliste Makro
bgrittmann am 04.01.2018 um 11:05 Uhr (1)
ServusBevor du das Makro an deine Vorgaben anpasst, stelle ich ein paar (auch provokante) Fragen:- warum hast du gerade diese Makro rausgesucht?- hast du auch mal andere Makros hier im Forum angeschaut (Stückliste, BOM, ...)?- hast du dir die Catia-internen Möglichkeiten zur Stücklistengenerierung angeschaut?- wenn du die Unterbaugruppen auflöst, müssten dann nicht die Unterbaugruppen an sich aus der Liste verschwinden (bzw auf 0 gehen)? Sonst wäre es ja doppeltGrußBernd------------------Warum einfach, wen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : instanzen von product bzw. products verfügbar machen
catia5beginervbs am 04.01.2018 um 14:41 Uhr (1)
Moin,ich möchte ab einem bestimmten Knoten im Baum alle Informationen (Partname.Instance Name, Position und Ausrichtung) von Parts auslesen.Das funktioniert aber nicht immer durch selection, ab und zu schlägt die Methode fehl.Es kann also sein das der Knoten in product12 ist, mein Zeil ist die Objekte product und products fur diesen knoten zu definieren.Um den Knoten zu finden mache ich das mit:Set my_selection = my_document.Selectionmy_selection.Clearmy_selection.Search "Name= & MeineSuche & ,all"Set my_c ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : instanzen von product bzw. products verfügbar machen
bgrittmann am 04.01.2018 um 15:01 Uhr (1)
ServusDie Suche läuft stabiler wenn du dieser weiter einschränkst.zB:Code:Sub CATMain()Dim productDocument1 As DocumentDim selection1 As SelectionDim oProduct as ProductSet productDocument1 = CATIA.ActiveDocumentSet selection1 = productDocument1.Selectionselection1.Search "CATAsmSearch.Product,all"for i = 1 to selection1.count2 Set oProduct = selection1.item2(i).value MsgBox "PartNumber: " & oProduct.PartNumbernextEnd SubNach einem bestimmten (Exemplar)Namen dann zBCode:selection1.Search "CATAsmSearch.Pr ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : instanzen von product bzw. products verfügbar machen
bgrittmann am 04.01.2018 um 15:48 Uhr (1)
ServusWelche Methode schlägt fehl?So würde eine Schleife aussehen:Code:Sub CATMain()Dim productDocument1 As DocumentDim oRootProduct As ProductDim oProducts As ProductsDim oInstance As ProductSet productDocument1 = CATIA.ActiveDocumentSet oRootProduct = productDocument1.ProductSet oProducts = oRootProduct.Productsfor i = 1 to oProducts.Count Set oInstance = oProducts.Item(i) MsgBox oInstance.PartNumbernextEnd SubAuf dem Makrorekorder kann man sich leider nicht immer verlassen. Deshalb auch immer mal in di ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : parameters2.Item (Pfad?)
Esterbauer am 05.01.2018 um 10:52 Uhr (1)
Hallo,Wie kann ich eine Variabel in parameters2.Item Einbauen ?Der Pfad sollte ich aus den Namen des Aktiven Dokumentes und EigenschaftenBauteil Bezeichnung zusammensetzen.Set strParam2 = parameters2.Item(Name, "EigenschaftenBauteil Bezeichnung")was mache ich falsch ?Sub CATMain()Set partDocument1 = CATIA.ActiveDocumentSet part1 = partDocument1.PartSet relations1 = part1.RelationsSet parameters1 = part1.ParametersFullName = CATIA.ActiveDocument.NameName = Left(FullName, InStrRev(FullName, "")-8)MsgBox Name ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Leere Bodies und Geosets löschen
tberger am 10.01.2018 um 08:21 Uhr (1)
Versuch mal anstelle As Selection As Objectzu setzen.------------------Grüße aus dem ThurgauThomas+++++++++++++++++++++++++++++++++CATIA - eine Laune der Natur ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Body und Set mit festem Namen Ein/Ausblenden
SvenBoehm am 12.01.2018 um 11:16 Uhr (1)
Hallo Ihr lieben,die Suche konnte mir leider nicht weiter helfen. Aber ich denke für euch ist das ne Kleinigkeit.Folgende Aufgabe möchte ich automatisieren.Es gibt eine Baugruppe mit mehreren Parts.In jedem Part gibt es einen Body Namens: Rohteilund ein geometrisches Set Namens: FraesumrissWie man aus den Namen schon ableiten kann, beinhalten die beiden visuelle Informationen für die NC-Programmierung.Problem ist, wenn man sich die Teile in der Konstruktion nach mal ansehen möchte, muss man händisch erstma ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Leere Bodies und Geosets löschen
bgrittmann am 15.01.2018 um 15:39 Uhr (1)
ServusWerden überhaupt Bibliotheken von CATIA in den Referenzen angezeigt? Sind die wichtigen Bibliotheken aktiviert (in der Liste)?Hat VBA bei dir schon mal funktioniert?Schon mal VBA deinstalliert und wieder installiert?GrußBerndPS: ggf hilft auch ein "regserver" (Forensuche)------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Leere Bodies und Geosets löschen
Creator-X am 15.01.2018 um 16:22 Uhr (1)
Hallo Bernd,also die Catia Biblioteken werden in den Ref angezeigt und sind alle aktiviert.Daheim funktioniert es ja auch. In der Arbeit da bekomm ich dann Feghler wenn der Code ausgeführt werden soll obwohl es die gleiche Version ist. Vielleicht liegt es ja am Windof10. Daheim hab ich W7 drauf.Ist schon komisch. Andere Macros laufen ja auch bei mir in der Arbeit.Bin ein bissel ratlos. Gruß Marco
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Leere Bodies und Geosets löschen
Sylas am 15.01.2018 um 19:15 Uhr (1)
Zitat:Original erstellt von Creator-X:Hallo Bernd,also die Catia Biblioteken werden in den Ref angezeigt und sind alle aktiviert.Daheim funktioniert es ja auch. In der Arbeit da bekomm ich dann Feghler wenn der Code ausgeführt werden soll obwohl es die gleiche Version ist. Vielleicht liegt es ja am Windof10. Daheim hab ich W7 drauf.Ist schon komisch. Andere Macros laufen ja auch bei mir in der Arbeit.Bin ein bissel ratlos. Gruß MarcoHalloHast du deine Makro an andere PC versucht? Startet es?
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zelle in Excel mit Maus markieren
Pietzonka am 16.01.2018 um 15:51 Uhr (1)
Danke für die Unterstützung!Jetzt sieht das CatVBA-Makro so aus und funktioniert:Sub Z31_Zylinderschraube_mIS_EN_4762_KTab()Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim part1 As PartSet part1 = partDocument1.PartDim parameters1 As ParametersSet parameters1 = part1.ParametersDim Bezeichnung As ParameterSet Bezeichnung = parameters1.Item("Bezeichnung")Dim d_dia As ParameterSet d_dia = parameters1.Item("d_dia")Dim l_nom As ParameterSet l_nom = parameters1.Item("l_nom")Dim k_head_de ...
|
| In das Form CATIA V5 Programmierung wechseln |
