導航:首頁 > 數據行情 > 如何提取股票指標的資料庫

如何提取股票指標的資料庫

發布時間:2023-07-20 11:23:06

① 如何下載或者導出股票行情軟體的技術指標數值如KDJ,MACD等

通達信為例,將需要的指標顯示在K線圖上,不管是主圖還是副圖,點擊34,導出數據,文件格式為EXCEL、TXT都可以。
大部分股民朋友都了解炒股就是炒預期,炒股看中的上市公司的業績,但炒股除了要綜合考慮公司的基本面外,同時也要對技術面進行了解。只要說到技術面,多數人都對MACD指標很熟,對KDJ的用法卻很生疏,針對想要做短期的朋友來講,KDJ的重要性不用說也知道。今天在這里,咱們就對KDJ指標到底是什麼來進行分析,以及我們該如何利用這個技術指標來提升自己做短線操作的容錯率。開始之前,不妨先領一波福利--機構精選的牛股榜單新鮮出爐,走過路過可別錯過:【絕密】機構推薦的牛股名單泄露,限時速領!!!
一、KDJ是什麼?
KDJ指標又被稱作隨機指標,是由三條曲線即K線、D線和J線組成的,通過圖片得出的結論是,K、D、J它們三個的顏色都是不一樣的,其中K線為快速確認線,所謂的D線指的就是慢速主幹線,而J線表示的則是方向明暗線。K值和D值在0~100之間浮動,而J指在小於0或大於100波動的范圍波動,能夠在更大范圍內波動。KDJ的用處體現字判斷中短期行情走勢上。

總而言之,KDJ指標的作用不過是判斷行情,想要准確地搞清楚個股走勢,大盤走勢、所處的板塊及時事政策等多方面因素也是判斷的標准。實在沒有充足的時間去研究某隻個股的朋友,不妨點擊下面這個鏈接,輸入自己想要了解的股票代碼,進行深度分析【免費】測一測你的股票當前估值位置?
三、KDJ指標的優劣勢
KDJ指標的優點是能靈敏的判斷股價變化,可以參考它來進行短線操作。但由於該指標反應速度太快,發出買入或者賣出信號有時會過早,導致投資者在操作上容易出錯。那如何才能找到完美買賣時機?純人力技術分析還有用嗎?試試點擊下方鏈接,AI智能判斷買賣時機,進場再也不猶豫:【AI輔助決策】買賣時機捕捉神器

應答時間:2021-09-25,最新業務變化以文中鏈接內展示的數據為准,請點擊查看

② 如何下載股票歷史成交數據到Excel或txt

