如何读取Excel文件中有数据的excel读取单元格内容的行数

来源：蜘蛛抓取(WebSpider) 时间：2017-01-25 22:42 标签： excel读取单元格数据
查看: 3414|回复: 5
如何快速读取多个文件的行数，并显示在excel表格里
阅读权限20
在线时间 小时
工作需要统计几百个不带后缀的文件的行数，麻烦高手写一个可以批量读取的脚本，最好是在excel表格里一列显示文件名，另一列显示对应的行数。{:soso_e154:}
阅读权限90
在线时间 小时
& & & & & & & &
不带后缀名的文件,是咋样的,有一个样表比较好.完成这样的代码,搜一下应该很多.
阅读权限20
在线时间 小时
chen7806 发表于
不带后缀名的文件,是咋样的,有一个样表比较好.完成这样的代码,搜一下应该很多.
Sub 按钮_Click()
Dim i As Long
&&Open App.Path & &\test.txt& For Input As #1
&&Do Until EOF(1)
&&Line Input #1, nextline
MsgBox &总共有:& & i & & 行&
想把这个脚本改为可以批量选取需要读取的文件，并把文件名和对应的行数显示在excel中（各一列）
阅读权限30
在线时间 小时
Option Explicit
Sub 读取文本行数()
& &On Error GoTo 1
& & Dim MyFile, MyName, A, B, C()
& &&&ChDir ThisWorkbook.Path
& &&&MyFile = Application.GetOpenFilename((&Text Files (*.txt), *.txt&), 1, MultiSelect:=True)
& &&&If MyFile = False Then Exit Sub
1
& &&&For A = 1 To UBound(MyFile)
& && & ReDim Preserve C(1 To 2, 1 To A)
& && & C(1, A) = MyFile(A)
& && & Open MyFile(A) For Input As #1
& && & Do While Not EOF(1)
& && && &Line Input #1, MyName
& && && &If MyName && && Then
& && && &&&B = B + 1
& && && &End If
& && & Loop
& && & Close #1
& && & C(2, A) = B: B = 0
& &&&Next
& &&&Range(&A2&).Resize(UBound(C, 2), UBound(C)) = WorksheetFunction.Transpose(C)
End Sub
复制代码不带这样的。怎么一个问题发帖几次吖。下不为例哦。
阅读权限20
在线时间 小时
<font color="#76386 发表于
不带这样的。怎么一个问题发帖几次吖。下不为例哦。
呜呜，真的很着急，对比起~~~下次不重复发了
阅读权限20
在线时间 小时
<font color="#76386 发表于
不带这样的。怎么一个问题发帖几次吖。下不为例哦。
呜呜，真的很着急，对比起~~~下次不重复发了
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师电脑教程子分类在Excel中,怎样直接引用另一个表格的数据？_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
在Excel中,怎样直接引用另一个表格的数据？
上传于|0|0|文档简介
&&在Excel中,怎样直接引用另一个表格的数据？
阅读已结束，如果下载本文需要使用0下载券
想免费下载更多文档？
定制HR最喜欢的简历
你可能喜欢小木虫 --- 600万学术达人喜爱的学术科研平台
&&查看话题
如何利用matlab选取Excel中指定行的数据？
我现在有一个Excel要处理，第一列是代码名称，每一个代码对应一个企业，第二列是日期，代表不同的日期，每个企业的数据都是52个，日期都是14-12。企业代码用A表示，日期用B表示，我现在想做的就是，我随机输入企业代码和日期，比如(A,B)=(6，2012-12)，我想得到企业6，从2012-12月往前16个数据，也就是企业6从2009-03月到2012-12月对应的(X,Y)数据，然后对X,Y线性拟合得到回归方程。然后再计算剩下所有企业从2009-03月到2012-12月对应的(X,Y)数据并求出每个企业对应的回归方程。接着把企业6的X数据代入所有企业的回归方程里（包括企业6自己的回归方程）得到对应的Y‘……先做这么多，剩下的后续再加。希望大神指点啊！金币可后加！多谢！
QQ截图58.png
QQ截图20.png
展开阅读全文
学术科研必备，90%的学术科研者都在使用
关于如何利用matlab选取Excel中指定行的数据？的相关话题在小木虫APP已经有143位虫友给出了详细回复。
赶快查看回复吧！
但是下面的功能怎么实现呢？“企业代码用A表示，日期用B表示，我随机输入企业代码和日期，比如(A,B)=(6，2012-12)，我想得到企业6，从2012-12月往前16个数据，也就是企业6从2009-03月到2012-12月对应的(X,Y)数据。然后对X,Y线性拟合得到回归方程。然后再计算剩下所有企业从2009-03月到2012-12月对应的(X,Y)数据并求出每个企业对应的回归方程。接着把企业6的X数据代入所有企业的回归方程里（包括企业6自己的回归方程）得到对应的Y‘”
求线性回归我会求，但是那个把随机挑选的数据用矩阵表示我就不会了，希望指点一下，多谢！
我忙完这两天。
代码还是用附件传上来吧
因为不知道楼主上传了原始数据供测试，所以刚刚下载了原始数据测试了一下，发现之前的回帖有很多问题，现在把调试过后能够成功运行的MATLAB源程序贴上来，供楼主参考
先修改DataLoad并运行
然后输入=Select(6,'2012-12')获得的Data即为所要的数据
太感谢啦，我试试，你随便回复应助一下，我给你金币哈
运行之后，得到的数据怎么跟原数据不符合呢？
QQ截图58.png
QQ截图49.png
太感谢啦，我试了一下，我是2012b的版本，没有table变量，我上网查了一下，还没查到怎么添加变量~那如何实现下面功能：指定日期后，比如2010-03，把每一个企业的包括2010-03在内往前16个的X,Y单独保存成（X,Y）的矩阵，然后求出每个企业（X,Y）的线性回归方程，再把要求的企业的X代入到每一个企业的回归方程里求出拟合值Y'
我整个要做的工作如图1-5所示，不知道能不能完成~
不好意思，不是经常上小木虫，程序应该是对的，他前面有一个*10^5次方（1.0e+05），你原来的数据都是0.1左右的数量级，然后由于显示的是10^5，所以没显示出来，实际上还是有的，不信你可以B=Data(:,2:4)看看B的值
好的，谢啦
关于如何利用matlab选取Excel中指定行的数据？的相关话题在小木虫APP已经有143位虫友给出了详细回复。
赶快查看回复吧！
学术必备与600万学术达人在线互动！
扫描下载送金币
北京学而思教育科技有限公司 地址：北京市海淀区北三环甲18号中鼎大厦A座1层102室 电话：010-
浏览器进程
打开微信扫一扫
随时随地聊科研怎么读取excel指定某行的行/列数？_python吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：133,780贴子：
怎么读取excel指定某行的行/列数？收藏
如图，用xlrd的numRow与numCol读取列数为11，用len(data.col_values(0)）命令还是11，最后不得不用for循环一个单元格一个单元格的数，还老数错。求问有啥好办法没？
毕业季，你准备好了吗？
建议多钻研一下二维数组，
我记得一个模块能读
python用xlrd读excel文件
指定某列的行数：len(sheet.col_values(XXXX))指定某行的列数：len(sheet.row_values(XXX))
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或

我要回帖

更多关于 excel读取单元格数据 的文章

 

随机推荐