- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何用代码关闭已经打开的excel表？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=12035)
-- 发布时间：2011/8/20 11:23:00
-- 如何用代码关闭已经打开的excel表？
如何用代码关闭已经打开的excel表？
-- 发布时间：2011/8/20 12:31:00
--
Dim Proc As New Process \'定义一个新的Process
Proc.File = "C:\\test.xls" \'指定要打开的文件
Proc.Close()
-- 发布时间：2012/11/20 16:53:00
--
2楼代码现在无效了吗？ 以前我没有试过···呵呵。
-- 发布时间：2012/11/20 19:16:00
--
顶上去···
-- 发布时间：2012/11/20 20:40:00
--
在全局代码中定义：
Dim Proc As Process \'定义一个新的Process
打开文件按钮：
Proc = New Process \'定义一个新的Process
Proc.File = "C:\\test.xls" \'指定要打开的文件
Proc.Start()
关闭按钮：
If Proc IsNot Nothing Then
Proc.Close()
Proc = Nothing
End If
-- 发布时间：2012/11/20 21:45:00
--
试了，好像不行呢。
-- 发布时间：2012/11/21 9:13:00
--
唉，楼上何苦，何不在不打开的状态下操纵这个文件
-- 发布时间：2012/11/21 9:32:00
--
以下是引用sgs在2012-11-21 9:13:00的发言：
唉，楼上何苦，何不在不打开的状态下操纵这个文件
唉，楼上何苦，何不在不打开的状态下操纵这个文件
为何非要操作呢？ 不断测试的时候或操作项目时应该有这个需要的吧，因为数据更新后需要重新打开它，这时你可能忘了关闭它。
5楼狐爸的关闭按钮代码我没执行成功··· 有会的吗？ （定义了全局代码，打开可以了，关闭不行）
-- 发布时间：2012/11/21 9:44:00
--
狐爸的全局代码写错了。
在全局代码中定义：
Public Procs As New Dictionary(Of String, Process) \'定义一个字典，保存多个打开的文件
打开文件按钮：
Dim Proc = New Process \'定义一个新的Process
Proc.File = "C:\\test.xls" \'指定要打开的文件
Procs.Add("Test.xls", proc)
Proc.Start()
关闭按钮：
If Procs("Test.xls") IsNot Nothing Then
Procs("Test.xls").Close()
End If
Public Procs As New Dictionary(Of String, Process) \'定义一个字典，保存多个打开的文件
打开文件按钮：
Dim Proc = New Process \'定义一个新的Process
Proc.File = "C:\\test.xls" \'指定要打开的文件
Procs.Add("Test.xls", proc)
Proc.Start()
关闭按钮：
If Procs("Test.xls") IsNot Nothing Then
Procs("Test.xls").Close()
End If
[此贴子已经被作者于2012-11-21 10:14:56编辑过]
-- 发布时间：2012/11/21 9:58:00
--
此主题相关图片如下：未命名c.jpg