以華中智能股票軟體為例:(以Think pad X13 銳龍版筆記本電腦,Windows 10 操作為例)首先切換到要下載數據的股票K線形態,按「F1」進入「日線某某股票歷史成交」,點擊滑鼠右鍵->數據導出->導出所有數據->在「請選擇導出的類型」中選擇excel或txt
補充資料:
如何獲取所有股票歷史數據:
如果要對股市進行分析,首先就要獲取所有股票的歷史數據,只有通過股票的歷史數據,我們才能分析出股市的規律。
(以Think pad X13 銳龍版筆記本電腦,Windows 10 操作為例)
一、工具/原料
1、EXCEL2007或者以上版本,不能使用WPS
2、電腦1g內存1核處理器及以上配置
3、擁有較強邏輯分析能力以及少量智慧及以上的大腦一顆
方法/步驟:
第一步,獲取股票代碼,復制其中一部分到第一個工作表A4到A127,然後通過程序把每一個代碼寫入到不同的工作表A2位置,並對該工作表以該股票代碼命名。程序如下:
Sub 工作表命名()
For i = 4 To 127
Sheets(i).Range("a2") = "'" & Sheets(1).Range("a" & i)
Next i
For i = 4 To Sheets.Count
Sheets(i).Name = Sheets(i).Range("a2").Value
Next
End Sub
第二步,獲取股票歷史數據。代碼如下:
Private Function GetSource(sURL As String) As String
Dim oXHTTP As Object
Set oXHTTP = CreateObject("MSXML2.XMLHTTP")
oXHTTP.Open "GET", sURL, False
oXHTTP.Send
GetSource = oXHTTP.responsetext
Set oXHTTP = Nothing
End Function
Sub 歷史數據()
Dim objXML As Object
Dim txtContent As String
Dim i As Integer
Dim strCode As String
Dim gp As String
Dim kaishihang
Dim arr, arr1, arr2, arr3, arr4, arr5, arr6, arr7, arr8, arr9, arr10, arr11
On Error Resume Next
EndRow = Range("a65536").End(xlUp).Row
startRow = 4
If startRow <= EndRow Then
Range(Cells(startRow, 1), Cells(EndRow, 11)).Value = ""
Else
Exit Sub
End If
Set objXML = CreateObject("Microsoft.XMLHTTP")
gp = [A2]
For h = 1 To 4
For m = 1 To 4
kaishihang = [A65535].End(xlUp).Row
nian = Replace(Str(Year(Now) + 1 - h), " ", "")
ji = Replace(Str(4 + 1 - m), " ", "")
With objXML
.Open "GET", "http://quotes.money.163.com/trade/lsjyj_" + gp + ".html?year=" + nian + "&season=" + ji + "", False
.Send
If objXML.Status = 200 Then
txtContent = .responsetext
arr = Split(txtContent, "'>")
For i = 1 To UBound(arr)
arr1 = Split(arr(i), " Cells(i + kaishihang, 1) = Right(Left(arr1(0), 10), 10)
arr2 = Split(arr1(1), Chr(60))
Cells(i + kaishihang, 2) = Mid(arr2(0), InStr(arr2(0), ">") + 1)
arr3 = Split(arr1(2), Chr(60))
Cells(i + kaishihang, 3) = Mid(arr3(0), InStr(arr3(0), ">") + 1)
arr4 = Split(arr1(3), Chr(60))
Cells(i + kaishihang, 4) = Mid(arr4(0), InStr(arr4(0), ">") + 1)
arr5 = Split(arr1(4), Chr(60))
Cells(i + kaishihang, 5) = Mid(arr5(0), InStr(arr5(0), ">") + 1)
arr6 = Split(arr1(5), Chr(60))
Cells(i + kaishihang, 6) = Mid(arr6(0), InStr(arr6(0), ">") + 1)
arr7 = Split(arr1(6), Chr(60))
Cells(i + kaishihang, 7) = Mid(arr7(0), InStr(arr7(0), ">") + 1)
arr8 = Split(arr1(7), Chr(60))
Cells(i + kaishihang, 8) = Mid(arr8(0), InStr(arr8(0), ">") + 1)
arr9 = Split(arr1(8), Chr(60))
Cells(i + kaishihang, 9) = Mid(arr9(0), InStr(arr9(0), ">") + 1)
arr10 = Split(arr1(9), Chr(60))
Cells(i + kaishihang, 10) = Mid(arr10(0), InStr(arr10(0), ">") + 1)
arr11 = Split(arr1(10), Chr(60))
Cells(i + kaishihang, 11) = Mid(arr11(0), InStr(arr11(0), ">") + 1)
Next i
End If
End With
Next m
Next h
Set objXML = Nothing
End Sub
第三步,獲取上證歷史數據,並獲取所有股票的歷史數據。程序如下:
Sub 所有股票歷史數據獲取()
Application.ScreenUpdating = False
Dim s As String, gp As String, nian As String, ji As String, s1 As String
Dim arr, arr1, arr2, arr3, arr4, arr5, arr6, arr7, arr8, arr9
Dim i, h As Long
Dim kaishihang
Dim LastRow As Long, r As Long
On Error Resume Next
EndRow = Sheet2.Range("a65536").End(xlUp).Row
startRow = 4
If startRow <= EndRow Then
Sheet2.Range(Sheet2.Cells(startRow, 1), Sheet2.Cells(EndRow, 9)).Value = ""
Else
Exit Sub
End If
For h = 1 To 5
For m = 1 To 4
kaishihang = Sheet2.[A65535].End(xlUp).Row
nian = Replace(Str(Year(Now) + 1 - h), " ", "")
ji = Replace(Str(4 + 1 - m), " ", "")
s1 = "http://quotes.money.163.com/trade/lsjysj_shu_000001.html?year=" + nian + "&season=" + ji + ""
s = GetSource(s1)
arr = Split(s, "'>")
For i = 1 To UBound(arr)
arr1 = Split(arr(i), " Sheet2.Cells(i + kaishihang, 1) = Right(Left(arr1(0), 4), 4) & "-" & Right(Left(arr1(0), 6), 2) & "-" & Right(Left(arr1(0), 10), 2)
arr2 = Split(arr1(1), Chr(60))
Sheet2.Cells(i + kaishihang, 2) = Mid(arr2(0), InStr(arr2(0), ">") + 1)
arr3 = Split(arr1(2), Chr(60))
Sheet2.Cells(i + kaishihang, 3) = Mid(arr3(0), InStr(arr3(0), ">") + 1)
arr4 = Split(arr1(3), Chr(60))
Sheet2.Cells(i + kaishihang, 4) = Mid(arr4(0), InStr(arr4(0), ">") + 1)
arr5 = Split(arr1(4), Chr(60))
Sheet2.Cells(i + kaishihang, 5) = Mid(arr5(0), InStr(arr5(0), ">") + 1)
arr6 = Split(arr1(5), Chr(60))
Sheet2.Cells(i + kaishihang, 6) = Mid(arr6(0), InStr(arr6(0), ">") + 1)
arr7 = Split(arr1(6), Chr(60))
Sheet2.Cells(i + kaishihang, 7) = Mid(arr7(0), InStr(arr7(0), ">") + 1)
arr8 = Split(arr1(7), Chr(60))
Sheet2.Cells(i + kaishihang, 8) = Mid(arr8(0), InStr(arr8(0), ">") + 1)
arr9 = Split(arr1(8), Chr(60))
Sheet2.Cells(i + kaishihang, 9) = Mid(arr9(0), InStr(arr9(0), ">") + 1)
Next i
Next m
Next h
Application.ScreenUpdating = True
n = Worksheets.Count
For i = 4 To n
Worksheets(i).Activate
歷史數據
Next
End Sub
第四步,保存工作簿,並對該工作簿命名為1,然後復制該工作簿27份,把所有股票代碼寫入每一個工作簿第一個工作表的A3到A127列。然後根據第一步對工作簿內的工作表命名,並在每一個工作表A2單元格內寫入股票代碼。
第五步,把這些工作簿存放到炒股文件夾下的資料庫文件下。然後在炒股文件夾下新建一個工作簿,命名為「一鍵更新表格」,寫入如下代碼:
Sub 所有股票歷史數據更新()
Dim wb As Workbook
For i = 1 To 27
Set wb = Workbooks.Open(ThisWorkbook.Path & "資料庫" & i & "".xlsb"")
Application.Run ""'"" & wb.Path & """" & i & "".xlsb'!所有股票歷史數據獲取""
wb.Save
wb.Close
Next i
End sub
當啟動這一段代碼以後,程序會自動一個一個的打開對應的工作簿然後獲取裡面所有股票的歷史數據,存放在對應的工作表當中。
第六步,對相應的程序添加按鈕,這樣,我們在啟動對應程序時,只需要點一下對應的按鈕就可以實現了。這樣,我們通過多個工作簿就實現了獲取所有股票歷史數據的方法。而後面,我們只需要通過獲取對應股票每一天的歷史數據,我們就能夠在任意一天很快速的能夠擁有所有股票的歷史數據了。
注意事項
1、在後續需要對這些數據進行分析,裡面會加入很多計算,所以啟動所有歷史數據更新時,我們應該要關閉自動更新。
2、因為歷史數據很大,所以這里只獲取四年的數據,想要獲取更多數據,可以更改程序裡面 「For h = 1 To 5」的那個5即可。
3、歷史數據的獲取需要較長的時間,要提前做好准備。
4、如果你想要弄清楚用EXCEL建立炒股系統的整套方法,請看後續內容。"

③ 如何導出同花順中技術分析中的各項指數

導出方法:在K線圖界面,按F1進入歷史成交,往上翻,翻到需要的起始點,點滑鼠右鍵,數據導出,導出所有數據,默認保存在桌面上。

股票行情是一種證券市場用語,指股票交易所內各只股票的漲幅變化及交易流通情況。
股市行情分析方法:
(1)技術分析:技術分析是以預測市場價格變化的未來趨勢為目的,通過分析歷史圖表對市場價格的運動進行分析的一種方法。股票技術分析是證券投資市場中普遍應用的一種分析方法。
(2)基本分析:基本分析法通過對決定股票內在價值和影響股票價格的宏觀經濟形勢、行業狀況、公司經營狀況等進行分析,評估股票的投資價值和合理價值,與股票市場價進行比較,相應形成買賣的建議。
(3)演化分析:演化分析是以演化證券學理論為基礎,將股市波動的生命運動特性作為主要研究對象,從股市的代謝性,趨利性,適應性,可塑性,應激性,變異性和節律性等方面入手,對市場波動方向與空間進行動態跟蹤研究,為股票交易決策提供機會和風險評估的方法總和。

④ 如何利用一些 finance 資料庫 api 批量獲取股票信息

使用Yahoo API獲取股票信息。

⑤ 萬得提取數據在哪

1、打開wind軟體,在界面上端的「宏觀」選項框,選擇「經濟資料庫」--「中國宏觀資料庫」。

2、在左下角搜索框,搜索需要豎棗的指標。在彈出鬧吵的對話框中,雙擊選中的指標,液纖侍此時,這個指標會在原始的界面中顯示出來。

3、選擇界面左上角「提取數據」。

4、選擇界面左上角「數據導出」即可。

⑥ 在哪裡可以找到股票歷史數據形成的資料庫

大富翁數據中心提供國內股票和期貨tick級別歷史數據的資料庫,各級別分鍾數據也有,外盤也有提供,都是純文本,質量很高

⑦ api如何獲取股票wma指標數據

1、首先獲取股票當前數據。
2、其次獲取股票歷史數據。
3、最後輸入需要的股票的地址即可。以上就是api獲取股票wma指標數據的方式。

⑧ 請問:如何提取通達信中個股相關的概念板塊指數



類似紅線標記處,需要添加外部數據。副圖白色顯示的需要調用系統相關函數

⑨ 如何獲取k線數據如何獲取指標數據

獲取K線數據的軟體還是蠻多的。
我之前用過大智慧,就是軟體稍微有點大。包括所有的股票、商品、股指很多品種都可以下載數據。直接右鍵復制,到EXCEL中黏貼就可以了。希望能幫到你,望採納!

閱讀全文

與如何提取股票指標的資料庫相關的資料

熱點內容
st永泰能源股票是滬市主板嗎 瀏覽:8
中國核心技術板塊股票 瀏覽:779
銀行信託股票有哪些條件 瀏覽:966
股票主力資金指的是 瀏覽:871
美國保險股票歷史走勢 瀏覽:583
股票軟體按61為什麼不是排行 瀏覽:745
股票軟體查股票怎麼查 瀏覽:934
四川索牌科技股份股票 瀏覽:703
傳化股份股票走勢 瀏覽:914
資金在2W以下該怎麼買股票 瀏覽:665
運用貼現現金流模型測算股票的內在價值 瀏覽:277
購買股票是要把錢轉入證券嗎 瀏覽:776
中國人可以到日本購買股票嗎 瀏覽:442
現在可以買中國石油股票嗎 瀏覽:701
股票流出資金代表什麼意思 瀏覽:411
買香港上市的股票嗎 瀏覽:559
建設銀行轉股票賬戶 瀏覽:522
股票指標專家打分 瀏覽:560
公司員工是否可以買自己公司股票 瀏覽:729
證券與股票的論文 瀏覽:904