|
Autocad VBA : Problem mit Excelverknüpfung
VBA-Piet am 09.05.2005 um 16:51 Uhr (0)
Hallo Experten, ich stehe vor einem mir unerklärlichen Problem. Und zwar möchte ich aus Excel mit dem Befehl set AcadApp=GetObject ( , AutoCAD.Application ) ein AutoCad(2000)-Objekt erstellen. Das funktioniert auf meinem Rechner auch ganz wunderbar, nur auf anderen Rechnern erscheint die Fehlermeldung Objekterstellung durch ActiveX-Komponente nicht möglich , auch wenn AutoCad geöffnet ist. In der Hilfe zum Fehler stand was von einem Lizenzschlüssel in der Systemregistrierung, der gefunden werden müsse. H ...
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : Problem mit Excelverknüpfung
VBA-Piet am 10.05.2005 um 09:50 Uhr (0)
Hallo BloodyMess, danke für den link. Ich möchte mit meiner Excel-Tabelle jedoch auf verschiedene Versionen von Autocad zugreifen können, deshalb habe ich mich für eine späte Bindung entschieden und gar keinen Verweis auf die AutoCad-Objektbibliothek gesetzt sondern AcadApp zunächst als Object deklariert und mit AcadApp=GetObject ( , AutoCAD.Application ) den Bezug zu AutoCad hergestellt. Das klappt auf meinem Rechner auch problemlos, nur beim Versuch das Programm auf fremden Rechnern zu starten kam in e ...
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : Problem mit Excelverknüpfung
VBA-Piet am 11.05.2005 um 13:34 Uhr (0)
Hallo BloodyMess, erstmal vielen Dank für die schnelle Antwort. Ich habe jetzt eine Weile getüftelt und werde jetzt die Routine aus deinem empfohlenen Link einbauen, die die Version von AutoCad ermittelt, als 14 für Acad 14, 15 für Acad 2000 usw. Damit klappts dann hoffentlich auch auf anderen Rechnern, ich werde das Ergebnis hier vermelden. Ich selber nutze Acad 2000. In der Registrierung habe ich den CurVer-Wert gefunden, er ist bei mir ACAD-1001:407. Ein Aufruf mit: Set AcadApp = GetObject(, AutoCAD.A ...
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : Problem mit Excelverknüpfung
VBA-Piet am 12.05.2005 um 13:19 Uhr (0)
Verflixt, ich habs gerade auf dem fremden Rechner ausprobiert und es klappt nicht so richtig! Und zwar sind auf diesem Rechner sowohl Acad 14 als auch Acad 2000 installiert, eine Verbindung kommt aber nur mit Acad 14 zustande, obwohl ich eine Fallunterscheidung eingebaut habe: Public Function AutoCADVersion() On Error Resume Next Err.Clear Set AcadApp = GetObject(, AutoCad.Application.14 ) If Err.Number = 0 Then AutoCADVersion = 14 Exit Function End If Err.Clear Set AcadApp = GetObject(, AutoCa ...
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : Problem mit Excelverknüpfung
VBA-Piet am 12.05.2005 um 21:50 Uhr (0)
Hallo Bloody Mess, Dein erster link enthielt wohl tatsächlich schon die Lösung: Dim acApp As AutoCAD.AcadApplication Set acApp = New AutoCAD.AcadApplication ich hab es bloß nicht kapiert. Ich habe zwischenzeitlich in der Autodesk knowledge base gestöbert und darin einen ähnlichen Tipp gefunden, nämlich Set acadApp = AcadApplication. Damit funktioniert s! Eigentlich wollte ich überhaupt keine Verweise auf AutoCad setzen, da mein Code als ActiveX control aufgerufen wird (Kopierschutz) und mit allen Acad- ...
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : Wie verschlüsselle oder compiliere ich VBA Projekte
VBA-Piet am 23.12.2005 um 21:01 Uhr (0)
Hallo decarama,in der ct 5/2005 ist ein Artikel, wie man VBA-Quelltext von Office-Makros als Active-X Controls auslagert und somit den Quelltext verbirgt. Habe ich selbst bei Excel-Makros, die auf AutoCad zugreifen, erfolgreich praktiziert. Das müsste eigentlich auch bei AutoCad-Makros funktionieren.Grüße Piet
| | In das Form Autocad VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
