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的按紐求代碼

很簡單，插入按鈕指定宏就可以了