完美環球歷史交易數據股票

『壹』 完美環球的股票代碼是

002624望採納

『貳』 高分求套好的股票交易軟體

市面上主流的交易軟體無非：通達信 大智慧 大福星 同花順 錢龍 還有一些小的交易軟體比如投資通 投資堂
各個財經網站也有些交易軟體供用戶下載比如新浪的 證券之星的
但是個人還是推薦lz下載個同花順使用www.jqka.com.cn
為什麼推薦同花順 絕對是有理由的
好些人推薦推薦通達信 那麼我問大家 有誰用過同花順？
市面上幾款主流的交易軟體我都用過 同花順 大智慧 大福星 通達信 錢龍 證券之星跟投資通的也用過
簡單說說這些軟體吧
大智慧老牌交易軟體 使用比較容易上手 甚至都可以完全脫離滑鼠操作 現在許多券商大戶室仍在使用大智慧就是這個願意 起碼每台機器可以省下一個滑鼠 但是近年開始 陸陸續續的摻雜的廣告太多 感覺有些變質的味道 在一個 樓上說的不對 相對於通達信 大智慧機構用的才較多 通達信是最近才出來通達信--機構版的
大福星 也沒清晰度同同花順有些類似 操作不如同花順順手 但是用大福星的話 不如索性用同花順得了
通達信 有點在於頁面簡潔 操作簡單 不足在於操作頁面的過於簡單 k線圖上 默認顯示的技術指標就一個macd 想要其他指標 需要自己輸入 或者右鍵後選擇指標 自己從系統裡面往外調出 頁面顯示上 總有種感覺：霧蒙蒙的 不清晰
錢龍 非常悠久的交易軟體 可以說是國內第一款股市行情交易軟體 在90年代 要買套錢龍 都要上萬塊 因為悠久 現在仍然許多券商現場機器上裝著錢龍
同花順 用過幾款主流的交易軟體後 最後鎖定了同花順 因為頁面非常清爽 沒有霧蒙蒙的感覺 一些常用技術指標都顯示在k線圖上 而且還有些主力動向 資金流向等特殊指標 有的版本同花順 這些特殊指標是免費的 可以查閱的 重要的是同花順裡面內卡著期貨 港股 外匯 全球股市行情 非常全面 可以多重參考 最後一個 同花順的社區建設也非常完全 可以隨時登陸同花順社區進行發帖 看帖 同花順的官網建設的也有財經味道 不錯
不足之處在於 同花順今年內卡的廣告也是越來越多 需要注冊使用 不過注冊是免費的 發帖較以前不是很方便 以前發帖直接可以在交易軟體上面發帖 但是在同花順上市之前一段時間 發帖變得規范 復雜起來 需要登錄網頁發帖
證券之星的軟體 忘記叫什麼名字了 許多功能都是付費的 屬於半付費軟體。。。
本人推薦lz用同花順 說了同花順那麼多 本人不是同花順的托兒 也不是槍手 只是推薦您一款順手的軟體

『叄』 《完美世界》公司被誰收購了

完美環球收購了。

2016年1月7日，停牌逾半年的完美環球終於揭開資產重組方案。公司擬19.53元每股發行6.14股，作價120億元，收購上海完美世界網路科技有限公司（以下簡稱「上海完美」）100%股權。

交易完成後，完美世界數字科技有限公司（以下簡稱「完美數字科技」）將成為公司的控股股東，完美環球實際控制人池宇峰持股比例增至57.77%。

(3)完美環球歷史交易數據股票擴展閱讀：

按照完美影視官網的表述，這家公司成立在2008年8月，是完美時空旗下的公司。2011年8月，完美影視作價3.6億元出售給北京快樂永久影視文化有限公司。後者工商登記信息顯示，2011年6月10日成立，法人是池宇峰，注冊資金100萬。

正是這筆出資，把池宇峰和完美世界推向了輿論的風口。外界按照華誼兄弟、光線傳媒等企業的PE去核算這筆交易，認為這是池宇峰的獨特財技，將上市公司的資產賤賣給了自己完全控制下的另一家公司。

從此次的公告中，不難發現完美影視確實是一個吸金利器。按照披露的信息顯示，2013年，2014年，完美影視的營業收入分別為99,008.62萬元、92,578.43萬元，歸屬於母公司的凈利潤分別為13,000.74萬元和19,019.08萬元。

『肆』 如何快速查詢歷史股票交易記錄

登錄股票軟體，在交易界面找到「查詢」，或者「搜索」選項。

雖然股票交易軟體可能不一樣，不過類似功能肯定大同小異。

搜索選項或者查詢選項，一般都是用一個放大鏡圖標表示。

在查詢這一目錄下面尋找到交割單選項，或者資金流水選項，

這些都能查詢出你的歷史交易數據。

如圖：

點擊起始日期，

在日歷上點擊箭頭所指的紅色圓圈中的小箭頭，

可以選擇日期。

『伍』 如何下載股票歷史成交數據到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建立炒股系統的整套方法，請看後續內容。"

『陸』 七喜控股和完美環球哪個好

既然你關注了這兩只股票，說明這兩只股票都是相當不錯的，如果資金充足，兩只股票都可以參與，避免了二選一的糾結心情，又有利於對比兩者的投資價值，為以後的相關經歷提供經驗。