三一重工股票历史最高价格是多少？

1. 三一重工股票历史最高价格是多少？

三一重工股票历史最高价格是70.80元。
凭借着三一一流的产品品质，三一设备被广泛参建到各地的重点工程，其中包括了迪拜塔、北京的奥运场馆、伦敦的奥运场馆、包括国外巴西世界杯场馆、上海中心、香港环球金融中心等重大项目的施工建设。
三一重工股份有限公司成立于1994年，三一重工股票代码600031，在2003年于A股上市,公司产品包括混凝土机械、挖掘机械、起重机械、桩工机械、筑路机械，泵车、拖泵、挖掘机、履带起重机、旋挖钻机等主导产品已成为中国一大品牌。

扩展资料：
经营范围：
生产建筑工程机械、起重机械、停车库、通用设备及机电设备（其中特种设备制造须凭本企业行政许可）、金属制品、橡胶制品、电子产品、钢丝增强液压橡胶软管和软管组合件、客车（不含小轿车）和改装车；建筑工程机械、起重机械、停车库、通用设备及机电设备的销售与维修。
金属制品、橡胶制品及电子产品、钢丝增强液压橡胶软管和软管组合件的销售，客车（不含小轿车）和改装车的销售（凭审批机关许可文件经营），五金及法律法规允许的 矿产品、金属材料的销售。
提供建筑工程机械租赁服务，经营商品和技术的进出口业务（国家法律法规禁止和限制的除外）。（企业依法自主选择经营项目，开展经营活动，依法须经批准的项目，经相关部门批准后依批准的内容开展经营活动，不得从事本市产业政策禁止和限制类项目的经营活动。）
参考资料来源：百度百科-三一重工股份有限公司 
参考资料来源：百度百科-股票价格

2. 如何下载股票历史成交数据到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     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)， " "， "")     jidu = Replace(Str(4 + 1 - m)， " "， "")     With objXML         .Open "GET"， "http://quotes.money.163.com/trade/lsjyj_" + gp + ".html?year=" + nian + "&season=" + jidu + ""， 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， jidu 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     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)， " "， "")     jidu = Replace(Str(4 + 1 - m)， " "， "")     s1 = "http://quotes.money.163.com/trade/lsjysj_zhishu_000001.html?year=" + nian + "&season=" + jidu + ""     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建立炒股系统的整套方法，请看后续内容。"

3. 三一重工股票历史最低价 历史最高价是多少

打出三一重工股票，然后右键复权，选不复权，就可以看到历史最低价4.93元， 历史最高价70.80元。

4. 三一重工股票历史最低价 历史最高价是多少？

打出三一重工股票，然后右键复权，选不复权，就可以看到历史最低价4.93元， 历史最高价70.80元。

5. 我要查我购买的三一重工股票要多少股怎么查？

打开账户，找资金股份一栏，点开，看持仓，就有你的库存股票列表，成本，盈亏，数量都有的。
历史成交也可以查，输入一个时间段，会显示相应的历史成交情况。几年的都能查到。
不过交易时间段，差不了太远的，等交易结束以后，可以查到。

6. 股票历史交易量怎么查？

你好，历史的成交量在证券软件里都是有的。就是软件界面下面显示成交量。

7. 怎样查找股票过去的成交明细

登录股票软件，在交易界面找到“查询”，或者“搜索”选项。
虽然股票交易软件可能不一样，不过类似功能肯定大同小异。
搜索选项或者查询选项，一般都是用一个放大镜图标表示。
在查询这一目录下面寻找到交割单选项，或者资金流水选项，
这些都能查询出历史交易数据。
如图：


点击起始日期，
在日历上点击箭头所指的红色圆圈中的小箭头，
可以选择日期。
起始日期和终止日期都要选择，
有的软件只能支持你查询2个月的数据，
那么你必须一段一段时间的分开查询。
比如说，你要查询2013年的交易数据，
那么你可以把起始日期设置为：2013年1月1日，
终止日期设置为：2013年2月28日，确认，就可以查询到这两个月的交易记录了。
然后重新设置，把起始日期设置为：2013年3月1日，
终止日期设置为：2013年4月30日，那么查询到的就是3月和4月份的记录。


点击箭头所指圆圈处开始设置所需要查询的日期。
如图：

8. 如何查询股票历史成交量

股票历史的成交量在每一根k线下面都可以查询到，我们所了解的股票成交量，就是买卖股票的成交数量，即一天之内就完成成交的股票总数量（1手=100股）笼统地说，股票成交量能让人们看到个股或者大盘的活跃程度，有助于我们更便利的筛选股票、识别买入和卖出的时机。我们可以用怎样的办法来看股票成交量？有没有一些分析技巧可以分享？其中有什么地方是最需要我们注意的？下面的内容就是我为大家整理的答案。在这之前，先给大家发福利，我整理各行业的龙头股信息，涉及医疗、新能源、白酒、军工等热门行业，随时可能被删：吐血整理！各大行业龙头股票一览表，建议收藏！一、股票成交量怎么看？有没有一些分析技巧可以分享？通过交易软件就能知道股票成交量，通过看开盘时的买入卖出量来确定成交量。或者看红绿柱，股票的成交量都可以利用这些直接反映：红柱体代表买入﹥卖出；绿柱体代表买入﹤卖出。要想股票炒得好，实用工具少不了，吐血整理的【股票研究9大神器】。点击领取：超实用炒股的九大神器，建议收藏二、股票成交量大就一定好吗？股票成交量大并不能说明这只股票好，只能说买卖双方在股票的价格上，想法完全不同。像一些热门股票，买的人认为价格会上涨，卖的人认为价格会下跌，双方分歧很大，那成交量就会很高，反之成交量就很低。成交量一般可以配合着股价趋势来看：持续上涨中，成交量也越来越大，随着价格不断的抬升，分歧方面买卖双方越来越猛烈，越来越多人把持有的股票卖出这时候就需要小心追涨；成交量与趋势有关，下跌趋势的情况下，成交量会减少，买卖双方分歧小，未来继续下跌可能性大。除去这几类，股票成交量还会有别的情况，由于篇幅问题，我就不展开细说了，大家可以点击下方链接，输入你中意的股票，就能免费获得个股成交量分析报告：【免费】测一测你的股票当前估值位置？应答时间：2021-09-08，最新业务变化以文中链接内展示的数据为准，请点击查看