布鲁斯　发表于：2014-01-22 16:45:54 　

我现在能找到的是：CreateProcess 但是不太会用.我的本意是用它来打开excel，word，outlook的

但是比较笨，看不明这个函数的说明。看得云里雾里。求指教！

同时求另外一些更容易实现的方法。

Top

cspa 发表于：2014-01-22 17:17:08

Dim myWord As Word.Application

set myWord=CreateObject("Word.Application")

myWord.Application.Documents.Open FileName:="你的带完整路径名的文件名" '如，D:\123.doc

myWord.Application.Visible = True

Top

落尘_小新发表于：2014-01-23 00:12:04

'API函数声明
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

'ShellExecute函数二次封装，以简化使用
'输入参数File可以是文件名，网页地址或命令行
Public Function ShellEx(File As String)
ShellExecute hWndAccessApp, "Open", File, 0, 0, 1
End Function

可以用上面这个函数来打开任何格式的文件

这段函数好像是出自红尘如烟大师之手,一直在论坛中很多示例中都有采用.

要不然你使用系统自带的

Shell 函数也是可以的.

Top

布鲁斯发表于：2014-01-23 13:34:32

感谢2位

Top

总记录：3篇页次：1/1 9 1 :

Access交流中心

[5分]求一个在VBA中运行其它程序的函数，或者示例

Shell 函数也是可以的.