- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]saveexcel导出如何显示千分比符号 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=186171)
-- 发布时间：2023/4/10 22:20:00
-- [求助]saveexcel导出如何显示千分比符号
此主题相关图片如下：1681136165891.png
用saveexcel导出的路耗如何在excel中显示千分比符号。现在导出的显示数字3,而不是3‰
-- 发布时间：2023/4/10 22:40:00
--
单元格存储的是什么内容就只能导出什么内容。
方法1、导出后到execl里设置格式
2、使用模板导出
-- 发布时间：2023/4/10 22:40:00
--
导出按钮代码如下，如何显示千分比符号？
Dim dt As Table = Tables("收货登记明细表")
dt.SetColVisibleWidth("过磅日期|80|发货单位|150|发货地|100|卸货地|100|货物名称|150|车牌号|80|手开数|90|原发数|90|实收数|90|亏吨|60|运费承担|120|运价|40|应付金额|60|实际亏吨扣款|40|罚款|40|实付运费|80|货值|50|结算日期|80|付款日期|80|实付金额|80|姓名|50|路耗|40|未付运费|80|计提运费|80|批次号|140|提货单号|150|备注|100|单价类型|80|单价|40|承运单位|80|货源单号|150|运单状态|60 ")
Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
dlg.Filter = "Excel文件|*.xls" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
For Each s As String In DataTables("收货登记明细表").getvalues("收发类别")
dt.filter = “收发类别 = \'" & s & "\'”
dt.SaveExcel(dlg.FileName, s)
Next
End If
-- 发布时间：2023/4/10 23:01:00
--
单元格存储的是什么内容SaveExcel就只能导出什么内容。其它方法看2楼