| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | PNY: der unverzichtbare Partner für umfassende KI-Lösungen von Workstations bis zu Edge Computing und KI-Cluster-Bereitstellung, eine Pressemitteilung
|
|
Autor
|
Thema: Compass und VBA??? (2211 mal gelesen)
|
RoccoRalle
Mitglied
   Beiträge: 52
Registriert: 24.04.2006 MS Windows 7-64bit SP1
4GB RAM
AIP 2010, SP3
PSP 2010
|
erstellt am: 02. Feb. 2007 19:35  <-- editieren / zitieren -->   Unities abgeben:          
Hi, gibt es die Möglichkeit über VBA (Inventor) die Compass Funktion "Eigenschaften übergeben" usw. auszulösen? Da wir bei Bauteilen und Baugruppen div. Properties ändern, muß immer anschließend "Eigenschaften übergeben" gwählt werden, damit diese auch in Compass landen.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
chako74
Mitglied
Teschek
Beiträge: 127
Registriert: 04.12.2003
|
erstellt am: 07. Apr. 2007 11:27 <-- editieren / zitieren --> Unities abgeben: Nur für RoccoRalle 
|
SEHER
Mitglied
Systemanalytiker
Beiträge: 1203
Registriert: 13.03.2001 Inventor 2 bis 2022
häufig wechselnder Rechnerverkehr
|
erstellt am: 10. Apr. 2007 10:06 <-- editieren / zitieren --> Unities abgeben: Nur für RoccoRalle
|
RoccoRalle
Mitglied
Beiträge: 52
Registriert: 24.04.2006
|
erstellt am: 10. Apr. 2007 21:40 <-- editieren / zitieren --> Unities abgeben:
Danke Seher, habe die Doku durchgeackert, die AIMDAddIn 11.0 Library hinzugefügt scheite aber an folgender Stelle: Public Sub Compass_Test() Dim oAIMDAutomation As AIMDAutomation Dim oAIMDkey As String oAIMDkey = oAIMDAutomation.Compass.GetAIMKEY _(ThisApplication.ActiveDocument) End Sub mit folgender Fehlermeldung: - Objektvariable oder ... nicht festgelegt Wer kann mir helfen ??? (Laut Duku ist das alles richtig!) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
PaulSchuepbach
Moderator
Programmierer
   
Beiträge: 1005
Registriert: 01.10.2003
|
erstellt am: 11. Apr. 2007 07:33 <-- editieren / zitieren --> Unities abgeben: Nur für RoccoRalle
Zitat:
Original erstellt von RoccoRalle:
Danke Seher,habe die Doku durchgeackert, die AIMDAddIn 11.0 Library hinzugefügt scheite aber an folgender Stelle: Public Sub Compass_Test() Dim oAIMDAutomation As AIMDAutomation Dim oAIMDkey As String oAIMDkey = oAIMDAutomation.Compass.GetAIMKEY _(ThisApplication.ActiveDocument) End Sub mit folgender Fehlermeldung: - Objektvariable oder ... nicht festgelegt Wer kann mir helfen ??? (Laut Duku ist das alles richtig!)
Hallo Ralf, ich kenne die Compass-API zwar nicht, aber das Problem liegt offensichtlich bei Dim oAIMDAutomation As AIMDAutomation Du hast damit die Objektvariable erst deklariert, aber noch keinen Verweis gesetzt, damit Du sie dann weiter unten nutzen kannst. Die Zeile muss entweder so aussehen: Dim oAIMDAutomation As New AIMDAutomation oder aber so: Dim oAIMDAutomation As AIMDAutomation
Set oAIMDAutomation = .... (irgendwie sowas: = AIMDAddIn.AIMDAutomation) ------------------
Grüsse, Paul Inventor-Programmierung, Inventor-Tools und Inventor API-Schulung thinkCAD Web-Kataloge Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
daywa1k3r
Ehrenmitglied V.I.P. h.c.
Softwareentwickler
Beiträge: 3497
Registriert: 01.08.2002 Alienware m17x, Win7, Inventor2012
|
erstellt am: 11. Apr. 2007 09:57 <-- editieren / zitieren --> Unities abgeben: Nur für RoccoRalle
|
| |
freak-tom
Mitglied
PDM-/CAD-Admin
Beiträge: 347
Registriert: 07.03.2006
|
erstellt am: 06. Okt. 2009 12:17 <-- editieren / zitieren --> Unities abgeben: Nur für RoccoRalle
Hallo Igor, Zitat:
die schreiben doch, dass du alle AddIn’s durchlaufen sollst um das Compass AddIn zu finden. Dann musst du dir da das Automation Objekt holen.
Kannst du mir erklären, wie das funktioniert? MfG
Thomas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
