如何用在VBA中运行指定路径的cmd文件？

lwx228

语虚何以言知 发表于 2020-7-1 13:42
Sub xxx()
Shell "c:\windows\system32\cmd.exe"
Shell "c:\123.cmd"

我在资源管理器打开该CMD文件的初始界面

向東

lwx228 发表于 2020-7-1 14:30
我在资源管理器打开该CMD文件的初始界面

cmd能够执行几乎所有的dos命令，用shell函数都可以实现。
Shell "cmd.exe"       '打开cmd窗口
Shell "cmd.exe /c copy c:\1.txt d:\"  '把c盘的1.txt文件复制到d盘。
Shell "cmd.exe /c ping 127.0.0.1" 'ping ip
Shell "cmd.exe /c del c:\1.txt"  '删除1.txt
................

cmd后面的/c 是啥？
/C 执行字符串指定的命令然后终断

还有，
/K 执行字符串指定的命令但保留
/S 在 /C 或 /K 后修改字符串处理(见下)
/Q 关闭回应
/D 从注册表中停用执行 AutoRun 命令(见下)
/A 使向内部管道或文件命令的输出成为 ANSI
/U 使向内部管道或文件命令的输出成为 Unicode
/T:fg 设置前景/背景颜色(详细信息，请见 COLOR /?)
/E:ON 启用命令扩展(见下) /E:OFF 停用命令扩展(见下)
/F:ON 启用文件和目录名称完成字符 (见下)
/F:OFF 停用文件和目录名称完成字符(见下)
/V:ON 将 c 作为定界符启动延缓环境变量扩展。如:
/V:ON 会 允许 !var! 在执行时允许 !var! 扩展变量 var。
var 语法 在输入时扩展变量，这与在一个 FOR 循环内不同。
/V:OFF 停用延缓的环境扩展。
具体的说明可以cmd窗口输入cmd /? ，然后一路回车。

语虚何以言知

lwx228 发表于 2020-7-1 14:30
我在资源管理器打开该CMD文件的初始界面

我给你代码第一行是调用cmd，第二行是执行某个cmd后缀的文件



同十二楼，我也有个疑问，你为啥不直接vba中写cmd命名非得调用？

lwx228

向東 发表于 2020-7-1 14:42
cmd能够执行几乎所有的dos命令，用shell函数都可以实现。
Shell "cmd.exe"       '打开cmd窗口
Shell " ...

谢谢指导、谢谢！
继续摸索。


貌似好点:
多了个界面、但环境变量仍有问题。

lwx228

向東 发表于 2020-7-1 14:42
cmd能够执行几乎所有的dos命令，用shell函数都可以实现。
Shell "cmd.exe"       '打开cmd窗口
Shell " ...

我的那个CMD 文件里面的内容是

SET QHOME=C:\q
PATH %QHOME%\w64;%QHOME%\w32;%PATH%
q 多档.q -s 3


这些要在VBA如何组织？麻烦老师指导。谢谢！