Attivare Excel

[rpor66]

wie machen Sie excel aktiv von lisp?

mit (setq exc_obj (vlax-get-or-create-object "excel.application"))
Sie erstellen den Link zu excel, aber was ich brauche ist, den aktiven Zustand von autocad zu excel zu übergeben.

Danke.

 

[confutatis]

(setq exc_obj (vlax-get-or-create-object "excel.application"))
(vlax-invoke-method (vlax-get-property exc_obj "workbooks")
(vlax-put-property exc_obj 'visible :vlax-true)

la seconda riga ti vedere un Nebellio nuovo, altrimenti apre solo excel.

 

[rpor66]

Danke.
bis Sie Excel öffnen, hinzufügen oder das aktive Arbeitsbuch verwenden, habe ich es geschafft, wo ich zum Absturz gegangen ist, hat sich im Vordergrund ausgezeichnet.
um die Idee besser platzieren die vba Teil von Excel zu machen autocad aktiv nach der Schaffung des Links:
acad = fngetacadapplication() '(creaobject function)
acad.visible = true

set document = acad.activedocument
acadver = links(document.getvariable("acadver"), 4)
Wählen Sie Häuser acadver
Häuser "18.2"
appactivate "autocad 2012"
Häuser "18.1"
appactivate "autocad 2011"
Ende wählen

in vba gibt es den Interaktionsbefehl.appaktivieren aber in lisp fand ich keine geeignete Methode.

Ich warte.

Bye

 

[confutatis]

Ich muss ehrlich sein, ich habe nichts darüber gefunden.
In der Tat hatte ich nie die Notwendigkeit, Excel in "erste Etage" zu setzen, aber nur um eine Lese- und Schreibdaten-Schnittstelle zwischen diesen und Autocad zu machen.
Ich werde weiter nachsehen, ob ich etwas finde.

 

[rpor66]

Ich hatte an ein kleines vb.net-Programm gedacht, das die Funktion erfüllt, aber ich habe nicht einmal visuelles Studio installiert.
Ich schaue immer wieder und danke dir.

 

[rpor66]

zum Schluss, die Funzione
(defun getexcel)
(setq obxls (vlax-get-or-create-object "excel.application"))
(vla-put-visible obxls t)
(vlax-release-object obxls)(gc)
)

Er arbeitete, in patto di avere der Herausgeber des vlisp chiuso, strano ma vero.

Bye