excel股票刷新代码

⑴ EXCEL 输入股票名称 如何自动套入股票代码

通过VLOOKUP函数来处理。

Excel版本参考：2010

1、选中E2单元格；

2、输入公式：=VLOOKUP(D2,A:B,2,0)，回车；

3、修改D2数据，测试效果（OK）。

VLOOKUP 函数搜索某个单元格区域（区域：工作表上的两个或多个单元格。区域中的单元格可以相邻或不相邻。）的第一列，然后返回该区域相同行上任何单元格中的值

⑵ excel调用股票实时价格

1、你想要哪只股？
2、直接给你公式你会修改吗？
3、想做到适合你自己，就只能教你怎么调用！
4、你以为是EXECL本身的数据处理啊！！！
以下内容是教你怎么调用，爱用不用拉倒，问个问题还限定这个限定哪个的，别人教你怎么去弄还弄不出来，也不去思考思考：
1、打开EXECL软件，找到“数据---来自网站”；
2、点击后会弹出一个对话窗口，在地址旁边的输入框处输入网站的地址；
3、查找网站的地址，你打开网易或搜狐，里面有股票财经，进入后输入你想要查询的股票代码，会得到该股票查询的网站地址；（将该地址复制到上面那点）；
4、在对话窗口里面，你会看到整个网页的信息，并且在网页每个内容框前面都会有个箭头；
5、在你需要的信息那个框，点击那个箭头，会变成一个勾，说明你已经选择该项；
6、至于对话窗口里面选项的每个设定，有什么功能，自行单个去理解；
7、点击导入，就可以得到来自网站上的数据；
8、每个数据的来源都是有端口的，不是你想用公式就用公式，有时需要引用；
9、如果你需要用到统计，现在你可以在EXECL里面用函数进行操作了；
10、不知道是否所有的EXECL版本都支持；

⑶ 如何将新浪网上的股票行情导入到excel中并实时更新

1、首先查找股票价格表的地址。
2、打开EXCEL表将光标置于A1,选“数据/导入外部数据/新建veb查询”，在地址栏输入股票价格表地址，“转到”，单击价格表旁黄色向右箭头，单击“导入”，即可将价格表导入EXCEL表。
3、将EXCEL表起名，保存。
4、光标放在新导入表格中，在“数据/导入外部数据/数据区域属性/数据控件”中，勾选“打开工作簿时自动刷新/确定”。
4、再在目录打开保存过的EXCEL表，点击“启用自动刷新”按钮，即可根据网上最新的股票数据予以刷新。
5、你还应进一步建立自己股票查询表，用VLOOKUP函数根据股票代码将自己的股票信息导入到查询表中，并设置收益计算等项目。
这样，每天打开查询表，刷新，即可见到自己股票的最新信息和收益状况了。

⑷ excel股票自动刷新，VBA代码如何写啊

我测试了下发现是鼠标放上去悬停才能触发刷新数据的动作。。。

sheet1里写：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

宏2

End Sub

模块1里写：

Sub 宏2()

'

' 宏2 宏

ActiveWorkbook.RefreshAll

If Sheet1.[G1] <> "停止刷新" Then Application.OnTime (Now + TimeSerial(0, 0, 2)), "宏2"

End Sub

亲测OK。

TimeSerial(0, 0, 2) 里面的2就是每2秒刷新一次，可以改成你想要的数值。

这个是我录制宏，再稍微修改下，几分钟完成的。

⑸ 如何将股票价格实时更新链接到EXCEL表里

楼主试试腾讯文档在线表格吧，我现在看股票实时信息就是用的这个。它们的在线表格有个「股票动态函数」，非常好用！简单、无需学习、数据实时自动更新；看看我日常看的股票表：

⑹ 在Excel中怎么样才能实现A列输入股票代码或者名称，B列自动更新当天的收盘价

数据 导入外部数据 新建WEB查询
在地址栏输入要查询数据的网址 转到
单击要选择的表格旁边的→ 然后单击 导入
然后根据提示进行设置

⑺ 在Excel中，每75秒全部刷新一次，求VBA代码。

1、插入模块输入以下代码
Private Declare Function MessageBoxTimeout Lib "user32" Alias "MessageBoxTimeoutA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long, ByVal wlange As Long, ByVal dwTimeout As Long) As Long
Sub 定时刷新MSGBox3()
ActiveWorkbook.RefreshAll
Call 定时刷新
End Sub
Sub 定时刷新()
Application.OnTime Now + TimeValue("00:01:15"), "定时刷新MSGBox3" '75秒刷新一次
End Sub
2、工作薄打开事件 call 定时刷新

⑻ excel VBA数据刷新的代码问题

上面清除数据 是 清除的 Range("A7:W60000,B6,D6,F6,B2:D2,F2:H2"), 这里面不包含 U6这个单元格，

循环条件：Do Until Cells(i, "U") = Empty
第一次 i=6，单元格 U6 我们不知道是什么内容，如果不为空，则继续运行——第二次当i=7时，数据是空的，那么循环跳出，不再运行。

你是想表达 只要 Cells(i, "U") 为空就继续运行么？ 那么 要改为 Do While 循环
但这样，你要保证U列下面的单元格中不是全空的，不然 程序将对所有行进行处理，直到行数达到最大，这有可能出错 或 造成程序假死。

⑼ 如何用EXCEL 实现如股票代码的功能

你的要求是永远也得不到答案的！
因为在A1单元格中不可能同时是输入数字及公式并存的！
只有在A1单元格中输入580989，就会在B1（或其它）单元格里出“现南航认沽”：
打开Excel新文件，在工作薄Sheet1中的B1单元格中输入：=IF(A1="","",VLOOKUP(A1,Sheet2!A1:B1,2,TRUE))
在Sheet2中的A列输入代码，B列输入名称：
在Sheet2中的A1单元格中输入580989，在Sheet2中的B1单格中输入南航认沽
测试结果：
在Sheet1中的A1单元格中输入580989，在Sheet1中的B1单元格就看到结果了。

⑽ 做一个用vba刷新整个excel的按纽求代码

很简单，插入按钮指定宏就可以了