VBA中如何调用exe程序 如：我要用Excel2007 VBA 编程实现打开Caculator,并输入12+3=15，如何实现

调用外部程序使用Shell语句，下面的实例是调用CMD命令打开DOS窗口并执行Dir命令，将浏览结果存入文件，然后用open语句打开文件，读入vba，实例中使用的是绝对路径，如果是相对路径用“&”表示盘符，您要调用计算器，并获取计算器的计算结果，仅调用外部程序是不行的，我尝试使用API函数钩子，结果是自己重新写一个计算器都没那么费神

Sub shellcall()

Shell "cmd /c dir c:\>c:\1aaatxt"

Open "c:\11sstxt" For Input As #1

Dim s As String

While Not EOF(1)

Line Input #1, s

DebugPrint s

Wend

Close #1

End Sub

方法：

open 事件

Private Sub Workbook_Open()

End Sub

在VBE窗口中左边的“thisworkbook" ,双击，就出现左边（通用），把它选为workbook，再选OPEN事件

在这个事件中加入代码，就可以了！

也可以用

Sub auto_open()

End Sub

这个放在任何模块都可以。

以上就是关于VBA中如何调用exe程序 如：我要用Excel2007 VBA 编程实现打开Caculator,并输入12+3=15，如何实现全部的内容，包括:VBA中如何调用exe程序 如：我要用Excel2007 VBA 编程实现打开Caculator,并输入12+3=15，如何实现、如何excel的VBA来打开程序、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！