Foxtable(狐表)用户栏目专家坐堂 → 如何关闭EXCEL报表或piao据?


  共有4475人关注过本帖树形打印复制链接

主题:如何关闭EXCEL报表或piao据?

帅哥哟,离线,有人找我吗?
发财
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
如何关闭EXCEL报表或piao据?  发帖心情 Post By:2013/12/20 8:37:00 [只看该作者]

在打印或预览EXCEL表时,用什么命令关闭EXCEL表,以免总提示未关闭要先关闭。

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/20 8:41:00 [只看该作者]

没有办法,可以利用杀进程的办法,但是会把所有Excel干掉.

 回到顶部
帅哥哟,离线,有人找我吗?
发财
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2013/12/20 8:44:00 [只看该作者]

什么是杀进程?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/20 8:48:00 [只看该作者]

Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("进程名称")
For Each p As System.Diagnostics.Process In ps
            p.kill
 Next

 回到顶部
帅哥哟,离线,有人找我吗?
发财
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2013/12/20 9:02:00 [只看该作者]

会把所有Excel干掉. 是全部关闭吧,不是删除吧?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/20 9:04:00 [只看该作者]

关闭

 回到顶部
帅哥哟,离线,有人找我吗?
发财
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2013/12/20 9:34:00 [只看该作者]

进程名称输入"订单.xls"为什么不行呢?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/20 9:41:00 [只看该作者]

进程名称和文件名是2回事.  通常应该是   "EXCEL"

 回到顶部
帅哥哟,离线,有人找我吗?
发财
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2013/12/20 9:45:00 [只看该作者]

多谢!


 回到顶部
帅哥哟,离线,有人找我吗?
发财
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2013/12/20 9:49:00 [只看该作者]

If Functions.Execute("net20sp1") = False Then
            Return
        End If

上面命令是什么意思?


 回到顶部
总数 11 1 2 下一页