完美环球历史交易数据股票

‘壹’ 完美环球的股票代码是

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建立炒股系统的整套方法，请看后续内容。"

‘陆’ 七喜控股和完美环球哪个好

既然你关注了这两只股票，说明这两只股票都是相当不错的，如果资金充足，两只股票都可以参与，避免了二选一的纠结心情，又有利于对比两者的投资价值，为以后的相关经历提供经验。