卸载vba

BIGAL · 发表于 2022-7-6 22:42:59

一个非常简单的问题是，我们有一个第三方程序，它有时会通过显示消息框来中断命令，您必须按Ok才能继续。它使用某种形式的反应器。

使用vbaman，您可以卸载它，尝试从命令行/菜单中找到正确的sysntax来卸载它。

请帮忙。

BlackBox · 发表于 2022-7-6 23:22:26

请阅读此线程。当我早上上班时，我应该能够调整子函数，使其接受有效的命名VBA应用程序（现在在我的iPhone上）。

编辑：忘记说看帖子#6。

HTH公司

BIGAL · 发表于 2022-7-6 23:41:26

谢天谢地，Renderman认为只要设置完整的文件名（包括变量的路径）就很容易了，然后（命令“\u vbaunload”vbaprogfiletoremove）简单的东西通常很难猜到。据我所知，程序名的代码只有两行。上面的代码帮助找到了完整的路径名。

只是添加了一个princ和rem命令来查看当前加载的内容

copy


(defun Get-VBA-Project-list ( / ACAD VBAO PRO N NAMES)
(vl-load-com)
(if (and
(setq ACAD (vlax-get-acad-object))
(setq VBAO (vla-get-vbe ACAD))
(setq PROs (vlax-get VBAO "VBProjects"))
)
(repeat (setq N (vla-get-count PROs))
(setq PRO (vla-item PROs N)
NAMES (cons
(list
(vlax-get PRO "Name")
(vlax-get PRO "FileName")
)
NAMES)
N (1- N) ) ) )
NAMES ) )
(defun C:UNVBA ( / app apps)
(setq apps (Get-VBA-Project-List))
(foreach app apps
;(command "_VBAUNLOAD" (cadr app))
(princ (cadr app))
)
)

BlackBox · 发表于 2022-7-6 23:51:31

不客气！

卸载vba

发表回复

精选推荐