以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关闭打开的Excel工作簿  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=53747)
--  作者：ccbbdlzj
--  发布时间：2014/7/14 20:15:00
--  关闭打开的Excel工作簿
如何判断某个Excel表是否为打开，如为打开状态，将其关闭，求代码！
--  作者：ccbbdlzj
--  发布时间：2014/7/14 20:17:00
--  
比如：文件为“\\\\d:\\test.xls"为打开的表，想在执行代码前判断其是否为打开状态，如是，将其关闭！
--  作者：有点甜
--  发布时间：2014/7/14 20:18:00
--  

 参考

 

http://www.foxtable.com/help/topics/2126.htm

 

http://www.foxtable.com/help/topics/2713.htm

 
--  作者：ccbbdlzj
--  发布时间：2014/7/14 21:35:00
--  

咋关闭？要手动关闭？代码关闭有吗？
--  作者：有点甜
--  发布时间：2014/7/14 21:36:00
--  
以下是引用ccbbdlzj在2014-7-14 21:35:00的发言：

咋关闭？要手动关闭？代码关闭有吗？

 

http://www.foxtable.com/help/index.html?n=2713.htm

 
--  作者：ccbbdlzj
--  发布时间：2014/7/14 22:16:00
--  

不执行啊？有问题吗？

 

If FileIsOpened("d:\\订单.xls")= True Then
\'MessageBox.Show("文件已经打开")
showAppWindow("订单.xls",5)
End If
--  作者：ccbbdlzj
--  发布时间：2014/7/14 22:17:00
--  
关闭不了“订单.xls".求指教！
--  作者：有点甜
--  发布时间：2014/7/14 22:35:00
--  

 你试试

 

If FileIsOpened("d:\\订单.xls")= True Then
    \'MessageBox.Show("文件已经打开")
    showAppWindow("订单", 5)
End If
--  作者：ccbbdlzj
--  发布时间：2014/7/14 22:42:00
--  

成了！为啥用“showAppWindow("订单.xls",5)” 不成呢？
--  作者：有点甜
--  发布时间：2014/7/14 22:43:00
--  
以下是引用ccbbdlzj在2014-7-14 22:42:00的发言：

成了！为啥用“showAppWindow("订单.xls",5)” 不成呢？

 

你隐藏了后缀名.xls