论坛 › VBA/ActiveX 函数库 › [VBA函数]：自动生成命令来自动加载及执行VBA程序

yxljx 发表于 2006-1-19 23:06:44

[VBA函数]：自动生成命令来自动加载及执行VBA程序

(defun AutoVBALoad (cmdname project macro)
(eval
    (list 'defun
(read (strcat "C:" cmdname))
nil
(list
    'vl-vbarun
    (strcat
      project
      "!"
      (if macro
macro
cmdname
      )
    )
)
(princ)
    )
)
)

qjcpj 发表于 2006-1-21 01:42:45

以前在明经看过此程序，楼主应加[转帖]二字比较妥当！

yxljx 发表于 2006-1-21 10:40:44

小弟新来，谢谢大哥提醒

查看完整版本: [VBA函数]：自动生成命令来自动加载及执行VBA程序