|
CATIA V5 Programmierung : Querschnittsermittlung
MG8684 am 08.02.2012 um 13:09 Uhr (0)
Hallo Liebe Community,ich hab folgendes Szenario:ich würde gerne von einem Körper z.B. dem Hauptkörper mehrere Querschnitte in einem Abstand x von einer Referenz erzeugen. Anschließend würde ich gerne diese Querschnittsflächen ausmessen und alle Werte in eine Excel Tabelle oder eine Textdatei übertragen lassen.Kennt da jemand vielleicht ein Skript das dies automatisieren kann. Vielleicht könnt ihr mir auch Tipps geben zum umsetzten....
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User Properties in Excel
MG8684 am 20.04.2012 um 12:13 Uhr (0)
Hallo Leute,ich würde mir gerne eine Stücklsite in Excel schreiben aber ich verzweifele schon am anfang. Ich hab folgenden Code über die SuFu gefunden:Dim y As Integer ZeilenzählerDim xMenge Spalte MengeDim xName SPalte NameDim xPartNumber Spalte PartNumberSub CATMain() y = 1 xMenge = 1 xName = 2 xPartNumber = 3 xWerkstoff = 4 Set CATIA = GetObject(, "CATIA.APPLICATION") Set oRoot = CATIA.ActiveDocument Set oProducts = oRoot.Product.Products Call SUB_ProdScan(oProducts) ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User Properties in Excel
MG8684 am 20.04.2012 um 13:09 Uhr (0)
Du meinst also ich sollte mir im Part selber so ne Eigenschaft erzeugen und mit dem Recorder in Catia aufnehmen Das dann wieder für das einlesen in Excel einfach nur tauschen??
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User Properties in Excel
MG8684 am 23.04.2012 um 12:24 Uhr (0)
Erstmal danke für eure antworten....Kanni ich nicht einfach oProducts.Item(I).ReferenceProduct.Userproperties.Item("Werkstoff").ValueAsStringIf schonDrinn = False Then Tabelle1.Cells(y, xMenge).Value = 1 Tabelle1.Cells(y, xName).Value = Products.Item(I).Name Tabelle1.Cells(y, xPartNumber).Value=Products.Item(I).PartNumberEnd Ifdazwischen setzen mit bezug auf die zelle in excel? Vielleicht ist noch zu erwähnen das dieses makro aus exdcel gestartet wird....
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User Properties in Excel
MG8684 am 23.04.2012 um 13:06 Uhr (0)
Wenn ich das um diese zeile ergänze bekomme ich die Fehlermeldung:Objekt unterstützt diese Eigenschaft oder Methode nicht!deklariert hab ich die spalte auch am anfangDim y As Integer ZeilenzählerDim xMenge Spalte MengeDim xName SPalte NameDim xPartNumber Spalte PartNumberDim xWerkstoff Spalte WerkstoffSub CATMain() y = 1 xMenge = 1 xName = 2 xPartNumber = 3 xWerkstoff = 4 Set CATIA = GetObject(, "CATIA.APPLICATION") Set oRoot = CATIA.ActiveDocument Set oProducts = oRoot.Produ ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User Properties in Excel
MG8684 am 23.04.2012 um 14:07 Uhr (0)
Also ich habs mal eingesetzt mehr aber auch nicht :-)gearbeitet habe ich damit noch nicht....PArameter sind schon bereits angelegt...möchte nur alle aprts auslesen und in excel übertragen udn gegebenfalls die Menge erhöhen
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User Properties in Excel
MG8684 am 24.04.2012 um 08:27 Uhr (0)
Kein Problem Wenigstens sieht die Fehlermeldung schone inmal anders aus also wenn ich es unter excel laufen lass dann sagt der mir "systemfehler....." und unter VBA in Excel bekomm ich die Meldung "das Verfahren UserRefProperties ist fehlgeschlagen"Der steigt schon beim ersten Teil aus....der name und die PArtnummer werden in die zellen geschrieben aber beim Werkstoff bleibt der dann hängen.....habs auch schon mal mit anderen eingenschaften versucht funzt auch nicht.....
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User Properties in Excel
MG8684 am 20.09.2012 um 14:52 Uhr (0)
Hallo zusammen, nach langer zeit würd ich das thema doch gerne wieder aufgreifen.....also über Ratschläge vone uch bin ich schon dankbar habe mir mein Makro auch weiter anpassen können aber im Bezug auf die UserProps seh ich einfach kein Licht am ende des Tunnels...uich glaube ich seh den Wald vor lauter Bäume nicht.Stueckliste.Cells(y, xWerkstoff).Value = oProducts.Item(I).UserRefProperties.Item("Werkstoff").ValueDas Verfahren USerRefProperties ist fehlgeschlagen lautet die Fehlermeldung....selbst mti Ref ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User Properties in Excel
MG8684 am 21.09.2012 um 07:32 Uhr (0)
Hi,dacht ich mir doch das über den namen etwas schwierig wird aber die UserProps sind doch auch durchnummeriert könnte man nicht da was anhand von Positionen machen?Deiner antwort zufolge müsste ich ja den namen in meinem code mit dem UserProp vergleichen...ging deine antwort noch weiter? Denn bei entweder würde man ja noch etwas erwarten
|
| In das Form CATIA V5 Programmierung wechseln |
