---

Hallo,
ich habe folgendes Problem, vielleicht hat ja jemand Erfahrung damit.
Ich bastle gerade ein VBA-Makro mit einer Form. Auf der Form habe ich einen Button "Select". Wenn dieser angeklickt wird, möchte ich ein Produkt aus der Produktstruktur von (CATIA) selektieren. Nur die Form lässt es nicht zu, beim anklicken auf der CATIA-Oberfläche kann ich nichts selektieren.
Ich brauche einen Weg um die Form vielleicht zu deaktivieren oder verstecken (wie auch immer man sowas löst) um so in CATIA mit der Maus selektieren zu können. Das Selektierte Objekt möchte ich natürlich in das Makro verarbeiten.
Ich freue mich auf jede Hilfe.

Gruß
CatMike

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo CatMike,

du mußt die Form Non-Modal aufrufen:

Code:

---

Form1.Show vbModeless ' oder Form1.Show 0

---

Gruß
CAMiCADse

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo CAMiCADse,
vielen Dank. Ich habe nun das Problem, dass ich nach der Selektion nicht mehr zurück ins Makro komme. Dabei nutze ich SelectElement2. Wie kann ich eigentlich dem Makro mitteilen, dass es weitergehen soll, nach dem einmal selektiert wurde?
Über SelektElement wollte ich die Selektion übernehmen, nur dazu kommt es nicht. Ich habe eine Msgbox vorgeseh, um den Namen des Selektierten Objekts auszugeben. Dazu kommt es nicht.

Ich nutze die Gelegenheit, um eine andere Frage loszuwerden. Ich habe gemerkt, dass "Sub GetComponents(CATSafeArrayVariant oAxisComponentsArray)" bei CATSkripts funktioniert, aber mit VBA nicht. Mach ich da etwas falsch?

Gruß
CatMike

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,
es hat nun funktioniert.
Ich habe Me.hide vor der Selektion und Me.Show nach der Selektion eingetragen.

Nun bleibt die Frage mit dem GetComponents, ich freue mich über jeden Hinweis.

Gruß
CatMike

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo CatMike,

VBA hat leichte Probleme mit Objecten vom Typ "CATSafeArrayVariant", wenn diese als ein bestimmter Typ deklariert wurden. Kommentiere einfach die Typ-Deklaration aus, z.B.:

Code:

---

Dim oAxisComponentsArray() 'As Variant

---

Vielleicht geht es dann.

mfg,
Lusilnie

------------------
Alle Aussagen zu DassaultSystemes-Produkten sind sehr optimistisch, selbst diese!!!

frei nach größeren Geistern

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP