以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]flg.CellStyle 好使么?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=41326)
--  作者：新福星
--  发布时间：2013/10/16 17:48:00
--  [求助]flg.CellStyle 好使么?

按帮助文件做出下列程序


Dim flg As New SaveExcelFlags

flg.RowNumber = True

flg.CellStyle =True

flg.VisibleOnly=True

Tables(e.Form.Name & "_table9").SaveExcel(wjm,"耗材明细",flg)


Dim Proc As New Process \'定义一个新的Process


Dim Book As New XLS.Book(wjm)

Proc.File = wjm

Proc.Start()


在"_table9"中所有金额列已经显示了两位小数，很整齐。使用flg.CellStyle =True语句就是想让形成Excel中的金额列也是两位小数，但是形成的Excel不是预期那样。问题出在哪呢？谢谢
--  作者：Bin
--  发布时间：2013/10/16 17:54:00
--  
呵呵,这个样式,是指颜色字体那些吧

1.可以考虑表储存直接就储存2位小数

2.使用代码导出,自由控制  http://www.foxtable.com/help/topics/1148.htm
--  作者：新福星
--  发布时间：2013/10/16 19:36:00
--  
用代码导出麻烦啊！
--  作者：有点甜
--  发布时间：2013/10/16 19:45:00
--  
 楼主，你加一列表达式吧，保存两位小数，saveExcel的时候，隐藏一下数据列，用表达式代替就行了。

 方法二：用exporter，看示例四，加一列表达式。

[此贴子已经被作者于2013-10-16 19:46:17编辑过]