专家坐堂-生成EXCEL统计报表的时候怎么去除为0的值？Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  生成EXCEL统计报表的时候怎么去除为0的值？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=11039)

--  作者：dark272710
--  发布时间：2011/7/5 13:36:00
--  生成EXCEL统计报表的时候怎么去除为0的值？

做一个简单分类计数的报表。

但是因为类目很多10*15的样子

单元格里的公式我是这样写的

[$总表,count(时间),(运维费用类型=\'安全防盗设施运维\' and 上级单位=\'市北配送中心\')]

但是有些项目是空的，如果全是0的话会显得太杂乱，想要做出这样的效果：如果数目为0就空着，怎么实现呢~~

--  作者：hhbb
--  发布时间：2011/7/5 14:18:00
--
在Excel设置储存条件为<>0

--  作者：狐狸爸爸
--  发布时间：2011/7/5 14:51:00
--
Dim Book As New XLS.Book(ProjectPath & "Attachments\\出库单.xls") \'打开模板
Book.Build() \'生成细节区
Dim Sheet As XLS.Sheet = Book.Sheets(0)
For r As Integer = 0 To Sheet.Rows.Count - 1
    For c As Integer = 0 To Sheet.Cols.Count - 1
        If sheet(r,c).Value.Tostring = "50" Then
            sheet(r,c).value = Nothing
        End If
    Next
Next
Book.Save("c:\\reports\\test.xls") \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = "c:\\reports\\test.xls"
Proc.Start()

--  作者：dark272710
--  发布时间：2011/7/5 15:21:00
--

感谢一楼~~~EXCEL好多都忘记了。。

右键单元格-单元格格式-自定义

设置成这样就行了~

[=0]"";G/通用格式

狐狸大大的这个。。输出后还是有0的~~

--  作者：狐狸爸爸
--  发布时间：2011/7/5 15:27:00
--

呵呵，手误。

If sheet(r,c).Value.Tostring = "50" Then

改为：

If sheet(r,c).Value.Tostring = "0" Then

就没有0了

--  作者：hhbb
--  发布时间：2011/7/5 15:32:00
--
这样简单些:

此主题相关图片如下：00.png