Autor
|
Thema: Design Table (Konstruktionstabelle) erzeugen und Parameter hinzufügen (2973 mal gelesen)
|
tonka Mitglied
Beiträge: 59 Registriert: 18.07.2006
|
erstellt am: 18. Okt. 2007 12:14 <-- editieren / zitieren --> Unities abgeben:
Hallo, ich habe zwar hier im Forum schon öfters was über mein Problem gelesen, aber irgendwie hat keiner die Lösung dann geschrieben. Mein Problem: Ich habe nur einen Part offen. In diesem Part befindet sich 1200 Verdrehungen (vom Shape Design Workbench). Nun möchte ich die Parameter "Winkel" jeder einzelnen Verdrehung in eine Konstruktiontabelle bringen. So weit so gut, habe hier im Forum ein Beispiel gesehen, jedoch funktionert das hinzufügen (AddAssociation ) nicht, bloß ich weiß nicht warum? ' Konstruktionstabelle zuweisen ----------------------------------- Dim Rels As Relations Set Rels = CATIA.ActiveDocument.Part.Relations Dim KTab As DesignTable Dim KName As String Dim Beschr As String Dim Pfad As String KName = "Tabelle" Beschr = "Daten" Pfad = "C:\testl.xls" Set KTab = Rels.CreateDesignTable(KName, Beschr, False, Pfad) ' Parameter verknuepfen ------------------------------------------- KTab.AddAssociation PartDoc.Selection.Item2(1), "Laenge" <-- Fehler Ich habe auch Probier, einen neuen Parameter zu erzeugen und diesen einzufügen. Geschrieben hab ich das in VBA und auch als CATScript! Ich hoffe irgendjemand weiß die Lösung! MfG Tonka Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 18. Okt. 2007 12:39 <-- editieren / zitieren --> Unities abgeben: Nur für tonka
|
tonka Mitglied
Beiträge: 59 Registriert: 18.07.2006
|
erstellt am: 18. Okt. 2007 13:06 <-- editieren / zitieren --> Unities abgeben:
|
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 18. Okt. 2007 13:14 <-- editieren / zitieren --> Unities abgeben: Nur für tonka
|
ize Mitglied Student
Beiträge: 28 Registriert: 27.09.2007
|
erstellt am: 18. Okt. 2007 13:16 <-- editieren / zitieren --> Unities abgeben: Nur für tonka
|
tonka Mitglied
Beiträge: 59 Registriert: 18.07.2006
|
erstellt am: 18. Okt. 2007 13:22 <-- editieren / zitieren --> Unities abgeben:
|
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 18. Okt. 2007 13:31 <-- editieren / zitieren --> Unities abgeben: Nur für tonka
Servus Allgemein definiert man die Einheit (Type) eines Parameters in der Tabelle durch Anhängen der Einheit in Klammern nach der Bezeichung, zB d(mm) (siehe auch Online-Doku). Gruß Bernd ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tonka Mitglied
Beiträge: 59 Registriert: 18.07.2006
|
erstellt am: 18. Okt. 2007 13:59 <-- editieren / zitieren --> Unities abgeben:
Diesen Code habe ich probiert -> geht nicht, ich denke aber das ich dich falsch verstanden habe. Code: ' Parameter verknuepfen ------------------------------------------- KTab.AddAssociation PartDoc.Selection.Item2(1), "Length(deg)"
Kannst du deinen schönen formulierten Text in Codezeilen bringen (irgend ein Beispiel)? DANKE MfG Tonka Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
apollo11 Mitglied
Beiträge: 47 Registriert: 31.03.2007 MacBook Leopard 10.5.6 4GB Ram VMWARE 3 WinXP Pro SP2 V5R16 SP5
|
erstellt am: 20. Okt. 2007 18:53 <-- editieren / zitieren --> Unities abgeben: Nur für tonka
Du kannst deine "Parameter" ja auch in einen String schreiben und diesen in eine Textdatei zwischenspeichern und diese auf einmal in den DesignTable übernehmen. Hast du die Aufzeichnungsfunktion schon ausprobiert. Falls es mit der Aufzeichnung nicht funktioniert musst du programmtechnisch meistens einen Umweg gehen! lg Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
apollo11 Mitglied
Beiträge: 47 Registriert: 31.03.2007
|
erstellt am: 20. Okt. 2007 19:11 <-- editieren / zitieren --> Unities abgeben: Nur für tonka
Glaub du suchst nach folgendem: Code: KTab.AddAssociation PartDoc.Selection.Item2(1).Value, "Length(deg)"
Zur Kontrolle kannst du dir auch den Typ des selektierten Elements ausgeben lassen: Code: MsgBox TypeName(PartDoc.Selection.Item2(1))
liefert irgendwas mit SelectedObject oder sowasCode: MsgBox TypeName(PartDoc.Selection.Item2(1).Value)
liefert z.B. StrParam als Objekttyp D.h., dass Item(i) nur ein 'SelectedElement' liefert und dessen Wert folglich das gewünschte Objekt.lg ap Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tonka Mitglied
Beiträge: 59 Registriert: 18.07.2006
|
erstellt am: 22. Okt. 2007 07:56 <-- editieren / zitieren --> Unities abgeben:
Hallo! Leider funktioniert das von dir (apollo 11) auch nicht. Habe den Code jetzt auf 5 Maschinen getestet und es war überall das selbe, jedoch bei einem Kollegen (andere Firma) hat der exakt selbe Code mit exakt gleichem CATIA funktioniert. MfG Tonka Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 22. Okt. 2007 08:02 <-- editieren / zitieren --> Unities abgeben: Nur für tonka
|
tonka Mitglied
Beiträge: 59 Registriert: 18.07.2006
|
erstellt am: 22. Okt. 2007 08:18 <-- editieren / zitieren --> Unities abgeben:
|
Rubio18 Mitglied Ingenieur
Beiträge: 19 Registriert: 10.10.2013 Catia V5 R19SP09 Excel 2010
|
erstellt am: 16. Okt. 2013 13:09 <-- editieren / zitieren --> Unities abgeben: Nur für tonka
|