Foxtable(狐表)用户栏目专家坐堂 → 计算


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

主题:计算

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


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

如何做到整套工作表都使零值不显示?

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


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

 就是10楼的代码啊。


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


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

只能是第二个工作表不出现零值,其他的表还都存在零值。

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


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

 你试试这样改

 

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\test.xls")
Dim Ws As MSExcel.WorkSheet
For Each ws In Wb.WorkSheets
    app.ActiveWindow.DisplayZeros = False
Next
app.visible = True


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


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

还是不行。

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


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

 例子,发上来。

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


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

它只能对默认的工作表进行清零。

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


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

 book.sheets.SelectedIndex = n


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


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

    Dim Book0 As New XLS.Book(f0)
    For n As Integer = 1 To 4
        book0.sheets.SelectedIndex = n
        'book0.save(f0)
        app.ActiveWindow.DisplayZeros = False
    Next


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


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

为什么代码book0.save(f0)不能用,总是说已打开工作表。

 回到顶部
总数 67 上一页 1 2 3 4 5 6 7 下一页