vba中如何获取股票行情图

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

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

Ⅱ 如何获取实时的股票数据

要跟供应商协商得到他的接口才能得到实时股票行情数据；
股票实时行情，可以通过两个方法来进行查看：
第一种，在网络搜索页面直接输入股票代码，如：000717，网络输入后，即可在搜索结果中看到，其中分时，就是该股票在当天的实时走向。

第二种，通过炒股软件，如东财，同花顺等，在开启后，直接输入，股票代码，如600854，点击回车。进入的第一个页面就是该股票在当天的实时行情。

同时在股票软件的分时成交界面，可以查看到每一分钟的成交价和手数。股票行情趋势判断必要时也需要结合分时成交界面的数据来进行判断。

查看其它股票的行情也是一样的道理，直接键入该股票的代码就可以查看到该股票当天或某个时间段内的行情。当然，精准的行情走势、趋势，是需要结合多种指标来共同进行分析的。

Ⅲ 如何用Excel制作股票实时行情图

制作实时股票行情图，应包含如下内容：1.股票数据表，2.股价图，3.实时从网上下载数据的功能
第一步：制作数据表，数据-导入外部数-新建WEB查询 写入该数据来源地址
第二步：制作股价图，先用公式按股价图要求的顺序引用到当前表，再插入图表-选股价图（第4种）调整图表
第三步：编写程序以实现实时刷新功能，可将以下程序按其要求的位置复制过去

'在模块中编写如下程序段用于刷新行情表，"00:00:10"表示刷新时间间隔，可根据需要进行调整

Dim 结束标记
Sub 刷新行情()

Sheets("日线数据").Range("A1").QueryTable.Refresh
BackgroundQuery:=False

Sheets("分笔数据").Range("A1").QueryTable.Refresh
BackgroundQuery:=False
If 结束标记
<> 1 Then Application.OnTime Now +
TimeValue("00:00:10"), "刷新行情"
End Sub
Sub 开始刷新()
结束标记 = 0
刷新行情
End Sub
Sub 结束刷新()
结束标记 = 1
End Sub

'在thisworkbook中编写如下代码用于打开该表时就启动行情刷新

Private Sub Workbook_Open()
刷新行情
End Sub

以上制作完成，保存后打开该表，可得到实用的股票行情图，并可得到实时数据用于数据分析

Ⅳ Excel VBA代码如何实现股票数据汇总

上截图，说明你想要达到的效果，这样才能弄。问题不描述清楚没人能帮上你。

Ⅳ 用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(',');
}

Ⅵ 在EXCEL里用VBA编程，对选择的数据作股票图

EXCEL折线图根本就不可能有这么复杂，VBA画图取点与表格实际坐标之间对应又不确定和关系复杂，所以EXCEL不适合做这类工作。

Ⅶ 如何获取股票实时行情数据

股票实时行情，可以通过两个方法来进行查看：

第一种，在网络搜索页面直接输入股票代码，如：000717，网络输入后，即可在搜索结果中看到，其中分时，就是该股票在当天的实时走向。

查看其它股票的行情也是一样的道理，直接键入该股票的代码就可以查看到该股票当天或某个时间段内的行情。当然，精准的行情走势、趋势，是需要结合多种指标来共同进行分析的。

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

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

Ⅸ 如何通过excel获取股票列表

1这里以获取中国石油(601857)的行情为例，打开提供股市行情的网站，在页面的“个股查询”区域输入该股票代码，选择“实时行情”，单击“行情”按钮之后就可以查询中国石油的行情数据，接下来复制地址栏中网址。

2运行Excel，新建一个空白工作簿，选择“数据”选项卡中“获取外部数据”选项组中“导入外部数据一自网站”命令。

3弹出“新建Web查询’对话框，在地址栏中输入刚刚复制的地址，单击“转到”按钮，此时在下面的文本框中打开网站，单击“导入”按钮。

4弹出“导入数据”对话框，选择要插入的工作表，单击“确定”按钮即可。此时在工作表中导入了网站的数据。