[20090905修改发送邮件方式，不需调用outlook]利用EXCEL实时了解股票行情,计算盈亏

mingg · 发表于 2007-5-1 22:47

本帖最后由 mingg 于 2012-8-16 15:08 编辑

上班族不便使用炒股软件看行情,利用excel可以在后台更新行情数据,在使用前请看一下"使用说明"(在自定义工具栏里)

主要功能:1、支持所有a股及中小板的股票，2、可以修改佣金费率、查询自动刷新的时间间隔、是否检测网络状态，3、不要每次打开时都要新建查询，只有第一次使用时需要新建查询，以后直接使用“立即刷新”或“自动刷新”就行了，大大节约了时间，4、不用窗体的形式，将功能键放到了自定义工具栏中，5、自动判断是否是深圳股票，如是则不算过户费。

摘自总斑主kevin<在中文Excel应用论坛的最佳学习方法>：7、不要故弄玄虚真诚与无私的分享是本论坛所推崇的精神，如果您有好的东西愿意与人分享，请直接在正确的版块中发贴。既然是分享，请不要给其他人的获取设置任何的限制和障碍。当然，对于不在您分享范围之内的事务，您可以有所保留，以保障自己的权益。比如，您愿意把自己制作的系统向大家展示，但不愿意公开源代码，我们理解这种行为，但请在发贴时进行说明。当然，我们更愿意看到能公开源代码的作品，因为它们的学习价值更高。

经过24小时的奋斗终于将代码重写好了,现发上来!欢迎大家提出修改意见！

如果web查询允许后台自动刷新,则每次打开工作簿时都会出现启用自动刷新或禁用自动刷新的对话框(office2002以上的版本有此现象)，如不想出现此对话框，office2002以上版本需要修改注册表，请参考以下网页:http://support.microsoft.com/kb/248204/zh-cn?spid=1741&sid=293

更新历史
1、修正了web查询中不存在而实际存在的股票代码不能计算盈亏的问题（虽然取不到当前价格，但可以根据手工输入的卖出价格计算）
2、web查询中增加了601开头的a股
3、在新建查询或刷新行情之前增加了对网络状态检测的功能（仅检测互连网，对局域网不能正确识别）
4、解决了在局域网中不能检测网络连接状态的问题（增加了对不同网络连接状态的检测[局域网与互连网]）
5、针对财政部修改印花税率，增加了用户可以自己修改印花税率（买卖）的功能，请仔细看一下工具栏中的“使用说明”
6、应fainnt的要求，增加了根据股价的涨跌，数值显示不同的颜色（让单元格变为红色或者绿色）
7、应weide_yang的要求，增加根据设定的“警示价格”自动报警（播放声音）的功能。在本程序所在文件夹下自行放置一个voice.mp3音乐文件，就能播放此文件。
8、根据用户设定的时间间隔自动刷新查询
9、解决了web查询不能查询的问题，将搜狐多股查询改为证券之星多股查询
10、如股价到了警示价格用户可以选择是否自动调用outlook给用户发邮件提醒

外部-股票管家精简版(邮件提醒)-证券之星多股查询0.rar (545.22 KB, 下载次数: 2241)
11、改进了OUTLOOK打开及发送邮件的方式
12、因原来的证券之星查询引用无法正常使用，经常出现无法查到数据的情况，现将查询引用更改为新浪的xml查询，在目前情况下查询能稳定使用
13、发送邮件提醒修改为不需调用outlook就可以发送邮件，这样又减去了在outlook中设置邮箱帐户的麻烦。
最新附件见155楼

友情提醒：如果无法播放声音，首先确认本工具所在目录下有无voice.mp3文件，如有就说明缺少播放用控件msdxm.ocx，在安装播放控件时要确保播放控件在本工具所在的目录下。以下压缩包内是声音示例文件和播放控件，请将其解压到本工具所在的目录下

重要说明：好长时间不关心股市了，现在发现程序中原来的数据链接不能用了。由于数据链接来自于网站，网站一改版，数据链接就失效，因此本程序将不再提供更新，敬请谅解！

lslsf · 发表于 2007-5-1 22:49

刚刚买了一点股票,下来用用

lotustower · 发表于 2007-5-1 23:49

2、公開了源代碼，因爲這裏是excel的技術論壇，不是商業論壇，大家可以互相學習提高，

[em17][em17][em17]

[em23][em23][em23]

lotustower · 发表于 2007-5-1 23:52

鹤鸣金融(Cranesing.com)

http://www.cranesing.com/bbs/index.php

Technical analysis & Trading Software Resource [em17][em17]

winland · 发表于 2007-5-2 09:10

公开了源代码，因为这里是excel的技术论坛，不是商业论坛

我们就应该这样

[em17][em17][em17]

sen163 · 发表于 2007-5-2 18:10

非常支持 mingg ，想赚钱的不用来excel

若觉得方便，讲解一下软件就更好

[此贴子已经被作者于2007-5-2 18:11:28编辑过]

winland · 发表于 2007-5-2 18:22

严重支持

[em17][em17][em17]

lotustower · 发表于 2007-5-2 20:59

不願意公開源代碼應當在 [原創發表] 發表!!!

版主應將這類轉移

mingg · 发表于 2007-5-3 12:02

一楼附件已更新!

lotustower · 发表于 2007-5-3 15:49

上班族不便使用炒股软件看行情,利用excel可以在后台更新行情数据,就不会被领导发现了

[em12] How about ITSD?

		自动登录	找回密码
密码			免费注册