---

Ein Hilfeaufruf an alle Lisp-Experten!
Ich habe für AutoCAD 2002 ein VBA-Makro erstellt und lade dieses mit der Datei acad.lsp wie folgt:

(defun S::STARTUP()
(command "vbaload" "Makro")
)

Das funktioniert auch einwandfrei. Jedoch bekomme ich beim Laden jeder weiteren Zeichnung die AutoCAD-Fehlermeldung: Datei bereits geladen: C:\...\Makro.dvb.

Da ich dies gerne vermeiden möchte hier nun meine Frage. Kann man in der Datei acad.lsp abfragen, ob das Makro schon geladen worden ist? Wenn nein sollte es geladen werden, wenn ja nicht mehr, damit die Fehlermeldung zukünftig unterbleibt.
Für Eure Hilfe wäre ich sehr dankbar.
Gruß
Wolfgang

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

---

Hallo,
nehme doch die acad.dvb aus dem Verzeichnis Sample/vba, Schreibe da deinen Ladebefehl rein. Schalte vorher die beiben vorh. Befehle ab.
Verschiebe dann die acad.dvb ins Support-Verzeichnis. Die Datei wird beim Acad-Start ausgeführt.
Gruß Pan

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

---

(defun c:MyMacro ( / fname $cmdecho)
(setq $cmdecho (getvar "cmdecho"))
(setvar "cmdecho" 0)
(if (setq fname(findfile "MACRO.DVB"))
(command "-VBARUN" (strcat fname "!MODUL_NAME.SUB_NAME"))
);end if
(setvar "cmdecho" $cmdecho)
(princ "\nMCDS Datensystem GmbH - Ihr CAD-Lösungsanbieter!\n")
(princ)
)

Im Beispiel giebt es eine Datei MACRO.DVB mit einem Modul MODULE_NAME, in dieser die Sub ;SUB_NAME definiert ist

Dieser Code in der Datei ACAD.LSP oder ACAD2000DOC.LSP stellt sicher, daß der Befehl MYMACRO die VBA-Datei nur einmal ladet. Die Datei ACAD.DVB würde ich nicht verwenden. Es können ja mehrere Macros geladen werden und jedesmal die ACAD.DVB anpassen wäre fast nicht möglich -> Fehlerquelle.

------------------
Grüße aus Linz

Willi Klemens
MCDS Datensystem GmbH
www.mcds.net

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

---

Hi,
um solche und andere Probleme beim laden/starten von VBA-Makros zu vermeiden, benutze ich folgende Lisp-Befehle:
vl-vbaload
und
vl-vbarun

Keine Ladefehler, keine Virenwarnung, kein Aufwand... Allerbest.

Einfach mal in der VLisp-Hilfe nachschlagen.

------------------
Ciao,
Marc

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

---

Vielen Dank für die Hilfe. Konnte mit Euren Anregung das Problem lösen.

Gruß
Wolfgang

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