|
CATIA V5 Programmierung : Openbody nach Flächen durchsuchen und gegebenenfalls löschen
MaxZ am 06.07.2005 um 13:14 Uhr (0)
hallo! wenn der openbody einen bestimmten namen oder bestimmt namesbestandteile hat würde ich zuerst den suchen. set selection1 = catia.activedocument.selection selection1.search( name= OpenBodyName ,all) dann würd ich nach den entsprechenden elementen in dem body suchen. die kürzel für flächen oder was auch immer gibt dir der macro- recorder aus. laufen lassen während du normal von hand suchst. anders ist auch noch dass statt all dann sel in den klammern steht. dann such er nur in der aktuellen selec ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia Befehl
MaxZ am 18.07.2005 um 10:12 Uhr (0)
try and error hat ergeben: CATIA.StartCommand("b: Veröffentlichung") aber aus nem Makro kann ichs nicht starten. Edit: AppActivate ("CATIA V5") SendKeys "b: Veröffentlichung" + Chr(13), 1 öffnet immerhin das Fenster. (siehe auch Beitrag http://ww3.cad.de/foren/ubb/Forum137/HTML/000186.shtml von Emilio) [Diese Nachricht wurde von MaxZ am 18. Jul. 2005 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Umbenennung von Kopierten Flächen
MaxZ am 08.07.2005 um 07:40 Uhr (0)
stimmt, habs .value. vergessen! die version haut hin bei mir: Sub Unterroutine_1_0() Set selection1 = CATIA.ActiveDocument.selection selection1.Search ( name = Querstrebe_1 ,all ) selection1.Copy Set selection2 = CATIA.ActiveDocument.selection selection2.Search ( name = Streben-Trim ,all ) selection1.Paste selection1.Item(1).Value.Name = Strukturraster Set selection3 = CATIA.ActiveDocument.selection selection3.Search ( name = Klebe-Quer_1 ,all ) selection3.Copy Set selection4 = CATIA.ActiveDocument.selec ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro
MaxZ am 05.08.2005 um 08:50 Uhr (0)
Hallo! aktive CATIA Version: http://ww3.cad.de/foren/ubb/Forum137/HTML/001215.shtml Dokument CATIA Version: http://ww3.cad.de/foren/ubb/Forum137/HTML/001196.shtml Vielleicht helfen dir die zwei Beiträge weiter, sonst einfach die Suchfunktion beanspruchen. Ciao Max ------------------ --- Der frühe Vogel fällt nicht weit vom Stamm. ---
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Variablen anstatt festen Dateinamen
MaxZ am 14.07.2005 um 10:54 Uhr (0)
Hallo! versuchs mal mit: Language = "VBSCRIPT" Sub CATMain() Set partDocument1 = CATIA.ActiveDocument MsgBox partDocument1.FullName hlp = Split(partDocument1.FullName, ".CAT") newname = hlp(0) & ".model" Set partDocument1 = CATIA.ActiveDocument partDocument1.ExportData newname, "model" End Sub setzt natürlich voraus, dass dein alter dateiname ein CATPart oder CATProduct is. sonst musst den Split Befehl an deine Bedürfnisse anpassen. Hoff s hilft, Ciao Max
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Feature anordnung
MaxZ am 12.07.2005 um 14:59 Uhr (0)
bilder weiß ich doch zu würdigen! wie man was ans ende verschiebt per makro weiß ich leider auch nicht. ich würds so machen das ichs such, selektier, kopier, lösch, MainBody suchen & selektieren, einfügen und umbenennen. und dann stehts am ende. zB: Sub CATMain() Set partDocument1 = CATIA.ActiveDocument Set selection1 = partDocument1.Selection selection1.Search Name= FEATURE ,all Set partDocument1 = CATIA.ActiveDocument Set selection1 = partDocument1.Selection selection1.Copy ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part in einer Prodkuktstruktur ansprechen
MaxZ am 12.07.2005 um 15:33 Uhr (0)
hallo! zum einfügen eines openbody muss dass erstellte part ausgewählt sein. das part erzeugen und openbody einfügen könnte so aussehen: Sub CATMain() Dim productDocument1 As ProductDocument Set productDocument1 = CATIA.ActiveDocument Dim product1 As Product Set product1 = productDocument1.Product Dim products1 As Products Set products1 = product1.Products Dim product2 As Product Set product2 = products1.AddNewComponent( Part , Neuerzeugtes_Part ) Se ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Exemplarname von Parts im Produkt ändern
MaxZ am 18.07.2005 um 12:02 Uhr (0)
Hallo Holger! Hier mal ein kleines Beispiel wie sowas aussehen kann: Sub CATMain() Set productDocument1 = CATIA.ActiveDocument Set selection1 = productDocument1.Selection selection1.Search "CATProductSearch.Part,all" For i = 1 To selection1.Count Set productDocument1 = CATIA.ActiveDocument Set product1 = productDocument1.Product Set products1 = product1.Products Set product2 = products1.Item(selection1.Item(i).Value. ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Winkel zwischen 2 Linien messen
MaxZ am 29.07.2005 um 12:51 Uhr (0)
Hallo! Und ich nochmal! Versuchs mal hiermit (Liniennamen musst noch anpassen): Sub catmain() Set part1 = CATIA.ActiveDocument.part Set line1 = part1.FindObjectByName("Line.1") Set line2 = part1.FindObjectByName("Line.2") Set rk1 = part1.CreateReferenceFromObject(line1) Set rk2 = part1.CreateReferenceFromObject(line2) Dim TheSPAWorkbench As Workbench Dim aTheMeasurable, bTheMeasurabl ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : eigenartiger Automatisierungsfehler
MaxZ am 09.06.2005 um 13:06 Uhr (0)
So einen Fehler produzier ich auch zur Zeit.Bei mir entsteht er allerdings in einer selectelement2-zeile.ein- bis zweimal wiederholen, dann gehts entweder oder CATIA schließt sich einfach.gibts eigntlich session-log-files in denen man mal etwas nach den fehlern stöbern kann?oder hat jemand schon ne Lösung?CiaoMaxV5R12Was ich noch vergessen hab:Es kann auch sein, dass sich CATIA nicht schließt, sondern einfach nurauf "Sanduhr" bleibt und nicht mehr ansprechbar ist. Der Task Manager muss die Situation dann k ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Exemplarname von Parts im Produkt ändern
MaxZ am 19.07.2005 um 10:46 Uhr (0)
okay, dann schreibst du vermutlich mit CATScript, da brauchts das i nicht, aber die Language-Zeile: Language = "CATScript" Sub CATMain() Set productDocument1 = CATIA.ActiveDocument Set selection1 = productDocument1.Selection selection1.Search "CATProductSearch.Part,all" For i = 1 To selection1.Count Set productDocument1 = CATIA.ActiveDocument Set product1 = productDocument1.Product Set products1 = product1.Products Se ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Feature erzeugen
MaxZ am 15.07.2005 um 10:21 Uhr (0)
versuchmal: Set doc = CATIA.ActiveDocument docName = doc.Name typ = Split(docName, ".") MsgBox typ(1)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA Umgebungssprache per Makro
MaxZ am 24.06.2005 um 15:36 Uhr (1)
Sonst fällt mir leider auch nix ein.In den cryptischen CATSetting-files kommt das Wort "Language" auchnur recht sporadisch vor.Nixdestotrotz:Schönes Wochenende!CiaoMax
|
| In das Form CATIA V5 Programmierung wechseln |
