如何使用vba来获取股票行情

⑴ 股票 行情代码怎么调用

http://stock.678678.com/Com_Import/shu.aspx

http://www.678678.com/share/hqshu.aspx

代码使用方法:

<IFRAME WIDTH="525" HEIGHT="22" MARGINWIDTH="0" MARGINHEIGHT="0" HSPACE="0" VSPACE="0" FRAMEBORDER="0" SCROLLING="no" BORDERCOLOR="#000000" SRC="http://stock.678678.com/Com_Import/shu.aspx"></IFRAME>

<IFRAME WIDTH="525" HEIGHT="22" MARGINWIDTH="0" MARGINHEIGHT="0" HSPACE="0" VSPACE="0" FRAMEBORDER="0" SCROLLING="no" BORDERCOLOR="#000000" SRC="http://www.678678.com/share/hqshu.aspx"></IFRAME>

⑵ 求 EXCEL 自动获取全部股票近几天的收盘价的 VBA程序

我只会从安装的本地文件下载的数据中获得数据转化成Excel的表格。

⑶ EXCEL如何用VBA自动获取每个股票近几天的涨幅

一般网页上的数据都可以通过VBA进行抓取，应用得好，可以实现对很很多资料的动态监测。
涨幅就是指目前这只股票的上涨幅度。
涨幅的计算公式：涨幅=(现价-上一个交易日收盘价）/上一个交易日收盘价*100%
例如：某只股票价格上一个交易日收盘价100，次日现价为110.01，就是股价涨幅为（110.01-100 ）/100*100%=10.01%.一般对于股票来说 就是涨停了!如果涨幅为0则表示今天没涨没跌，价格和前一个交易日持平。如果涨幅为负则称为跌幅。
比如:一支股票的涨幅是：10%、-5%等 。

⑷ Excel 用vba如何接受大智慧行情软件的数据

这个软件是网页上来的数据吧，如果是那就网抓吧，不是的话，也会有数据导出到excel吧

⑸ 怎么利用vba获取财经网上股票股价的实时数据

你愿意出钱吗，愿意出钱的话我可以帮你写

⑹ 如何使用EXCEL读取通达信股票日线数据

定量分析的第一步，是获取数据。
获取股票历史行情数据最方便的途径，就是直接读取股票行情软件留在你电脑中的日线数据文件。
但如果不是程序员，电脑里一般不会有VB、VC之类的编程语言。
其实，大家的电脑中一般都有OFFICE。OFFICE中的EXCEL自带了一个VBA语言的编程环境。功能也很强大。
我用EXCEL里的VBA编写了一段代码，读取通达信股票行情软件的日线文件。已经测试通过。
代码如下。与爱好定量分析的朋友分享。
TypeMyType
a1AsLong'标示码
a2AsLong'日期
a3AsSingle'开盘价
a4AsSingle'最高价
a5AsSingle'最低价
a6AsSingle'收盘价
a7AsSingle'成交金额
a8AsLong'成交量
EndType
Sub按钮1_Click()
DimFile2AsInteger
DimbAsMyType
File1=FreeFile
Opensh600000.dayForBinaryAccessReadAs#File1i=1DoWhileNotEOF(File1)
Get#File1,,b
Cells(i,1)=b.a1
Cells(i,2)=b.a2
Cells(i,3)=b.a3
Cells(i,4)=b.a4
Cells(i,5)=b.a5
Cells(i,6)=b.a6

⑺ 用excel vba 抓取网页中 股票的财务数据 然后做分析 做好了可以加分哈

网抓已经OK。

原网页源代码写的不太规范，几处语法写错的地方解析时要特殊处理，花了点时间。

⑻ 请问用VBA怎样连接到新浪网的股票交易行情

http://topic.csdn.net/u/20080512/18/5e0bccec-c5f4-4688-9931-98527a7d0ba7.html?seed=1429188102

⑼ 如何用VBA从WIND里取股票数据

首先 你需要有个万德的帐号，因为取得股票也是需要excel登录万德插件的

⑽ 用VB如何直接获取股票实时数据

可以通过调用ChinaStockWebService的服务来实现获取股票的实时数据，代码如下：

publicstring[]getStockInfo(stringstockcode)
{

//stringurl="http://hq.sinajs.cn/list="+stockcode;
//stockcode某只股票的代码
stringurl="http://hq.sinajs.cn/list=sh600683";
WebClientclient=newWebClient();
client.Headers.Add("Content-Type","text/html;charset=gb2312");
Streamdata=client.OpenRead(url);
StreamReaderreader=newStreamReader(data,Encoding.GetEncoding("gb2312"));
strings=reader.ReadToEnd();
reader.Close();
data.Close();
returns.Split(',');
}