Lisp depuis bouton de cde VBA

[pixel61]

Bonjour à tous

 

Je cherche la syntaxe pour charger puis executer un fichier lisp depuis un bouton de cde en VBA.

j'ai essaié ça, mais ça ne marche pas.

 

Private Sub CommandButton1_Click()

ThisDrawing.SendCommand ("Load" & " " & "C:\\Documents and Settings\user\\My Documents\\AutoCAD\\Fonctions\\ExtrBlocs") & vbCr & "btowb" & vbCr

Unload UserForm

End Sub

 

merci pour votre aide

A+

[didier]

coucou

 

c'est pas clair ton truc.

 

pourquoi écrire en VBA un lancement de lisp ?

 

tu nous en dis plus, s'il te plaît.

 

amicalement

 

 

[Bred]

Salut,

Charges le lisp au démarrage (avec AutoCAD.lsp par ex), puis lance le comme une commande :

 

ThisDrawing.SendCommand "(MACOMMANDE)" & vbCr

[pixel61]

Salut

 

L'idée c'est qu'au lieu de faire une boite de dialogue en DCL, la faire avec une userform en VBA, (plus pour une question de facilité et de possibilités d'interface).

Dans cette boite de dialogue rassembler plusieurs Lisp (rangé par sujets) chargés puis exécuter depuis des boutons de commande.

C’est vrais que je pourrais charger mes lisp avant dans AutoCAD.lsp, puis utiliser la méthode à Bred, mais je voulais essayer dans la mesure du possible de charger les

fichiers "Lisp" seulement en cas de besoin, peut-être je me complique la vie pour rien :)

 

Tout dépend si dans VBA avec "ThisDrawing.SendCommand " on peut charger un fichier Lisp, ou alors ce n'est pas la bonne fonction ??

 

Encore merci pour votre aide

 

A+

 

[lili2006]

Bonjour à toutes et tous,

 

je voulais essayer dans la mesure du possible de charger les

fichiers "Lisp" seulement en cas de besoin,

 

C'est justement le but avec le fichier acaddoc.lsp,...

 

Exemple =>

 

(autoload "mon lisp" '("mon lisp")) 

 

En ce qui concerne la BD, un sujet (en lisp et DCL) qui pourrait t'intéresser,...

 

900x400http://free0.hiboox.com/images/3409/29beadfd98feab5f52a00fb81b778537.jpg[/img]

[pixel61]

Salut lili

 

C'est exactement ce que je voulais faire avec avec une boite de dialogue en VBA :)

 

dommage pas l'avoir vu avant

 

merci

 

 

[Edité le 23/9/2009 par pixel61]