[浏览完整版]
标题：vba输出数字格式
1楼
BNF 发表于：2011/4/10 17:34:541.473741E+07
应该是
14737408
请问这个怎么办呢？是成交量~
2楼
guotx2010 发表于：2011/4/10 22:34:55使用CStr函数转化为字符串看看行不行？
3楼
BNF 发表于：2011/4/11 1:12:01不行，试过了~
a.WriteLine(minutedata.amount(i))
4楼
BNF 发表于：2011/4/13 0:29:33顶
5楼
lilieddove 发表于：2011/4/14 0:59:49
如果是把交易量导入到Excel中，用两种方法解决你的问题。
1.在金字塔的函数中加入下列语句，把单元格的格式设为整数，就不会出来科学计数法的E了。
Newbook.ActiveSheet.Cells(i+1,2).NumberFormatLocal = "0"
2.由于交易额较大，直接把数据除以100000000，单位变成亿元，再用Round取两位有效数字。
Newbook.ActiveSheet.Cells(i+1,2).Value=round(HistoryData.Amount(m-1)/100000000,2)
6楼
BNF 发表于：2011/4/16 3:20:51那为什么Dim d As Variant 'Decimal type不管用呢~
7楼
王锋 发表于：2011/4/16 14:08:34金字塔的VB语法是VBS架构，定义变量无需指明变量类型
8楼
BNF 发表于：2011/4/16 20:54:01以下是引用王锋在2011-4-16 14:08:34的发言：
金字塔的VB语法是VBS架构，定义变量无需指明变量类型
那是不是出了
lilieddove老师的方法就没办法了呢~
9楼
BNF 发表于：2011/4/18 16:59:13以下是引用lilieddove在2011-4-14 0:59:49的发言：
如果是把交易量导入到Excel中，用两种方法解决你的问题。
1.在金字塔的函数中加入下列语句，把单元格的格式设为整数，就不会出来科学计数法的E了。
Newbook.ActiveSheet.Cells(i+1,2).NumberFormatLocal = "0"
2.由于交易额较大，直接把数据除以100000000，单位变成亿元，再用Round取两位有效数字。
Newbook.ActiveSheet.Cells(i+1,2).Value=round(HistoryData.Amount(m-1)/100000000,2)
如果是导出文本文件，不是excel，那怎么办啊。
10楼
BNF 发表于：2011/4/27 18:38:50继续等高手