Foxtable(狐表)用户栏目专家坐堂 → excel表显示处于只读


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

主题:excel表显示处于只读

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


加好友 发短信
等级:狐神 帖子:5054 积分:13025 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2014/9/2 21:13:00 [只看该作者]

Try

    '正常代码

    app.Quit

Catch ex As Exception

    '错误的时候,关闭

    app.Quit

End Try


一些这一句 就提示“未声明”为何?


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/2 21:16:00 [只看该作者]

Dim App As New MSExcel.Application

 

Try

[此贴子已经被作者于2014-9-2 21:16:18编辑过]

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


加好友 发短信
等级:狐神 帖子:5054 积分:13025 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2014/9/2 21:20:00 [只看该作者]

是这样写的红色的部分加进去后就显示没定义?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/2 21:32:00 [只看该作者]

Dim App As New MSExcel.Application

Try

    '正常代码

    app.Quit

Catch ex As Exception

    '错误的时候,关闭

    app.Quit

End Try


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


加好友 发短信
等级:狐神 帖子:5054 积分:13025 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2014/9/2 21:36:00 [只看该作者]

我就是这样写的,红色的部分app.Quit写进去 后         就提示未定义?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/2 21:37:00 [只看该作者]

 请看14楼,可好?

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


加好友 发短信
等级:狐神 帖子:5054 积分:13025 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2014/9/2 21:42:00 [只看该作者]

Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("Excel")

    For Each p As System.Diagnostics.Process In ps
        If p.MainWindowTitle.Contains("订单") Then
            p.kill
        End If
    Next

试过了,当订单的excel退出后,所有的excel文件全部退出?这样还是有问题。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/2 21:50:00 [只看该作者]

 你想说什么?

[此贴子已经被作者于2014-9-2 21:49:48编辑过]

 回到顶部
总数 18 上一页 1 2