欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 金字塔软件问题提交 → vba输出数字格式

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

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

主题：vba输出数字格式
帅哥哟，离线，有人找我吗？
BNF
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：269 积分：1502 威望：0 精华：0 注册：2010/11/1 21:37:43 		vba输出数字格式  发帖心情 Post By：2011/4/10 17:34:54 [显示全部帖子]

1.473741E+07

 

应该是

14737408

请问这个怎么办呢？是成交量~
 回到顶部
帅哥哟，离线，有人找我吗？
BNF
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：269 积分：1502 威望：0 精华：0 注册：2010/11/1 21:37:43 		  发帖心情 Post By：2011/4/11 1:12:01 [显示全部帖子]

不行，试过了~

a.WriteLine(minutedata.amount(i))
 回到顶部
帅哥哟，离线，有人找我吗？
BNF
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：269 积分：1502 威望：0 精华：0 注册：2010/11/1 21:37:43 		  发帖心情 Post By：2011/4/13 0:29:33 [显示全部帖子]

顶

 回到顶部
帅哥哟，离线，有人找我吗？
BNF
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：269 积分：1502 威望：0 精华：0 注册：2010/11/1 21:37:43 		  发帖心情 Post By：2011/4/16 3:20:51 [显示全部帖子]

那为什么Dim   d   As Variant 'Decimal type不管用呢~

http://www.vbaexpress.com/kb/getarticle.php?kb_id=887
 回到顶部
帅哥哟，离线，有人找我吗？
BNF
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：269 积分：1502 威望：0 精华：0 注册：2010/11/1 21:37:43 		  发帖心情 Post By：2011/4/16 20:54:01 [显示全部帖子]

以下是引用王锋在2011-4-16 14:08:34的发言：

金字塔的VB语法是VBS架构，定义变量无需指明变量类型

那是不是出了图片点击可在新窗口打开查看

lilieddove老师的方法就没办法了呢~
 回到顶部
帅哥哟，离线，有人找我吗？
BNF
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：269 积分：1502 威望：0 精华：0 注册：2010/11/1 21:37:43 		  发帖心情 Post By：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，那怎么办啊。
 回到顶部
帅哥哟，离线，有人找我吗？
BNF
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：269 积分：1502 威望：0 精华：0 注册：2010/11/1 21:37:43 		  发帖心情 Post By：2011/4/27 18:38:50 [显示全部帖子]

继续等高手
 回到顶部
帅哥哟，离线，有人找我吗？
BNF
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：269 积分：1502 威望：0 精华：0 注册：2010/11/1 21:37:43 		  发帖心情 Post By：2011/5/1 0:33:04 [显示全部帖子]

以下是引用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)

这种方法试过了，直接除以1000，但是发现，vbs公式中引用出来的成交额数据，其实就是缺的

这样出来的都是不准确的

1358.234

1.358234E+07

金字塔分笔数据浏览器里则是

32220596224-32207013888=13582336
 回到顶部
帅哥哟，离线，有人找我吗？
BNF
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：269 积分：1502 威望：0 精华：0 注册：2010/11/1 21:37:43 		  发帖心情 Post By：2011/5/6 0:30:00 [显示全部帖子]

依旧没法解决么？

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.14063 秒, 6 次数据查询