|
Autocad VBA : ACAD-Befehl aus Excel starten
Alfonso am 14.02.2006 um 18:14 Uhr (0)
Hallo zusammen,Ich habe mir in Excel ein Programm erstellt um Stücklisten zu erstellen. Nun möchte ich gerne das ich von Excel aus die Maße von Objekten aus AutoCAD einfüge.Das ganze soll folgendermaßen aussehen:- Button in Excel klicken- automatisch nach AutoCAD wechseln- automatisch Befehl aufrufen (der Befehl ist ein Lispprogramm womit ich maße in der Zwischenablage speicher)- automatisch zurück nach Excel wechselnNun zu meiner Frage:Was muss ich im VBA-Editor in Excel eingeben, das nach AutoCAD gewec ...
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : ACAD-Befehl aus Excel starten
Alfonso am 14.02.2006 um 20:23 Uhr (0)
Hallo Nancy,danke für die schnelle Antwort. Es funktioniert gut. Ist es auch noch möglich das eine Meldung in Excel kommt, wenn AutoCAD oder eine Zeichnung nich geöffnet ist?Hier der VBA-Code:Sub Maßstabholen() Dim acApp As Object, x Set acApp = GetObject(, "Autocad.application") x = acApp.activedocument.FullName Cells(1, 1) = x AppActivate "AutoCAD 2000" acApp.activedocument.sendcommand "T2" & Chr(13) acApp.activedocument.sendcommand "vbastmt" & Chr(13) & "msgbox now" & Chr(13) AppActivate "Micro ...
| | In das Form Autocad VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |