红豆股票历史交易数据

A. 如何下载股票历史成交数据到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建立炒股系统的整套方法，请看后续内容。"

B. 如何查询股票交易记录

您好，针对您的问题，我们给予如下解答：
4打头的证券属于特别转让市场（俗称三板市场）需开通特别转让权限，
开户人带上本人的身份证及复印件在交易时间(9:00-11:30,13:00-15:00)到证券营业网点业务柜台签署代办股份转让协议书，已有股票账户的客户要到开户营业部开通, 同时还需出示深圳的股东帐户卡，确权手续的办理费10元。
st股票很有可能退市的，因为st股票本身就是主板市场退市到三板市场的，在三板市场进行交易的。
三板的股票属于在深圳交易市场上市的股票。所以您的帐户只要开了深圳股东卡就可以买卖三板交易的股票。
有的股票是一个星期只交易一天，有的股票是一个星期只交易一、三、五。
还有的股票是一周五天都交易的。
如果买了，股票又退市的话您就一分钱也拿不到了，本金也拿不回来了。
购买三板市场的股票后，股票发生退市或者公司破产后，自己的所有投入为零了。
如仍有疑问，欢迎向国泰君安证券上海分公司企业知道平台提问。

C. 红豆股份的上市历程

江苏红豆实业股份有限公司(以下简称“本公司”或“公司”)为经江苏省人民政府苏政复[1998]99 号文批准设立的股份有限公司，股本为12,952.30 万元，并于1 998 年9月11 日在江苏省工商行政管理局依法登记注册，注册号为3202001116299。 2000 年12 月15 日，经中国证券监督管理委员会证监发字[2000]176 号“关于核准江苏红豆实业股份有限公司公开发行股票的通知”，本公司采用上网定价方式在上海证券交易所向社会公开发行人民币普通股5,000 万股，每股面值1 元，股票名称“红豆股份”，股票代码600400。发行后股本总额为17,952.30 万元。 2004 年9 月15 日，经中国证券监督管理委员会证监发行字[2004]138 号“关于核准江苏红豆实业股份有限公司增发股票的通知”，本公司增发3,580 万股的人民币普通股，并于2004 年9 月23 日在上海证券交易所上市，发行后股本总额为21,532.30 万元。 2005 年4 月16 日，经2004 年年度股东大会决议，本公司以2004 年12 月31 日总股本为基数，以资本公积金向全体股东每10 股转增4 股，转增后股本总额为30,145.22 万元。 2006 年4 月15 日，经2005 年年度股东大会决议，本公司以2005 年12 月31 日总股本为基数，以资本公积金向全体股东每10 股转增3 股，转增后股本总额为39,188.78 6万元。 2007 年4 月26 日，经2006 年年度股东大会决议，本公司以2006 年12 月31 日总股本为基数，以当年可供股东分配的利润向全体股东每10 股送1 股，转增后股本总额为43,107.6646 万元。 本公司的经营范围为：服装、针织品、纺织品、机械、化学纤维的制造加工、销售，污水处理。工业用水经营(以上范围国家有专项规定的办理审批后方可经营)。经营本企业自产产品的出口业务和本企业所需的机械设备、零配件、原辅材料的进口业务(国家限定公司经营或禁止进出口的商品及技术除外)。

D. 股票交易流水账，如何查询所有的交易记录

据投看看所知,投资者可以通过当日成交，来查看投资者当天买卖个股的情况；通过历史成交、或者交割单，来查其最近所进行的股票买卖情况。其中当日成交和历史成交一般只能看到投资者买入个股的价位，买入时间、买入金额以及买入股数，而交割单中，除了这些之外，还能看到投资者的手续费用。

其具体查询步骤如下：

1、app；

2、在界面，点击查询选项；

3、再点击下方的当日成交选项、历史成交选项，或者交割单选项即可。

当然，投资者也可以在时间段，携带有效身份证去营业部查询其股票记录，营业部工作人员会把投资者的记录打印出来。同时，投资者通过其记录，大致可以知道其盈亏情况。

E. 怎样查询股票帐户历史交易明细

带身份证去开户的证券公司打印交割单，也可以让工作人员查询远期历史数据。 清算是将买卖股票的数量和金额分别予以抵消，然后通过证券交易所交割净差额股票或价款的一种程序。证券交易所如果没有清算，那么每位证券商都必须向对方逐笔交割股票与价款，手续相当繁琐，占用大量的人力、物力、财力和时间。 投资者在委托购买股票成交后，应在规定期限内付清价款并领取股票。同理，卖出股票后应在规定的时间内交付股票并领取价款。这是股票买卖过程中的一个必要环节，一个必须履行的手续。
拓展资料
股票交易费用介绍:
1、印花税：印花税是根据国家税法规定，在股票（包括A股和B股）成交后对买卖双方投资者按照规定的税率分别征收的税金。印花税的缴纳是由证券经营机构在同投资者交割中代为扣收，然后在证券经营机构同证券交易所或登记结算机构的清算交割中集中结算，最后由登记结算机构统一向征税机关缴纳。其收费标准是按A股成交金额的1‰计收，基金、债券等均无此项费用。
2、佣金：佣金是指投资者在委托买卖证券成交之后按成交金额的一定比例支付给券商的费用。此项费用一般由券商的经纪佣金、证券交易所交易经手费及管理机构的监管费等构成。
3、过户费:过户费是指投资者委托买卖的股票、基金成交后买卖双方为变更股权登记所支付的费用。这笔收入属于证券登记清算机构的收入，由证券经营机构在同投资者清算交割时代为扣收。
4、其他费用：其他费用是指投资者在委托买卖证券时，向证券营业部缴纳的委托费、撤单费、查询费、开户费、磁卡费以及电话委托、自助委托的刷卡费、超时费等。这些费用主要用于通讯、设备、单证制作等方面的开支，其中委托费在一般情况下，投资者在上海、深圳本地买卖沪、深证券交易所的证券时，向证券营业部缴纳1元委托费，异地缴纳5元委托费；其他费用由券商根据需要酌情收取，一般没有明确的收费标准，只要其收费得到当地物价部门批准即可，目前有相当多的证券经营机构出于竞争的考虑而减免部分或全部此类费用。

F. 如何查询股票历史交易记录

1、 每个公司查看股票成交记录的方式可能略有区别，但是大概的路径都是交易→普通交易→查询→历史成交。如果没有查到的话，建议投资者可以咨询所在证券公司查询方式。
2、 查询股票历史交易记录的方法很多。投资者凭有效身份证明文件、证券账户到登记结算公司柜台打印证券变更记录；也可以到开户证券公司营业部，由证券公司代理投资者向交易所查询和打印历史成交记录。当然最方便的还可以登录你的交易软件查询交割单。
3、 网上查询手机端和电脑端的查询方式都是类似的，差别不大。投资者也可以查看账户的对账单，账户对账单相当于是银行的流水一样，每一笔交易都会在上面提现，投资者可根据自己的需求查询。
4、 投资者可以通过当日成交，来查看投资者当天买卖个股的情况；通过历史成交、或者交割单，来查其最近所进行的股票买卖情况。其中当日成交和历史成交一般只能看到投资者买入个股的价位，买入时间、买入金额以及买入股数，而交割单中，除了这些之外，还能看到投资者的交易手续费用。
5、 交易记录，自交易记账当年计起至少保存5年。 如客户身份资料和交易记录涉及正在被反洗钱调查的可疑交易活动，且反洗钱调查工作在前款规定的最低保存期届满时仍未结束的，金融机构应将其保存至反洗钱调查工作结束。
6、 需要注意的是交易时间只能查询近一个月的情况，休市时间可以查询近三个月的情况，超过三个月的要上证券公司柜台查询。如果查询线上了建议投资者可以在交易时间段，携带有效身份证去营业部查询其股票交易记录，营业部工作人员会把投资者的交易记录打印出来。同时，投资者通过其交易记录，大致可以知道其盈亏情况。

G. 股票帐户的交易明细怎样查到三个月以前的

1、打开证券交易网站，输入证券交易账号和密码，并点击下方的登录。

H. 怎样查到股票几年前的交易记录

可以选择你自己的登陆交易软件之后，有个交易，历史成交查询的选项，选择一下时间段就可以查到您要查看的东西了。( 苹果12，ios14，)

股票交易记录顾名思义就是投资者在交易时的交易单记录。
拓展资料：
1、股票（stock）是股份公司所有权的一部分，也是发行的所有权凭证，是股份公司为筹集资金而发行给各个股东作为持股凭证并借以取得股息和红利的一种有价证券。股票是资本市场的长期信用工具，可以转让，买卖，股东凭借它可以分享公司的利润，但也要承担公司运作错误所带来的风险。每股股票都代表股东对企业拥有一个基本单位的所有权。每家上市公司都会发行股票。
2、同一类别的每一份股票所代表的公司所有权是相等的。每个股东所拥有的公司所有权份额的大小，取决于其持有的股票数量占公司总股本的比重。

交易时间
1、大多数股票的交易时间是：
交易时间4小时，分两个时段，为：周一至周五上午9:30至11:30和下午13:00至15:00。
2、上午9:15开始，投资人就可以下单，委托价格限于前一个营业日收盘价的加减百分之十，即在当日的涨跌停板之间。9:25前委托的单子，在上午9:25时撮合，得出的价格便是所谓“开盘价”。9:25到9:30之间委托的单子，在9:30才开始处理。
3、如果你委托的价格无法在当个交易日成交的话，隔一个交易日则必须重新挂单。
4、休息日：周六、周日和上证所公告的休市日不交易。（一般为五一国际劳动节、十一国庆节、春节、元旦、清明节、端午节、中秋节等国家法定节假日）