Foxtable(狐表)用户栏目专家坐堂 → [求助]7楼上传例子-导入EXCEL报表后如何保持数字格式一致


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

主题:[求助]7楼上传例子-导入EXCEL报表后如何保持数字格式一致

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/1 18:25:00 [显示全部帖子]


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/2 9:45:00 [显示全部帖子]

设置一下列属性

 

http://www.foxtable.com/webhelp/scr/0050.htm

 

或者用代码处理

 

DataTables("表c").DataCols("第九列").Decimals = 2
DataTables("表C").DataCols("第九列").SetFormat("0.00")


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/2 14:18:00 [显示全部帖子]

以下是引用huangfanzi在2018/5/2 14:00:00的发言:
甜版,你给的代码是设置FT中表格的数字格式,这个没有问题,我指的是将数据导出至EXCEL后,在EXCEL中显示不按0.00的方式显示,如何解决这个问题?

 

如4楼设置以后,我再导出,格式就是正常的格式。我测试没问题。

 

如果有问题,实例发上来测试。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/2 21:27:00 [显示全部帖子]

bug,因为窗口表没有设置【固定小数位数】的设置。

 

变通一下处理,drawcell事件,写代码

 

If e.Table.grid.Cols(e.Col.name).Format > "" Then
    e.text = format(val(e.text), e.Table.grid.Cols(e.Col.name).Format)
End If

 

如果排序,参考 http://www.foxtable.com/webhelp/scr/1786.htm

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/2 21:53:00 [显示全部帖子]

bug,没办法,目前只能这样。

 

要不你用代码导出 http://www.foxtable.com/webhelp/scr/1148.htm

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/2 22:18:00 [显示全部帖子]

回复11楼,帮助文档没有错误,dt是Table,不是DataTable

 

Dim dt As Table = Tables("订单")


 回到顶部