Excel VBA, um Catia V5 Modelleigenschaften zu ändern

Question

Ich bin ein Anfänger, wenn es um CATIA geht, aber ich habe eine Menge Erfahrung mit VBA in Excel. Ich versuche, ein Excel-Makro zu entwickeln, das alle Teile einer Catia-Assembly durchläuft, sie umbenennt, indem ich den Text an der gewünschten Stelle splice, und sie dann neu anordne (alphanumerische aufsteigende Reihenfolge). Ich glaube, ich kann den Algorithmus für das tatsächliche Spleißen, Umbenennen, Neuordnen von Bit schreiben. Worüber ich mich ärgere, ist, Catia mit Excel zu betreiben. Es gibt nicht viele Informationen im Internet. Ich habe alle Kästchen in den Referenzen markiert, die mit CATIA beginnen. Ich habe dies bisher geschrieben:

Dim CATIA as object 
Set CATIA = Getobject(,"CATIA.Application") 
Dim oMyDoc as Document 
Dim oCurrentProd as Product 'I assume the individual parts within CATIA are_ 
           referenced as products? 
Set oMyDoc = CATIA.ActiveDocument 

Wenn ich versuche, und nur den obigen Code ausführen, bekomme ich eine Fehlermeldung, ‚Klasse nicht Automation unterstützt‘. Was bedeutet, dass meine Grundlagen falsch sind. Ich würde mich über diese und andere Informationen freuen, die es mir ermöglichen würden, meine Aufgabe zu erfüllen. Vielen Dank.

Answer 1

Wenn ein Code aus CATIA in VBA ausgeführt wird, erhalten einige Objekte einen Fehler, wenn sie richtig eingegeben werden. Versuchen Sie, diese Objekte ohne Typ oder Variante zu deklarieren.

Dim CATIA as 'object 
Set CATIA = Getobject(,"CATIA.Application") 
Dim oMyDoc as 'Document 
Dim oCurrentProd as 'Product 
Set oMyDoc = CATIA.ActiveDocument 

oder

Dim CATIA as variant 
Set CATIA = Getobject(,"CATIA.Application") 
Dim oMyDoc as variant 
Dim oCurrentProd as variant 
Set oMyDoc = CATIA.ActiveDocument 

empfehle ich Ihnen zuerst getippt sie richtig zu erklären, so dass Sie die Methoden des Objekts sehen können und die Eigenschaften und es danach mit `Dim oMyDoc‚als Dokument