Foxtable(狐表)用户栏目专家坐堂 → [求助]flg.CellStyle 好使么?


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

主题:[求助]flg.CellStyle 好使么?

帅哥哟,离线,有人找我吗?
新福星
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1959 积分:15508 威望:0 精华:0 注册:2011/7/16 20:59:00
[求助]flg.CellStyle 好使么?  发帖心情 Post By:2013/10/16 17:48:00 [只看该作者]

按帮助文件做出下列程序


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
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/10/16 17:54:00 [只看该作者]

呵呵,这个样式,是指颜色字体那些吧

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

2.使用代码导出,自由控制  http://www.foxtable.com/help/topics/1148.htm

 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1959 积分:15508 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2013/10/16 19:36:00 [只看该作者]

用代码导出麻烦啊!

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


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

 楼主,你加一列表达式吧,保存两位小数,saveExcel的时候,隐藏一下数据列,用表达式代替就行了。

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

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

 回到顶部