UC知道access窗体中打开xls
来源：百度知道 编辑：UC知道 时间：2024/05/22 02:04:53
我在ACCESS中做了一个窗体，
其中有个LISTBOX用来存放找到的文件列表，一个打开按钮，按下之后可以打开选中的文件。但是因为现在运行的是ACCESS窗体，所以XLS之类的文件无法打开。请问有什么办法可以避免，让XLS文件在新窗口中打开。（其他类型的文件都没有问题。）
急用，谢谢啦。
打开文件的代码：
WshShell.Run "cmd /c " & Chr(34) & Add & Chr(34) & ", 0, True"
Add是文件路径。
说不支持application.visble这个属性或者函数。
我用的是2003.
其中有个LISTBOX用来存放找到的文件列表，一个打开按钮，按下之后可以打开选中的文件。但是因为现在运行的是ACCESS窗体，所以XLS之类的文件无法打开。请问有什么办法可以避免，让XLS文件在新窗口中打开。（其他类型的文件都没有问题。）
急用，谢谢啦。
打开文件的代码：
WshShell.Run "cmd /c " & Chr(34) & Add & Chr(34) & ", 0, True"
Add是文件路径。
说不支持application.visble这个属性或者函数。
我用的是2003.
你看这样成不，LIST框里，显示第一列（文件名），第二列不显示，用来存放地址
Dim a
Dim xlapp As Object
Set xlapp = CreateObject("Excel.Application")
a=me.list.column(1)
xlapp.Workbooks.Open (" ' & a & ' ")
xlapp.Application.Visible = True
没测试过，也不知道行不行，您先试试