使用Excel VBA从Yahoo Finance下载股票价格 - 刷新BackgroungQuery：Fals

本文介绍了使用Excel VBA从Yahoo Finance下载股票价格 - 刷新BackgroungQuery：Fals的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！

问题描述

Hi

从雅虎财经下载股票价格，对有效的股票代码清单工作正常，例如

AA，AXP，BA，C，CAT，D等。

使用的查询报价编码为如下：

QueryQuote：

使用ActiveSheet.QueryTables.Add（Connection：=URL;& qurl，Destination：= DataSheet.Range（C7））
 .BackgroundQuery = True 
 .TablesOnlyFromHTML = False 
 .Refresh BackgroundQuery：= False 
 .SaveData = True 
结束
 
范围（C7）。CurrentRegion.TextToColumns目的地：=范围（C7），数据类型：= xlDelimited，_ 
 TextQualifier：= xlDoubleQuote，ConsecutiveDelimiter：= False，Tab：= True，_ 
分号：= False，逗号：= True，空格：= False，其他：= False 
 
范围（C1：I1）。选择
 Selection.ColumnWidth = 8

我遇到的问题是，如果股票代码列表中包含无效代码（在本例中我使用了'VVV'，或者是股票代码，是有效的，但不在我正在下载的特定日期的Yahoo数据库中，显示以下错误消息：

运行时间错误1004无法打开< br /> 
< br /> 
 http://chart.yahoo.com/table.csv?s=vvv&a=1&b=3&c = 2011& d = 1& e =互联网站点报告找不到您请求的项目（HTTP / 1.0 404）

系统停止，我无法前进。

调试时 - .Refresh BackgroundQuery：= False 突出显示。

我希望能够添加可以跳过上述任何无效条目的代码，然后可以访问下一个有效的股票代码和下载股票价格对此。

任何人都可以做的任何灵魂ovide将是最受欢迎的。

问候

Mike Simmons

解决方案

这篇关于使用Excel VBA从Yahoo Finance下载股票价格 - 刷新BackgroungQuery：Fals的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！