打开文件的一种方法

caoguangyao

下面是一个打开文件的一种方法: Sub Openfile(str As String) '功能:打开文件 '参数:str--->路径和文件名 '示例1:Openfile("C:\test.xlsx") '示例2:Openfile("C:\test.text") If Dir(str) <> "" Then '判断文件是否存在,存在,则将其打开cgy2011-5-2     Application.FollowHyperlink str End If End Sub

t小宝

不错，用超链接的方法，不过打开某些文件会有提示，如exe文件等

Grant

t小宝 发表于 2011-6-13 21:41
不错，用超链接的方法，不过打开某些文件会有提示，如exe文件等

Acc就这样,不能要求太高

roych

回复 Grant 的帖子

还是shell用起来舒服些…

caoguangyao

Application.FollowHyperlink 方法打开超链接地址 （超链接地址：指向诸如对象、文档或网页等目标的路径。超链接地址可以是 URL（Internet 或 Intranet 网站的地址），也可以是 UNC 网络路径（局域网上的文件的地址）。）所指定的文档或网页。