|
CATIA V5 Programmierung : Update aller Inertia
shoutz000 am 27.05.2015 um 07:54 Uhr (1)
Servus ob man die Measure unterscheiden kann weiß ich nicht,aber die Measure lassen sich so selektieren und updaten:Code:Sub CATMain() Set oSel = CATIA.ActiveDocument.Selection oSel.Search "CATDMUSearchInformation.DMUMeasureType,all" Catia.StartCommand "MeasureForceUpdate"End Sub
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Aktive Excel speichern
shoutz000 am 10.07.2014 um 11:40 Uhr (1)
Heyalso der Pfad stimmtSchreibrechte habe ich auchund Word habe ich die 2010er VersionAlso so passiert weiterhin nichts:(Wenn ich bei fName direkt einen Pfad und Dateinamen angebe kommt eine Fehlermeldung das er eineAnweisung erwartet hat.)Sub SaveExceldim NewBook As ObjectSet NewBook = objXL.ActiveWorkbookDim Name As StringName = currentprod.PartNumberDim strPath As StringstrPath = CATIA.ActiveDocument.Pathdim fName as StringfName = strPath & "" & NameNewBook.SaveAs FileName = fName & ".xlsx"End Sub[Diese ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Stückliste Makro
shoutz000 am 29.10.2013 um 08:12 Uhr (1)
Achso ok......ja bin dabei ständig zu schauen was für was ist... dauert aber noch ein wenig glaub eich ;-)Also sehr komisches Ergebnis:Wenn ich eibauLvl erhöhe wird genau der Wert einfach nur in Excel erhöht.Änder ich allerdings lvlCounter macht er was sehr merkwürdiges. In Excel erscheinen Daten die er eingibt und diesewerden dann ständig überschrieben, hüpfen hin und her uund letztendlich stehen dann alle Products untereinanderund dann alle Parts und von Leerzeilen keine Spur :-P
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Aktive Excel speichern
shoutz000 am 11.07.2014 um 10:48 Uhr (1)
Da komm ich jetzt nicht mit?!Zitat:ServusIst "currenrod" innerhalb der Sub bekannt?teste es coh mit einem Haltepunkt VBA) oder entsprechende MsgBoxen. Was wird zB für fName ausgegeben?GrußBerndStimmt deswegen ja mit sehr starker...Also der Sub SaveExcel stand bei mir bisher ganz unten nach dem alles ausgelesen wurde und es hat nichtfunktioniert. Jetzt habe ich es ganz nach oben geschrieben wo Excel geöffnet wird, aber es kommt nach wie vorhier die Fehlermeldung:xlBook.SaveAs Filename:=fName
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Benennungen Prüfen
shoutz000 am 15.08.2015 um 20:55 Uhr (1)
Sorry hätte ich vielleicht dazu schreiben sollen.Das ist ein CatScript. Das .txt am End musst Du löschen dann kannstDu es direkt in Catia öffnen. Ich konnte das CatScript nicht hochladendeshalb habe ich das .txt angehängt. Unter Catia ist die Struktur dannnatürlich vernünftig [Diese Nachricht wurde von shoutz000 am 15. Aug. 2015 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Dimension texts im Drafting
shoutz000 am 27.06.2015 um 18:28 Uhr (1)
Hi,also ich versuch per Makro ein "conical taper" vor die Dimension zusetzen. Allerdings weiß ich nicht wie man dieses Symbol aufruft.Ich versteh aber auch nicht ganz wie das mit dem Unicode funktionierensoll... zumindest kann mein Catia damit nichts anfangen. ChrW(8960) sollja das Durchmesserzeichen sein, aber egal welchen Code ich eingebe,Catia setzt immer ein "_" vor die Dimension...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Aktive Excel speichern
shoutz000 am 10.07.2014 um 13:13 Uhr (1)
Dann bringt er mir die Fehlermeldung das er den Befehl nicht kennt...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Nicht geladene Elemente löschen
shoutz000 am 28.05.2015 um 11:10 Uhr (1)
Bin gerade an den Zeichnungen dran und komm nicht weiter...Hab mal des zusammengestümpert :-PMeckert die ganze Zeit rum das der Index i falsch gewählt wurde...er muss zwischen 0 und 1 liegen. Liegt an der -1 aber ohn (-)werden die Skizzen nur selektiert und mehr nicht?!Code:Sub CATMain()Set oDoc = CATIA.ActiveDocumentSet oSel = oDoc.Selection oSel.Search "CATPrtSearch.Sketch,all" For i = oSel.Count To 1 Step -1 Set oSketch = oSel.Item2(i).Value oSel.Delete Set oDocSel = oSel.Item2(i).Document ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Per Makro als PDF speichern
shoutz000 am 30.09.2014 um 07:23 Uhr (1)
Servus ich habe auch gerade so ein speicher Problem.Ich habe das unten stehende Makro welches die Zeichnungsblätter prüftob es ein Detailsheet ist oder nicht. Wenn es keins ist soll dieses in einem bestimmten Format gespeichert werden (alle Blätter einzeln).Merkwürdig ist bloß (und ich komm nicht drauf warum?!):Speicher ich in einem Bildformat (z.B. tif) so arbeitet das Makro exakt so wie ich das will. Alle Blätter welche kein Detailsheet sind werden gespeichert und sobald die Zeichnung abgearbeitet ist be ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Allgemein : Strukturbaum nach Alphabet sortieren?
shoutz000 am 27.06.2016 um 07:22 Uhr (1)
Hi bin wieder zurück :-)Also der PC bei dem es lief war ein Test-PC bei dem Catia eben direkt gestartet wurde ohneLizenzmanager für die jeweiligen OEM-Umgebungen. Da ging es nur darum zu schauen ob wir mitder Leistung zufrieden sind.Bei den richtigen Arbeitsplätzen wird Catia ganz normal über einen Lizenzmanager gestartet.Die Installationen und soweiter sind laut Admin alle auf dem neuesten Stand. Daher keine Ahnung woranes liegt. Cool dass es jetzt so schnell läuft aber wir werden dann wohl weiterhin das ...
|
| In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Programmierung : Nicht geladene Elemente löschen
shoutz000 am 28.05.2015 um 21:50 Uhr (1)
Ich kenn mich mit beidem nicht aus und habe jetzt mal die Collectionversucht. Aber anscheinend ist die nicht definiert... Finde zu beidemaber nicht wirklich etwas hilfreiches...Code:Sub CATMain()Set oDoc = CATIA.ActiveDocument Set oList = New Collection Set oProd = oDoc.Product.Products For Each Sketch in oProd oList.Add Sketch next Set oSel = oDoc.Selection oSel.clear for i = 1 to oList.Count oSel.Add oProd.Item(oList.Item(i)) oSel.Delete If oProd.IsUpToDate=Tru Then CATIA.StartCommand "Un ...
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Stückliste Makro
shoutz000 am 10.10.2013 um 12:08 Uhr (15)
Hammer wunderbar funktioniert einwandfrei...xD Danke war echt cool von dir :-)Vielen Dank ich experimentier die nächsten Tage mal dran rumund versuch die Excel noch bissel bunt zu bekommen :-)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Nicht geladene Elemente löschen
shoutz000 am 29.05.2015 um 09:07 Uhr (1)
Ok ich bin weiter xDCode:Sub CATMain() Set oDoc = CATIA.ActiveDocument Set oSel = oDoc.Selection oSel.Search "(CATProductSearch.Part),all" DocCount = oSel.Count SketchCount = oSel.Count For i = 1 To DocCount ReDim Preserve PartArray(i) Set PartArray(i) = oSel.Item(i).Value Next For i = 1 To DocCount Set Part = PartArray(i) Next oSel.Search "(CATPrtSearch.Sketch),sel" For n = 1 To SketchCount ReDim Preserve SketchArray(n) Set SketchArray(n) = oSel.Item(n).Value ...
|
| In das Form CATIA V5 Programmierung wechseln |
