某些时候，我们需要在Excel中调用命令行或者Bash脚本，VBA可以通过Shell函数很方便地做到这一点。以下用ipconfig /all来举例，这条命令行语句用来获得机器的网路配置信息，包括IP、网关等信息。它可以替换成任何一个bash脚本和命令行代码。

1.普通调用

运行下面这条VBA语句，会闪出一个命令行窗口，窗口里执行了ipconfig /all命令行：

Shell "ipconfig /all"

但默认情况下，Shell函数执行完毕之后窗口便被关闭。ipconfig /all速度很快，命令行窗口会一闪而过，用户根本看不到运行结果。下面是两个解决方法。

2.让命令行窗口运行完毕不自动关闭

一种解决方法是命令行窗口在运行完毕之后不关闭，这样用户可以看到上次的运行结果。这只需要在原来的命令行前面添加 cmd /k：

Shell "cmd /k ipconfig /all"

为了方便，可以先设立一个函数来自动处理这件

Function RunShell(cmd As String, _
        Optional windowstyle As VbAppWinStyle = vbMinimizedFocus) _
        As Double
    RunShell = Shell("cmd /k """ & cmd & """", windowstyle)
End Function

然后运行RunShell "ipconfig /all"即可。

3.VBA Excel和Shell交互

在Excel VBA中通过Shell直接调用命令行，Excel和命令行进程是并行运行的，Excel不会等待命令行运行完毕便会继续执行后面的代码，两者之间也不存在交互（VBA中Shell函数返回值是进程ID）。通过下面这个ShellAndWait函数调用命令行，Excel函数会等待命令行运行完毕才会继续运行，并且可以获得命令行的运行结果和错误信息。

Function ShellAndWait(cmd As String) As String 
    Dim oShell As Object, oExec As Object
    Set oShell = CreateObject("WScript.Shell")
    Set oExec = oShell.exec(cmd)
    ShellAndWait = oExec.StdOut.ReadAll

    Set oShell = Nothing
    Set oExec = Nothing
End Function

这样运行res = ShellAndWait("ipconfig /all")，Excel会等待命令行窗口运行完毕，并获取命令行的运行结果进行后续处理。