Office中国论坛/Access中国论坛

标题: [经验]Access控制Excel零值不显示 [打印本页]

作者: tmtony 时间: 2008-10-29 16:52
标题: [经验]Access控制Excel零值不显示
Access控制Excel零值不显示
经常会将数据输出到Excel,如果输出的零值在Excel不希望显示出来的话,可在Access程序中控制,也可直接控制Excel零值显示方式

下面就是代码

On Error Resume Next
Dim xlsApp As Object
Dim xlsWBook As Object
Dim xlsWSheet As Object
DoCmd.Hourglass True

Set xlsApp = CreateObject("Excel.Application")
Set xlsWBook = xlsApp.Workbooks.Add(CurrentProject.Path & "\MonthTemplate.xlt") '使用模板打开
Set xlsWSheet = xlsWBook.ActiveSheet

xlsApp.ActiveWindow.DisplayZeros = False

作者: andymark 时间: 2008-10-30 00:16
学习啦~~

作者: xuwenning 时间: 2008-10-30 11:48
学习
[:50]

作者: lgcsee 时间: 2009-2-9 15:23
要好好学习一下！

作者: Grant 时间: 2009-2-9 16:01
对excel了解不多,学习

作者: koutx 时间: 2009-2-9 17:03
学习了，导出Excel时，解决0的显示虽然不是个大问题，可也是很烦人的事。

作者: purplerose 时间: 2016-4-10 10:23
很及时，前几天还有人在问这个问题呢，谢谢了！^=^

作者: 李力军2 时间: 2016-5-10 12:31
谢谢

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)