Foxtable(狐表)用户栏目专家坐堂 → table的数值列,已经设置成小数点2位了,为什么导出的excel还是保留了4位啊?


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

主题:table的数值列,已经设置成小数点2位了,为什么导出的excel还是保留了4位啊?

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/5 16:38:00 [显示全部帖子]

设置为2位只是单元格不显示多余的位数而已,并不会改变数据库原有的数据

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/5 16:50:00 [显示全部帖子]

这个导出用法没有办法控制,除非通过模板导出,或者自己写代码导出:http://www.foxtable.com/webhelp/topics/1148.htm

不然就把数据库里多余的位数都清除掉

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/5 17:31:00 [显示全部帖子]

没看懂,要判断什么?

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/6 11:24:00 [显示全部帖子]

For r As Integer = 0 To dt.Rows.Count - 1 '填入数据
    For c As Integer = 0 To nms.length -1
        If dt.rows(r).IsNull(nms(c)) = False
            If dt.Cols(nms(c)).IsNumeric AndAlso dt.Cols(nms(c)).name <> "提佣所属年份"
                Sheet(r +1, c).Value = format(dt.rows(r)(nms(c)),"#.##")
            Else
                Sheet(r +1, c).Value = dt.rows(r)(nms(c))
            End If
        End If
    Next
    
    
Next

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/6 11:44:00 [显示全部帖子]

不可能,上传实例说明

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/6 12:08:00 [显示全部帖子]

麻烦按照9楼的改

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/6 15:11:00 [显示全部帖子]

改成:Sheet(r +1, c).Value = round2(dt.rows(r)(nms(c)),2)

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/9 16:56:00 [显示全部帖子]

一样写代码导
[此贴子已经被作者于2019/9/9 16:56:51编辑过]

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/9 17:32:00 [显示全部帖子]

是,和12楼用法一样

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/1/14 9:21:00 [显示全部帖子]

XLS.Book既可以保存为xls也可以保存为xlsx。具体贴出完整代码说明

 回到顶部
总数 12 1 2 下一页