如何在excel中使用VBA调用其它外部程序

使用旁竖汪shell语句，例子：

Sub RAR()

    Shell "C:\Program 运仔Files\WinRAR\WinRAR.exe", 纤明vbNormalFocus

End Sub

使用shell函数即可。

shell函数用法：Shell(pathname[,windowstyle])

函数带有两个参数：第一个pathname是必要参数。要执行的程序名，以及任何必需的参数或命令行变量，可能还包括目录或文件轿察夹，以及驱动器。第二个Windowstyle是可选参数。表示在程序运行时窗口的样式。如果省略，则程序是以具有焦点的最小化窗口来执行的。

第二参数Windowstyle 参数设置不同的值，打开的程序有不同的效果，其对应关系如下：

0——窗口被隐藏，且焦点会移到隐弊帆扮式窗口

1——窗口具有焦点，且会还原到它原来的大小和位置。

2——窗口会以一个具有焦点的图标来显示。

3——窗口是一个具有焦点的最大化窗口。

4——窗口会被还原到最近使用的大小和位置，而当前活动的窗口仍然保持活动。

6——窗口会以一个图标来显示。而当前租灶活动的的窗口仍然保持活动。

举例——假定用VBA来打开计算器程序，并使计算器窗口具有焦点，且还原到它原来的大小和位置，代码如下：

Sub VBA调用其他程序示例()

Shell "calc.exe", 1

End Sub

说明：

1、Shell函数具有返回值，如果打开程序成功的话，返回代表这个程序的任务ID，若不成功，则会返回0，示例中不需用它的返回值，按VBA规则就不能用括号。

2、这里打开的是系统文件夹里面的程序，所以省略了路径，如果打开其他文件夹的程序，则需要指明路径。

---