---

Hallo,

ich habe mir einige hilfreiche Makros gebastelt und mir eine Werkzeugleiste dafür angelegt, von der aus ich die Makros prima starten kann.

Es kommt aber sehr oft vor, daß man genau das Makro, das man zuletzt benutzt hat gleich nochmal anwenden möchte. Bei den üblichen ACAD-Befehlen erreicht man das durch drücken der [Enter]- (bzw. Leer-) Taste.

Makros lassen sich jedoch nur mit "-vbarun" (bzw. "vbaausf") starten, wobei der eigentliche Makroname nach einem [Enter] (bzw. Leerzeichen oder ";") folgt.

Möchte man den letzten Befehl also wiederholen (mit [Enter]), erreicht man nur, daß der AutoCAD-Befehl "-vbarun" wiederholt wird, nicht jedoch das Makro. Man wird aufgefordert, den Makronamen einzutippen.

Ein Einbinden des Makros in die acad.pgp Datei (Kurzbefehle - Aliasnamen) führt auch nicht zum gewünschten Erfolg.

Weiß von Euch eventuell jemand eine Möglichkeit, Makros anders in AutoCAD einzubinden, so daß sie wie "echte" Acad-Befehle behandelt werden?

Für Tips wäre ich Euch sehr dankbar :-)

Servus - Hübi

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Hübi,
mit einem * vor dem Befehlsaufruf im Werkzeugskasten sollte es gehen!
Gruss Patrick

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

dafür verwende ich immer eine Lisp Routine die meine Befehle aufrufen:

(defun C:VBAMakro()
    (command "vbarun....")
(princ))

ist die lisp Datei geladen verhält sich der Befehl wie ein Autocad Befehl, einschliesslich der Wiederholung.

Gruss,
Harry

[Diese Nachricht wurde von harryk am 20. Jan. 2004 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Vielen Dank,

eigentlich hätt ich von selber draufkommen können,
vielen Dank harryk!!!!

Hier werden Sie geholfen :-)))

Gruß - Hübi

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Versuch es auch einmal damit.
(defun c:CoLayCur (/) (vla-runmacro(vlax-get-acad-object) "acad.dvb!modify.CopyLayerCurrent"))

Wenn du keine Objekte vorwählen möchtest oder eine Dialogbox verwendest in der du Punkte abfrägst, dann rufe deine Funktion so auf
(defun c:CoLayCur (/) (vl-vbarun "acad.dvb!modify.CopyLayerCurrent"))

Wenn du oben angeführten code verwendest kannst du auch die Buttons Zoom und Pan verwenden ohne das der Befehl abgebrochen wird.

------------------
Roland

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Leute!

Ich hab einen "alten" Forumbeitrag nochmal hervorgeholt, da bei uns die Vorschläge, welche hier unterbreitet wurden, nicht richtig helfen.
Kann mir da nochmal jemand was zu sagen?

Gruß Petra

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Petra,

Wo hakt es denn bei euch noch?

Gruß, Carsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Carsten!
Wir haben das * vor den Makroaufruf gepackt - Fehlanzeige. Es hat sich zwar was geändert, aber nicht korrekt.
Es gab da einen Tip mit einer lisp-Routine von Harryk. Wir können aber leider überhaupt kein lisp, deshalb wissen wir nicht recht, was der Tip bedeutet. Muss dieser Code in den Werkzeugkasten anstelle des bisherigen Befehlsaufrufs? Oder schreib ich eine extra lisproutine, welche bei jedem Autocad-Start generell geladen wird und die hat Einfluß auf den eigentlichen Programmaufruf?
Sorry    für meine Unwissenheit!

hier mal ein Beispiel-Aufruf aus einem Werkzeugkasten:
^C^C^P-vbarun "C:/acad_macro_test/Programme/Profile.dvb!CProfil_start.CFormular_show" 
LG Petra

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Petra,

Legt euch eine Lispdatei an, worin ihr alle Befehle (Befehlsname für Makros) definiert:

(Defun c:test (/) (VL-VBARun "Stempel"))

Im Beispiel rufte der Befehl das Makro / die Funktion "Stempel" auf.

Diese Lisp packt ihr dann unter Appload in die Startgruppe (Wo auch die DVBs zum Starten eingetragen werden sollten) und schon sollte es klappen.

Gruß, Carsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Carsten,
es hat leider nicht funktioniert.
Mein Kollege hat eine test.lsp geladen, wo folgendes drinsteht:
(Defun c:test (/) (VL-VBARun "C:/acad_macro_test/Programme/Profile.dvb!CProfil_start.CFormular_show"))
Danach das Programm mit Werkzeugkasten gestartet.
Alles beim alten.....

[Diese Nachricht wurde von Gigerota am 25. Jan. 2007 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

trage doch in die Lisp Datei folgendes ein

Code:

---

defun c:BlockInfo (/) (vla-runmacro(vlax-get-acad-object) "ZeigeBlockInfo"))

---

ZeigeBlockinfo ist eine Sub in einem Usermodul.

Code:

---

Sub ZeigeBlockinfo
  FormBlockInfo.Show
end sub

---

Die ruft das Formular auf.
Sieh auf mal hier oder hier

Stelli

------------------
Warum lisp'eln wenn's auch anders geht.
www.ib-stelberg.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Vielen Dank,

ich werds weitergeben!
Die links waren prima!

Petra

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP