Office中国论坛/Access中国论坛

标题: 如何打开变量地址的XX文件 [打印本页]

作者: mclly2000 时间: 2013-1-23 15:45
标题: 如何打开变量地址的XX文件
请问打开指定路径的文件怎么写，用下面这个代码好像不能加[CurrentProject].[Path]，我想引个变量的地址，请群里老师帮帮忙，怎么写，谢谢

作者: 笑嘻嘻哦 时间: 2013-1-23 20:08
变量地址如何找呢

作者: roych 时间: 2013-1-24 11:25

Function OpenFile(strPath As String)
Dim s As String
'这里用了转义字符，请留意双引号的使用。
s = """explorer.exe""" & """" & strPath & """"
Shell s, vbNormalFocus
End Function

复制代码

调用方法：
a、在宏利用RunCode OpenFile("D:\价格10000.xls")
b、在按钮的单击事件或者其它控件是事件过程中 Call OpenFile("D:\价格10000.xls")
我试了下，但并没有打开excel文件，倒是打开了“我的文档”，可能应该用excel程序才能打得开的吧？不过这不在我的讨论范围之内了。

作者: mclly2000 时间: 2013-1-24 20:39

roych 发表于 2013-1-24 11:25
调用方法：
a、在宏利用RunCode OpenFile("D:\价格10000.xls")
b、在按钮的单击事件或者其它控件是事件过 ...

谢谢您的回复

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)