|
CATIA V5 Programmierung : Import Smarteam Werte in Catia
Manuel90 am 17.08.2016 um 15:36 Uhr (1)
Also kleines Update!Ich habs hinbekommen das Feld Beschreibung in das Feld Beschreibung in Catia zu mappen. Endlich...Das Makro zum erstellen der Properties klappt auch.Nur das Makro zum Füllen der Properties mit Parametern haut mir nicht hin... Wie bekomme ich "parameter a" in "Propertie a" usw...Muss doch simpel sein^^Außerdem 2 kleine Makros für die BOMs die uns gute Arbeit abnehmen könnten habe ich geschafft.Ihr würdet wohl schmunzeln über diese 10 Zeiler, aber ich bin stolz darauf.Jezt wäre noch die F ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Import Smarteam Werte in Catia
bgrittmann am 17.08.2016 um 16:24 Uhr (1)
ServusWas meinst du mit Zitat:Wie bekomme ich "parameter a" in "Propertie a" usw...Wie man einen Parameter wieder anspricht und einen Wert zuweist steht in Ricks Beispiel.GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Import Smarteam Werte in Catia
Manuel90 am 18.08.2016 um 08:33 Uhr (1)
Ich kann dem Script leider nicht ganz folgen, ich habe nie irgendeine Programiersprache gelernt, das ganze ist ziemlich harte Kost für mich bisher. Aber mit dem Script zum erstellen komme ich klar. Es erstellt mir die Userproperties die ich brauche und kann das auch sehr ienfach anpassen, besten Dank.Mit dem Mapping bekomme ich die Werte aus Smarteam rein und umgekehrt. Das klappt mittlerweile ganz gut! Wunderbare Sache!Jezt wäre die frage wie ich in das Script zum erstellen mehrere Werte für eine Properti ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Import Smarteam Werte in Catia
Manuel90 am 18.08.2016 um 10:40 Uhr (1)
Vielen Dank für den Link, ja genau das suche ich oder vielmehr will ich erreichen!Ich kriegs aber nicht hin das in mein skript zu bekommen... wie gesagt, ich kann eigentlich nicht programmieren wie bekomme ich das mit dem array hier rein:Sub CATMain() Dim MyDocument As Document Set MyDocument = CATIA.ActiveDocument Dim MyParameters As Parameters On Error Resume Next Set MyParameters = MyDocument.Parameters If Err.Number 0 Then Dim MyPart As Object Set MyPart = MyDocument.GetItem(1) ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Import Smarteam Werte in Catia
Manuel90 am 18.08.2016 um 11:00 Uhr (1)
Hallo Randle!ums kurz zu sagen, Geiler Sch...Klappt wunderbar! Das ganze für mehrere Werte zu dublizieren habe ich geschafft!Ich sage herzlichen Dank und trink nen Kaffee auf dich und die anderen die geholfen haben natürlich auch!Jezt das ganze in 2 Wochen dem eigentlichen Admin vorstellen wenn er wieder da ist, denn dieser kümmert sich leider nicht so sehr um solche dinge.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Import Smarteam Werte in Catia
Randle am 18.08.2016 um 11:54 Uhr (1)
Hallo,MyStrParam.ValueAsString "1"oder MyStrParam.ValueAsString arrayOfVariantOfBSTR1(0)GrußRandle
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Import Smarteam Werte in Catia
Manuel90 am 18.08.2016 um 16:18 Uhr (1)
Ich krieg nich mal das in mein makro rein... puh..ich sollte wirklich mal ne schulung kriegen^^
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Import Smarteam Werte in Catia
bgrittmann am 18.08.2016 um 17:20 Uhr (1)
ServusWenn das dein ganzer Code ist, wie wäre nach der Zeile mit dem SetEnumerateValues.Obwohl du später das Makro aufbohren musst: sind die Parameter schon vorhanden, wenn nicht Parameter erst anlegen und danach mit dem Wert füllen.GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Import Smarteam Werte in Catia
Manuel90 am 19.08.2016 um 08:55 Uhr (1)
Das ist wohl zu hoch für mich... sorry, funzt nicht wirklich. Erschwerend kommt dazu das ich den Visual Basic Editor nicht starten kann. der ist steths ausgegraut.Ich kann nur in dem makro fenster rumtippen was durchaus schwieriger erscheint, selbst wenn man keine Ahnung hat^^
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Linienstärke in Drawing ändern (VisProperties)
bgrittmann am 13.10.2016 um 12:07 Uhr (1)
ServusDas ist der Inhalt der Doku die du auch im Catia-Installationsverzeichnis (V5Automation.chm) findest.Dies sollte die erste Anlaufstelle bei Fragen sein.GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ausgabedatei fuer PDF-Drucker
bgrittmann am 13.10.2016 um 13:32 Uhr (1)
ServusWas hast nun genau vor?Ein jpg könntest du auch ohne Drucker erstellen (siehe Uwes Beitrag)Dazu könntest du ein Makro von der Catia.cad.de modifizieren.GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ausgabedatei fuer PDF-Drucker
bgrittmann am 13.10.2016 um 15:31 Uhr (1)
ServusWenn du die DPI einstellen willst geht das wohl nur über einen Drucker.Hier ein Beispiel:Code:Sub CATMain()dim i as integerdim MyPageSetup as PageSetupdim sOutputDirectory as Stringdim sFileName as StringDim oDoc as DocumentDim oSheets as Sheetsdim oSheet as SheetsOutputDirectory = "C: emp"Set oDoc = CATIA.ActiveDocumentSet oSheets = oDoc.SheetsFor i = 1 to oSheets.Count If Not oSheets.Item(i).isDetail then Set oSheet = oSheets.Item(i) Set MyPageSetup = oSheet.PageSetup MyPageSetup.PaperSize = ca ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Umbenennungsmakro anpassen
Engineer723 am 24.10.2016 um 14:25 Uhr (1)
Hallo,danke für den Link. Also das Suchen und Ersetzen Makro würde schon ausreichen, da in der V6 die Zeichnungen ja übers PLM direkt verlinkt sind.Ich hätte mit diesem Makro angesetzt:Sub traverse(Prod, origstr, newstr) set refp = Prod.ReferenceProduct if instr(refp.Name, origstr) then newpname = Replace(refp.Name, origstr, newstr) refp.Name = newpname end if if instr(refp.PartNumber, origstr) then newpnum = Replace(refp.PartNumber, origstr, newstr) refp.PartNumber = newpnum end if Set p ...
|
| In das Form CATIA V5 Programmierung wechseln |
